我遇到过这样的情况:在VBA中,我希望将多个工作表中的数据放入另一个工作表中的变量中。我想将该变量数据附加到一个文本文件中。
我不想将整个数据导出到文本文件中,我只想导出特定范围内的数据。
因此,现在对于每个工作表,我都有一个包含每个工作表所需数据的变量,我希望将每个工作表的变量中的数据发送到主表中定义的函数。
假设我在表1中有一个变量s1
,其中包含一些数据。我希望该变量数据在另一个工作表中是可评估的。
我怎样才能满足上述要求?
发布于 2020-06-16 10:33:45
如果您想要从MasterSheet控制它,您可以在工作表上将变量声明为Public,然后为文本指定一些值。您可以从MasterSheet获取这些值:
在Sheet1
上
Public s1 As String
Sub giveValue()
s1 = "Hello from Sheet1"
End Sub
在Sheet2
上
Public s1 As String
Sub giveValue()
s1 = "Hello from Sheet2"
End Sub
在MasterSheet
或任何模块上使用MasterSheet进行访问
Sub AssessSheetVariables()
Debug.Print Sheet1.s1
Debug.Print Sheet2.s1
End Sub
输出:
Hello from Sheet1
Hello from Sheet2
发布于 2020-06-16 10:18:56
如果工作表Sheet1
中有s1
,则可以将其传递给MasterSheet
函数:
在Sheet1
上
Sub Example()
Dim s1 As String
s1 = "Hello"
MasterSheet.AssessString s1
End Sub
在MasterSheet
上
Sub AssessString(s As String)
' do some stuff
End Sub
https://stackoverflow.com/questions/62405956
复制