![](http://oshiete.xgoo.jp/images/v2/pc/qa/question_title.png?e8efa67)
例えばaaaがある列を探し、その列番号は4で列文字がDですが、
列番号から列文字をvbaで取得する方法はありますか?
Sub Sample()
Dim i As Long
Dim Colmoji As String
i = Rows(1).Find(What:="aaa", LookAt:=xlWhole).Column
Colmoji = i 'ここで列文字に変換したい
MsgBox i & "の列文字は" & Colmoji & "です"
End Sub
このようなコードを作ってみたのですが列文字に変換する方法がわかりません。
![「最終列の列番号を列文字に変換することはで」の質問画像](http://oshiete.xgoo.jp/_/bucket/oshietegoo/images/media/0/29118321_5497ce58679b5/M.jpg)
No.4
- 回答日時:
Sub Sample()
Dim mm As Long
Dim nn As Long
Dim xRange As Range
Dim Colmoji As String
For nn = 1 To ActiveSheet.UsedRange.Rows.Count
Set xRange = Rows(nn).Find(What:="aaa", LookAt:=xlWhole)
If Not (xRange Is Nothing) Then
Colmoji = xRange.Address(True, False)
Colmoji = Left(Colmoji, InStr(Colmoji, "$") - 1)
Debug.Print "行:" & nn & "の列番号は" & Colmoji; ""
End If
Next
End Sub
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) 指定文字列が該当するA列をアクティブセルにするには 3 2022/08/17 13:18
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Visual Basic(VBA) Vbaで数式をポーランド記法に変換するコードを作って実行しようとするとフリーズします。 1 2022/05/24 17:53
- Excel(エクセル) B列に文字がはいったらA列に数字が入るマクロードを完成させたい 4 2023/04/21 01:58
- Visual Basic(VBA) 入力ボックスが繰り返しポップアップして止まらない。 下記コードでファイル名の変更をしたいのですが、変 1 2022/09/08 11:27
- Visual Basic(VBA) ファイル名の右側を変更したい ファイル名:「1001日別売上」の左側へ「2022」を追加し、「202 6 2022/10/14 10:03
- Visual Basic(VBA) オブジェクトが見つかりません 1 2023/06/24 19:43
- Visual Basic(VBA) 以下のVBAで該当文字列の前後に付与したい。 例 前に付与 abc ユーザーID 12345 後に付 3 2022/04/19 21:50
- Excel(エクセル) 製品番号での整列と、検索に関して 3 2023/06/28 19:20
- Visual Basic(VBA) Excelにて、シート1の行を削除するとシート2のシート1と同じ番号の行も削除したい 3 2022/05/08 04:24
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
再質問です。マクロの修正箇所...
-
VLOOKUPの列番号の最大は?
-
LEFT関数とIF関数の組み合わせ...
-
「段」と「行」の違いがよくわ...
-
エクセルで最初の行や列を開け...
-
CSVファイルの「0落ち」にVBA
-
エクセルで離れた列を選択して...
-
リストからデータを紐付けしたい
-
エクセルで複数列の検索をマク...
-
エクセルマクロの組み方
-
Excel文字列一括変換
-
列方向、行方向の定義
-
データシートビューのタイトル...
-
Excel 区切り位置指定ウィザー...
-
Excel 2007で複合グラフ(折線...
-
Excelの行数、列数を増やしたい...
-
セルの値が指定条件なら対象行...
-
エクセルマクロで表の途中の集...
-
Accessのレポートで繰り返し表...
-
列を1つずつ非表示にしたい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
エクセルで離れた列を選択して...
-
「段」と「行」の違いがよくわ...
-
VLOOKUPの列番号の最大は?
-
LEFT関数とIF関数の組み合わせ...
-
VBA 指定した列にある日時デー...
-
Alt+Shift+↑を一括で行うには、...
-
エクセルで住所を県と市・郡と...
-
エクセルで複数列の検索をマク...
-
Excelの行数、列数を増やしたい...
-
VBAで結合セルを転記する法を教...
-
エクセルマクロPrivate Subを複...
-
エクセルマクロの組み方
-
CSVファイルの「0落ち」にVBA
-
列方向、行方向の定義
-
リストからデータを紐付けしたい
-
エクセルのソートで、数字より...
-
Excel文字列一括変換
-
エクセルで最初の行や列を開け...
-
エクセルでセル12個間隔で合...
-
エクセル マクロ 範囲指定で...
おすすめ情報