VBA - 计算连续填充单元格的数量

Question

以下是我目前的代码。有什么提示吗？

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

我做错了什么？

Answer 1

尝试：

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

（修订版）

Answer 2

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

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

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

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