从另一个宏调用值

Question

我有一个userform，它打开一个工作表列表。我想创建一个宏来识别userform打开的最后一张工作表，然后根据工作表中的数据类型运行数据验证。

如何引用打开的工作表，以便稍后可以调用验证宏？

感谢所有帮助！

Answer 1

您需要在 Public 变量中“记住”它。

在标准模块中，靠近该模块的顶部，包括：

Public LastSheet As Worksheet

在UserForm中，代码如下：

Sub WithinUserForm()
    Dim x As String
    x = Application.InputBox(Prompt:="pick a worksheet", Type:=2)
    Sheets(x).Select
    Set LastSheet = ActiveSheet
End Sub

最后在DV宏中：

Sub MacroForDV()
    LastSheet.Select
End Sub