Excel 工作簿插入用户窗体 - 轻松实现数据输入与交互

2023-11-26 16:08:50

在Excel中插入用户窗体

打开需要插入窗体的Excel工作簿。
在“开发工具”选项卡中，单击“插入”组中的“窗体”按钮。
在“窗体”对话框中，选择要插入的窗体类型。您可以从“常用”选项卡中选择基本窗体控件，也可以从“其他控件”选项卡中选择更高级的控件。
单击“确定”按钮，将窗体插入到工作簿中。
右键单击窗体，然后选择“属性”命令。在“属性”对话框中，可以设置窗体的标题、大小、位置等属性。
在窗体上添加控件。您可以从“开发工具”选项卡中的“控件”组中选择要添加的控件。
设置控件的属性。右键单击控件，然后选择“属性”命令。在“属性”对话框中，可以设置控件的名称、大小、位置、值等属性。
为控件编写VBA代码。您可以使用VBA代码来控制控件的行为，例如，当用户单击按钮时，执行特定的操作。

实例

下面是一个在Excel工作簿中插入用户窗体的示例。该窗体用于收集客户信息，包括客户姓名、地址、电话号码和电子邮件地址。

打开需要插入窗体的Excel工作簿。
在“开发工具”选项卡中，单击“插入”组中的“窗体”按钮。
在“窗体”对话框中，选择“常用”选项卡，然后选择“文本框”控件。
将文本框控件拖放到工作簿中。
右键单击文本框控件，然后选择“属性”命令。在“属性”对话框中，将“名称”属性设置为“姓名”。
重复步骤3-5，添加“地址”、“电话号码”和“电子邮件地址”文本框控件。
在窗体上添加一个“提交”按钮。
右键单击“提交”按钮，然后选择“属性”命令。在“属性”对话框中，将“名称”属性设置为“提交”。
为“提交”按钮编写VBA代码。在“属性”对话框中，单击“事件”选项卡，然后选择“单击”事件。在“单击”事件文本框中，输入以下代码：

Private Sub 提交_Click()
    Dim姓名 As String
    Dim地址 As String
    Dim电话号码 As String
    Dim电子邮件地址 As String

    姓名 = Me.姓名.Value
    地址 = Me.地址.Value
    电话号码 = Me.电话号码.Value
    电子邮件地址 = Me.电子邮件地址.Value

    ' 将数据保存到工作簿中
    Range("A2").Value = 姓名
    Range("B2").Value = 地址
    Range("C2").Value = 电话号码
    Range("D2").Value = 电子邮件地址

    ' 关闭窗体
    Me.Unload
End Sub