14. 03.シート　シートをアクティブにする　　
Option Explicit
Option VBASupport 1

REM  *****  BASIC  *****

Sub Main

'シートの選択
Dim sheet As Worksheet
sheet = Sheets("テストシート")
sheet.Cells(1,"B") = "TestMsgB1"

'シートをアクティブにする
sheet.Activate

End Sub


前へ ／ 次へ