найти количество столбцов, используемых на листе Excel, используя макрос

Question

Я работаю над листами Excel, используя macros.

Я хотел подсчитать количество столбцов, используемых в листе. я использовал:

ColLen = ActiveSheet.UsedRange.Columns(ActiveSheet.UsedRange.Columns.Count).Column

на конкретной книге, и это дало значение один больше, чем используемый число столбцов. В других нормальных книгах Excel это дает правильное значение.
Другая команда дает правильное значение для числа столбцов, а именно:

ColLen = Activeworksheet.Cells(1, Columns.count).End(xlToLeft).Column

Его другая часть т.е. число строк используется давая правильное значение во всех листах.

RowLen = ActiveSheet.UsedRange.Rows(ActiveSheet.UsedRange.Rows.count).Row

Любая подсказка, что может быть неправильным в этом листе? Я не могу объяснить его детали, как рассказала моя компания. Таким образом, может быть трудно ответить, поскольку это может быть нелогичным спросить. Если у вас есть какие-либо идеи, сообщите.

Answer 1

Чтобы получить столбцы, самый надежный код: (он работает под всех случаях)

Set rng = ws.Cells.Find(What:="*", _ 
      After:=ws.Range("A1"), _ 
      Lookat:=xlPart, _ 
      LookIn:=xlFormulas, _ 
      SearchOrder:=xlByColumns, _ 
      SearchDirection:=xlPrevious, _ 
      MatchCase:=False) 

If rng Is Nothing Then 
    LastCol = 1 
Else 
    LastCol = rng.Column 
End If 

`