Excelシートから値を取得
セルの値をVBA上で使いたい時のコード。
Sub sample()
‘ 変数の宣言
Dim strVal
Dim objWs As Worksheet
‘ シート指定 ①名前指定
Set objWs = Sheets(“Sheet1”)
‘ シート指定 ②一番左にあるシートを指定
Set objWs = Sheets(1)
‘ 値の取得
strVal = objWs.Range(“A1”)
End Sub
『Sheets(“Sheet1”)』は『Worksheets(“Sheet1”)』でもOK。
ただし、グラフシート(グラフ表示用のシート)を操作する場合、Worksheetsは使えない。
自分の備忘録としてコードのみ記載。この記述方法だけが正ではないので参考程度に。