Dim valueSheet2 As String
valueSheet2 = Sheets("Sheet2").Range("A1")
MsgBox ("valueSheet2 is : " + valueSheet2)
Dim valueSheet2 As String
Sheets("Sheet2").Select
valueSheet2 = Range("A1")
MsgBox ("valueSheet2 is : " + valueSheet2)
いずれも"Sheet2"のシート、"A1"の位置の値を取得してメッセージボックスで表示するコード。
自シートの場合は、Sheets("[シート名]")の指定は不要。(単にRange("[セル位置]")で取得できる)
別シートにある場合は、Sheets("[シート名]").Range("[セル位置]")と記述する必要がある。
0 件のコメント:
コメントを投稿