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)