Finding the number of non-blank columns in an Excel sheet using VBA

Question

How do I find the number of used columns in an Excel sheet using VBA?

Dim lastRow As Long
lastRow = Sheet1.Range(\"A\" & Rows.Count).End(xlUp).Row
MsgBox         


        

Answer 1

This is the answer:

numCols = objSheet.UsedRange.Columns.count

Documentation of the UsedRange property