麻辣家族討論版版 » Excel程式區 » 將cells的數字欄改為range的文字欄

返回列表下一主題上一主題發帖

[分享] 將cells的數字欄改為range的文字欄

　暱稱: 閔

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 172
主題: 39
精華: 20
積分: 177
點名: 0
作業系統: Microsoft Windows XP
軟體版本: Microsoft Office 2003
閱讀權限: 100
性別: 男
來自: 高雄
註冊時間: 2010-5-1
最後登錄: 2023-3-19

論壇貢獻勳章帥哥勳章

1^# 跳轉到 » 倒序看帖

字體大小: tT

發表於 2010-5-9 22:12 | 顯示全部帖子

[分享] 將cells的數字欄改為range的文字欄

Function Col(C%)
Col = IIf(C < 27, "", Chr(Int((C - 1) / 26) + 64)) & IIf(C Mod 26 = 0, "Z", Chr(C Mod 26 + 64))
End Function

樓主熱帖

收藏

靜思自在 : 口說一句好話，如口出蓮花；口說一句壞話如口吐毒蛇。

返回列表下一主題上一主題