如何在excel vba中提示表单选择-Java 学习之路

当工作簿有许多工作表（如100）时，您可以通过右键单击左下角的箭头快速激活工作表，然后显示提示，让您选择要选择的工作表 . 但是，我希望能够在不单击并仅使用键盘的情况下达到此提示 . 所以我想创建一个简单的宏，我可以通过指定类似ctrl g的方式快速提取此提示 . 但是，我不知道如何在vba中这样做 .

1 回答

1
构建副本激活表单：将userform插入到项目中 . 将其 Headers 设置为“激活” . 为其添加标签“Activate：” . 添加一个列表框和两个按钮 . 标记一个按钮确定，另一个取消 .

在userform的UserForm_Initialize子中，循环显示工作表的名称并将它们添加到列表框....类似于：
```
Private Sub UserForm_Initialize()
    Dim oSheet As Worksheet

    For Each oSheet In Worksheets
        ListBox1.AddItem oSheet.Name
    Next
End Sub

Private Sub CommandButton1_Click()
    Sheets(ListBox1.Text).Activate
    Unload Me
End Sub

Private Sub CommandButton2_Click()
    Unload Me
End Sub
```
现在，在VBA项目的ThisWorkbook部分中，添加一个子以显示您的用户表单：
```
Private Sub ShowActivateForm()
    UserForm1.Show
End Sub
```
返回Excel并单击开发人员选项卡上的“宏”按钮 . 您应该看到一个名为ShowActivateForm的宏 . 选择它并单击“选项”为其分配所需的热键 .
回复于 2024-05-02T07:52:42+08:00

如何在excel vba中提示表单选择

1 回答

相关问题