我是VBA的新手,我试图在循环遍历给定列时显示msgBox中的单元格值(一个接一个),但是消息框没有显示值(这些值)不是空的或工作表中的#34;"。
我的代码如下:
For i=2 To workbooks(filename).Worksheets(1).Columns(columnNumber).rows.count
MsgBox "Cell value is: " & Cells(i, columnNumber).address
MsgBox "Cell value is: " & Cells(i, columnNumber).value
Next i
问题是地址在MsgBox中正确显示,而值不是。任何帮助将不胜感激。
答案 0 :(得分:1)
实际上是对缺少的正确工作簿的引用。感谢Rory的帮助。
正确的代码如下:
For i=2 To Workbooks(filename).Worksheets(1).Columns(columnNumber).Rows.Count
MsgBox "Cell value is: " & Workbooks(filename).Worksheets(1).Cells(i, columnNumber).Address
MsgBox "Cell value is: " & Workbooks(filename).Worksheets(1).Cells(i, columnNumber).Value
Next i
现在它完美无缺。