首页 诗词 字典 板报 句子 名言 友答 励志 学校 网站地图
当前位置: 首页 > 教程频道 > 开发语言 > VB >

“53”转化成“BA”?该如何解决

2012-03-03 
“53”转化成“BA”?我需要拿到Range( BA3:CE3 ).Select,但我现在只能拿到行数和列数row3,col_fst53,col_l

“53”转化成“BA”?
我需要拿到Range( "BA3:CE3 ").Select,但我现在只能拿到行数和列数row=3,col_fst=53,col_last=83,那有没有什么方法把53转化成BA,83转化成CE呢,

[解决办法]
Excel 也支持格式 R3C83,不用转成 BA3
[解决办法]
dim aa() as string

aa()=split(range( "a2 ").address, "$ ")
column=aa(1)
[解决办法]
dim aa() as string

for i=53 to 83
if range( "a3 ").offset(3,i)= " " then
aa()=split(range( "a2 ").address, "$ ")
column=aa(1)
end if
next
[解决办法]
msgbox chr(col_fst\26+64) & chr(col_fst mod 26+64) & cstr(row) ": " & chr(col_last\26+64) & chr(col_last mod 26+64) & cstr(row)

热点排行