首页 > 代码库 > VBA excel中表示列的字母换成数字

VBA excel中表示列的字母换成数字

出自这里

数字转列标: Split(Cells(1,1).Address(1,0),"$")(0)    ‘将1-256替换红色的1就可以

Cells(1, a) 选中对应的第一行第A列的一个单元格;

Address的返回值为该单元格的绝对地址 ,如$A$1,即A列1行;

  它有4个参数,咱们直说前俩,第一个为行的绝对路径,默认为true,第二个为列的绝对路径默认为false

  a: Cells(1, 1).Address() "$A$1"

  b: Cells(1, 1).Address(1, 0)  "A$1"

  c: Cells(1, 1).Address(0, 1)  "$A1"

Split, "$"为[A, 1](0)为A

列标转数字就更简单:Range( "IV" & 1).Column    ‘将列标字母A-IV替换红色的IV就可以

  IV1单元格的列数。。。。

 

VBA excel中表示列的字母换成数字