【Excel VBA】セルの値を変数に格納する方法

ワークシートのセルの値を変数に格納する

エクセルワークシートのセルに格納されている値を VBA の変数に格納したい場合があります。

例えば、ワークシートのセルに以下のように値が保存されていたとします。

この時、A1 セルの値を変数に格納して、その変数の値をメッセージボックスで表示する VBA は以下の通りです。

※上のワークシートの名前は 「Sheet1」だとします

Sub main()
    Dim cellValue As String
    
    cellValue = ThisWorkbook.Sheets("Sheet1").Cells(1, 1).Value
    
    MsgBox cellValue
    
End Sub

このマクロを実行すると以下のようにメッセージボックスが表示されます。

変数 cellValue に A1 セルの値が格納されていることが分かります。

上の VBA コードの中で、ワークシートとセルの指定をしている部分は以下の部分です。

• ThisWorkbook.Sheets(“Sheet1”).Cells(1, 1).Value

上では「.Cells(1,1)」と1行1列の位置を指定しているため A1 セルが対象になります。

ここで A2 セルを指定したかったら以下のように変更します。

• ThisWorkbook.Sheets(“Sheet1”).Cells(2, 1).Value

これで2行1列（A2セル）を指定できます。

同様に、

• B1セルを指定したい場合は 「.Cells(1, 2)」と指定
• B2セルを指定したい場合は 「.Cells(2, 2)」と指定

すれば OK です。

あわせて読みたい

Excel VBA マクロ作成用情報まとめ 【初学者向け情報】 【Excel VBA】初心者からマクロを作成できるようになるまでの学習ロードマップ 【Excel VBA マクロ独学者・初心者向け】VBA 学習の第一歩【このペー...