[[20200517225250]] 『AAA〜ZZZを表記する為のVBAを教えてください。』(choco) ページの最後に飛ぶ

[ 初めての方へ | 一覧(最新更新順) | 全文検索 | 過去ログ ]

 

『AAA〜ZZZを表記する為のVBAを教えてください。』(choco)

初めまして。
VBAを始めたばかりで、詰まってしまい、、

AAAの値をAAB,AAC∼AAZまでインクリメントし
次のアルファベットを桁上げし、ABA,ABC∼ZZZまで
計算するコードを書きたいのですが、難しく
ご教授いただけると幸いです。

< 使用 Excel:Office365、使用 OS:Windows10 >


 Sub sample()
    Dim RW, a, b, c
    For a = 65 To 65 + 25
        For b = 65 To 65 + 25
            For c = 65 To 65 + 25
                RW = RW + 1
                Cells(RW, "A") = Chr(a) & Chr(b) & Chr(c)
            Next
        Next
    Next
 End Sub

(半平太) 2020/05/17(日) 23:44


ありがとうございます!助かりました(TT)
また、機会があればよろしくお願いします.

(choco) 2020/05/19(火) 10:34


コメント返信:

[ 一覧(最新更新順) ]


YukiWiki 1.6.7 Copyright (C) 2000,2001 by Hiroshi Yuki. Modified by kazu.