ここでは、ExcelのVBA・マクロで現在選択しているセルの値を取得する方法を紹介します。

現在選択しているセルの値を取得するには、ActiveCellを使います。さらにセルの値を取得するには、valueプロパティを参照します。

＜サンプル＞
Sub test1()

Dim s As String
s = ActiveCell.Value
Range(“B3”).Value = s

End Sub

ここでは、文字列型の変数sを宣言し、現在アクティブなセルの値を取得しています。
最後に、セルB3に現在アクティブなセルの値をセットしています。