Excel vba如何获取工作表的有效列数

Question

如题所述

Answer 1

Sub jiji()
Dim i
i = Sheet1.Range("iv1").End(xlToLeft).Column
MsgBox "第一行最后一个非空单元格列号为" & i
End Sub