vba - VBA - 计算一行中填充单元格的数量

Question

以下是我到目前为止的代码。有小费吗？

 With wSheet
     colCount = .Range(1 & .Columns.Count).End(xlToRight).Column
  End With

我究竟做错了什么？

score 4 · Accepted Answer

4

尝试：

colCount = wSheet.UsedRange.Rows(1).Columns.Count

（修改）

于 2013-07-17T19:13:30.600 回答

score 3 · Accepted Answer

要获取最右边填充列的编号：

colCount = .Cells(1, .Columns.Count).End(xlToLeft).Column

如您的标题所述，要获取非空白单元格的数量：

Application.WorksheetFunction.CountA(.Rows(1).EntireRow.Cells)

2 回答 2