在VBA中创建一个悬浮表格（也称为“弹出”表格或“弹出”对话框），可以使用`UserForm`。以下是一个简单的步骤和示例代码，演示如何创建一个悬浮表格：
1. 打开Excel，然后按 `Alt + F11` 打开VBA编辑器。
2. 在VBA编辑器中，右键点击VBAProject（通常是工作簿名称），选择`Insert` > `UserForm`来插入一个新的UserForm。
3. 双击UserForm，打开它的代码窗口。
4. 在UserForm的代码窗口中，你可以添加控件（如TextBox、Button等）和事件处理程序。
以下是一个简单的示例，演示如何创建一个带有两个TextBox和一个Button的悬浮表格：
```vba
Private Sub UserForm_Initialize()
' 初始化UserForm
Me.Caption = "悬浮表格"
TextBox1.Text = "请输入内容1"
TextBox2.Text = "请输入内容2"
End Sub
Private Sub Button1_Click()
' 当点击按钮时，获取文本框中的值并显示
MsgBox "内容1: " & TextBox1.Text & vbCrLf & "内容2: " & TextBox2.Text
' 关闭UserForm
Me.Hide
End Sub
```
要显示UserForm，你可以添加一个按钮到Excel工作表，并在其点击事件中调用UserForm的`Show`方法：
```vba
Private Sub CommandButton1_Click()
' 显示UserForm
UserForm1.Show
End Sub
```
请按照以下步骤将代码集成到Excel中：
1. 打开Excel工作簿，然后按 `Alt + F11` 打开VBA编辑器。
2. 在VBA编辑器中，右键点击工作簿名称，选择`Insert` > `Module`来插入一个新的模块。
3. 将以下代码复制并粘贴到新模块中：
```vba
Public Sub ShowUserForm()
' 显示UserForm
UserForm1.Show
End Sub
```
4. 在工作表上插入一个按钮，并为其设置一个点击事件，将`ShowUserForm`过程作为事件处理程序。
现在，当你点击工作表上的按钮时，会弹出一个悬浮表格，你可以输入内容并点击“确定”按钮来显示消息框，其中包含你输入的内容。
