エクセルVBAのように1→A、2→Bといったように変換したい

Question

お世話になっております。
A,B,C,D,E,F・・・と番地を持たせたデータベースのデータに対して、
配列にして処理を行いたいと思っています。

For i as integer = 1 to 10
'処理
Next

ネット検索したところ、以下のようなページが見つかりましたが、
明確に答えられているわけではなく、自分の知識では応用して導くことはできませんでした。
https://oshiete.goo.ne.jp/qa/4221567.html

以上、分かる方おられましたらご教授お願いします。

Comments

[sinya0320]

1→A変換は、提示の参考サイトのものがそのまま使えると思います。
それを使ってみたうえで、何に困っていろのかを具体的に話された方が良いと思います。
提示されてるコードもForだけで、何をどうループさせたいのかも不明ですし。

[hanbee.com]

ありがとうございます

[Daregada]

Zより後(AAなど)が存在するかどうかを明記してください。

[hanbee.com]

Ｚより後については要らないです。
正直A,B,C,D,E,Fだけでいいです。
変わってくるのですね。

Answer 1

Chr( &h40 + i )

でやってみよう

Comments

[hanbee.com]

やってみました。とりあえず、エラーは出ていなさそうなので、全部直せたらデバッグして確かめてみようと思います。ありがとうございます。

[y_waiwai]

ZのあとはAA、AB、ACと続ける必要があるなら一工夫必要ですね

[hanbee.com]

できました。ありがとうございます。
しかし、謎な形の関数なのですね。

[hanbee.com]

ちなみに、この関数はA→1,B→1も同様にしてできるのでしょうか。
これも追加で必要そうなのです。。。

[y_waiwai]

&h40ってのは１６進数の数値の記述形式で、１０進で言うと６４のことです
んで、'A'という文字の文字コードは６５、'B'は６６、'C'は６７，と順番に並んでるので、
Chr(64+i)
で、数値に対応したアルファベットが得られます
同様に、'0'という文字は32でそこから順番に並んでるので、
Chr(32+i)
で、数字の文字が出てきます

[hanbee.com]

ご丁寧にありがとうございます。&h40は10進数なのですね。なるほど。
しかし、ご提示いただいたコードでは「i」にアルファベットは入れられませんよね。
Aという文字を1に変えたいのですが、これは難しそうですね。
時間がかかりそうなので、違う方法でやることを検討します。
chr(&h40+i)が知れてよかったです。