VB.NETで1→A、2→B、26→Z、27→AAの変換をしたい

質問

VB.NETなのですが、1、2、3などの数字を
エクセルの横軸のA、B、Cなどのように
対応するアルファベットに変換したいのですが、
良い方法があったらご教授頂きたいです。

回答No.2

redfox63 · ベストアンサー

引数の数値を Aや AA IVなどに変更する関数

Function n2column( n as Integer ) as String
　　dim nHi, nLo as Integer
　　dim ss as String = ""
　　' nを26で割った商を求める
　　nHi = n \ 26
　　' nの26での余りをを求める 1..26が求まるように工夫
　　nLo = (( n - 1 ) mod 26 ) + 1
　　if nHi <> 0 then
　　　　ss = String::Format("{0:c}{1:c}", Chr( &h40 + nHi ), Chr( &H40 + nLo ) )
　　else
　　　　ss = String::Format("{0:c}", Chr( &H40 + nLo ) )
　　end if
　　return ss
End Function

回答No.1

n-jun

数値から列を指定するExcelVBAでのサンプル。

Dim i As Integer
i = 5
Cells(1, i).EntireColumn.Select

あとは応用してみて下さい。