楼主: warrenzhang
4891 4

一个很基础的问题:怎样将数字表示的列转为字母表示的列? [推广有奖]

  • 0关注
  • 3粉丝

已卖:290份资源

副教授

62%

还不是VIP/贵宾

-

威望
0
论坛币
4239 个
通用积分
2.3755
学术水平
64 点
热心指数
76 点
信用等级
54 点
经验
623 点
帖子
864
精华
0
在线时间
686 小时
注册时间
2007-3-9
最后登录
2011-8-4

楼主
warrenzhang 发表于 2010-5-11 10:20:43 |AI写论文

+2 论坛币
k人 参与回答

经管之家送您一份

应届毕业生专属福利!

求职就业群
赵安豆老师微信:zhaoandou666

经管之家联合CDA

送您一个全额奖学金名额~ !

感谢您参与论坛问题回答

经管之家送您两个论坛币!

+2 论坛币
我现在有一个整数i,表示一个工作表的第i列,要把它转化为用字母表示的列,即:
i=1转化为“A”
i=2转化为“B”
。。。
i=26转化为“Z”
i=27转化为“AA”
。。。


不高兴编程了。有没有VBA的内部函数或excel的内部函数做这件事情?
二维码

扫码加我 拉你入群

请注明:姓名-公司-职位

以便审核进群资格,未注明则拒绝

关键词:数字表 字母表 EXCEL exce xcel 基础 数字 字母

沙发
gssdzc 在职认证  发表于 2010-5-11 10:32:23
呵呵。顶起来。。。。。

藤椅
warrenzhang 发表于 2010-5-11 10:51:42
算了,还是自己写一个吧,抛砖引玉。
Function int2col(i As Integer) As String
If (i - 1) \ 26 < 1 Then
    int2col = Chr(i + Asc("A") - 1)
ElseIf (i - 1) \ 26 >= 1 And (i - 1) \ (26 ^ 2) < 1 Then
    int2col = Chr((i - 1) \ 26 + Asc("A") - 1) & Chr((i - 1) Mod 26 + Asc("A"))
Else
    int2col = Chr((i - 1) \ 26 ^ 2 + Asc("A") - 1) & Chr((i - 1) \ 26 + Asc("A") - 1) & Chr((i - 1) Mod 26 + Asc("A"))
End If

End Function

板凳
controlpanel 在职认证  发表于 2010-5-11 13:46:08
用r1c1模式下的indirect函数就可以

报纸
241king 发表于 2014-12-16 15:20:46
[em07][em07]

您需要登录后才可以回帖 登录 | 我要注册

本版微信群
加好友,备注cda
拉您进交流群
GMT+8, 2025-12-21 09:06