Django Girls and Boys 備忘録

Python、Selenium、Django、java、iPhoneアプリ、Excelマクロなどで気付いたこと、覚えておきたいことなどを載せていきます。

【Excel VBA】セル参照形式をVBAから変更する方法(A1形式、R1C1形式)


Excelにて作業をしている時に列番号がいつの間にかアルファベットから数字に変わっている時があります。

 

なんとなく気になるのでアルファベットに戻したいと思った時がありました。

列番号の数値表記をExcelの設定変更でアルファベット表記へ戻す方法は先日備忘録として残しておきました。

 

今回は、ExcelVBAからセル参照形式をA1形式からR1C1形式へ、または、R1C1形式からA1形式へ変更する方法の説明になります。

 

 

 

目次

 

1.VBAでセル参照形式をA1形式とR1C1形式の間で切り替える方法

 

VBAでこのセル参照形式をR1C1形式からA1形式に戻す方法は以下のようになります。

 

元々列番号が数値表記(R1C1形式)で以下を実行すると、アルファベット表記(A1形式)に変更されます。

 

'Excelの列番号表示形式設定:A1形式
Application.ReferenceStyle = xlA1

 

逆に、元々列番号がアルファベット表記(A1形式)で以下を実行すると、数値表記(R1C1形式)に変更されます。

 

 

'Excelの列番号表示形式設定:R1C1形式
Application.ReferenceStyle = xlR1C1

 

2.セル参照形式変更内容をボタンに割り付けて切り替える方法

 

 

もう1つですが、ボタンを1つ作成して、クリックされた時に実行するコードの中身に以下を記載すると、そのボタンをクリックするたびにセル参照形式が切り替わります。

 

元々列番号がアルファベット表記(A1形式)の時は数値表記(R1C1形式)に変わり、反対に列番号が数値表記(R1C1形式)の時はアルファベット表記(A1形式)に変わります。

ボタンをクリックするたびに繰り返し変更されます。

 

 

Sub button_click()
    If Application.ReferenceStyle = xlA1 Then
        Application.ReferenceStyle = xlR1C1
    Else
        Application.ReferenceStyle = xlA1
    End if
End Sub

 

 

 

関連記事:

【Excel VBA 文字列変換】大文字小文字変換方法、全角半角変換方法 - Django Girls and Boys 備忘録

 

【Excel VBA】文字列比較演算子「like」の使用方法 - Django Girls and Boys 備忘録

 

【Excel VBA】ファイル一覧やファイル有無確認に使われるDir()の使用方法 - Django Girls and Boys 備忘録

 

【Excel】プルダウンリストの設定方法 - Django Girls and Boys 備忘録

 

【Excel VBA】プルダウンリスト(ドロップダウンリスト)作成方法とセル表示形式(R1C1形式)でエラーになった時の対処方法 - Django Girls and Boys 備忘録

 

【Excel VBA】シートをPDF形式で保存する方法 - Django Girls and Boys 備忘録

 

【Excel VBA】行の高さの取得、調整、自動調整をする方法 - Django Girls and Boys 備忘録

 

【Excel VBA】セル参照形式をVBAから変更する方法(A1形式、R1C1形式) - Django Girls and Boys 備忘録

 

【Excel VBA】改行コード(CR、LF、CRLF)の使用方法 - Django Girls and Boys 備忘録

 

【Excel VBA】ソースコードの改行方法 - Django Girls and Boys 備忘録

 

【Excel】の「開発」タブを表示させる方法 - Django Girls and Boys 備忘録

 

【Excel】ボタンの表示文字を改行する方法 - Django Girls and Boys 備忘録

 

【Excel】プルダウンリスト 設定方法、元データ追加方法、元データ変更方法 - Django Girls and Boys 備忘録

 

【Excel VBA】結合セルのコピー方法について - Django Girls and Boys 備忘録

 

【Excel VBA】あるシートのセル範囲に変更があった時に処理を実行する方法 - Django Girls and Boys 備忘録

 

【Googleサーチコンソール Googleアナリティクスの登録方法】サイト作成後の分析、活用に欠かせない登録 - Django Girls and Boys 備忘録

 

【Excel 名前の定義】「名前"○○○"は既に存在します。この名前にする・・・」のメッセージ表示を解決する方法 - Django Girls and Boys 備忘録

 

【Excel マクロ(VBA) 行削除】条件を満たした行を削除する方法(For~Next文を使用) - Django Girls and Boys 備忘録

 

【Excel マクロ(VBA)】最大行番号、最大列番号を取得する方法 - Django Girls and Boys 備忘録

 

【ExcelマクロからのI.E.操作】I.E.のセキュリティに絡むエラー(オートメーションエラー)発生時の対応方法 - Django Girls and Boys 備忘録

 

【Python Excel】ExcelからのPython実行ファイル(アプリケーションファイル)起動方法 - Django Girls and Boys 備忘録

 

【Excel VBA】シート削除時などに確認メッセージを表示しない方法 - Django Girls and Boys 備忘録

 

【Excel】数式の計算方法について、計算方法の自動/手動変更方法 - Django Girls and Boys 備忘録