由于我是 vba 脚本的新手,我无法弄清楚在这个简单的赋值语句中我哪里出错了。我已经在 ThisWorkBook 中初始化了我的变量并尝试在 sheet1 中使用这些变量。
代码:
Public count1 As Integer
Public count2 As Integer
Public count3 As Integer
Public row13 As Integer
Public srow8 As Integer
Public erow8 As Integer
Private Sub Workbook_Open()
count1 = 18
count2 = 26
count3 = 26
Sheet1.setValues
Sheet1.getValues
End Sub
Sub setValues()
row13 = ThisWorkbook.count1
Debug.Print (row13)
srow8 = ThisWorkbook.count2
erow8 = ThisWorkbook.count3
End Sub
Sub getValues()
Debug.Print ("row13")
Debug.Print (row13)
Debug.Print ("srow8")
Debug.Print (srow8)
Debug.Print ("erow8")
Debug.Print (srow8)
End Sub
(所有变量都是全局的)当我尝试打印这些值时,没有打印任何值。我不明白我哪里出错了?如果你能帮我解决这个问题,那将是很大的帮助。提前致谢。:)
Public
变量可以从代码的任何区域访问,而不仅仅是定义它们的对象。这并不意味着当你想引用它们时你不必指定它们所在的对象,例如,那些包含在您的ThisWorkbook
对象中将被称为ThisWorkbook.count1
等。为了避免使用相关对象限定变量,您可以Public
在标准代码模块中创建变量。
我相信你正在尝试做的如下:
在您的ThisWorkbook
代码模块中:
Private Sub Workbook_Open()
count1 = 18
count2 = 26
count3 = 26
Sheet1.setValues
Sheet1.getValues
End Sub
在您的Sheet1
代码模块中:
Sub setValues()
row13 = count1
Debug.Print row13
srow8 = count2
erow8 = count3
End Sub
Sub getValues()
Debug.Print "row13"
Debug.Print row13
Debug.Print "srow8"
Debug.Print srow8
Debug.Print "erow8"
Debug.Print srow8
End Sub
在通用代码模块中(可能Module1
):
Public count1 As Integer
Public count2 As Integer
Public count3 As Integer
Public row13 As Integer
Public srow8 As Integer
Public erow8 As Integer
本文收集自互联网,转载请注明来源。
如有侵权,请联系[email protected] 删除。
我来说两句