VBS Excel尝试在macros中select过去的空单元格

我目前正在尝试创build一个基于几个标准进行select的macros。 但是,由于某些单元格是空的,因此在select当前点右侧的所有数据时遇到了问题。

到目前为止,我有这样的东西:

rwcnt = WorksheetFunction.CountA(Range("A:A")) lastc = Cells(1, Columns.Count).End(xlToLeft).Column Dim i As Long For i = 2 To rwcnt If IsNumeric(Cells(i, 1).Value) <> True Then Range(Cells(i, 1).Address, Cells(i, 1).End(xlDown).Address).Select Range(Selection, lastc).Select Exit For End If Next 

这给了我一个错误的方法'范围'对象'_global'失败

以前,我有最后的范围行阅读为:

 Range(Selection, Selection.End(xlToRight)).Select 

我尝试了这一点,因为我从左边开始,但是,有些行有空白单元格,这是select停止的地方。 正因为如此,我试图从右边进来,并find我的最后一列,然后select。 任何帮助将不胜感激!

 Range(Selection, lastc).Select 

将失败,因为对于这个语法范围期望一个起始范围和一个结束范围。 (有关语法,请参见https://msdn.microsoft.com/zh-cn/library/office/ff841254(v=office.15).aspx )

lastc是一个数字(具体是最后使用的列的编号)。

你会想要使用类似于下面的东西:

  Range(Selection, Cells(i, lastc)).Select 

参数将取决于您想要select的内容。