Cells.value不会在VBA

时间:2015-10-02 18:27:08

标签: excel-vba vba excel

我是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中正确显示,而值不是。任何帮助将不胜感激。

1 个答案:

答案 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

现在它完美无缺。