【VBA】最大行，最大列

最大行：

Range("B" & Cells.Rows.Count).End(xlUp).Row

 最大列

colu = Range("XFD2").End(xlToLeft).Column
strColu = Num2Name(colu)

 

【VBA】列号与字母（列名）的相互转换 （自定义函数）