「VBA」Range()で指定ワークシートのセル範囲に値を入力するサンプル

書式
If ワークシート変数名.Name = “ワークシート名"
使用例

Sub funcA()
  Dim ws As Worksheet
  
  'For Each コレクションWorksheets
  For Each ws In Worksheets
   'シート名SheetBarkgame
     If ws.Name = "SheetBarkgame" Then
     'セル範囲 C3:E6
       ws.Range("C3:E6").Value = "study skill in arkgame"
       End If
    Next
End Sub

 

Excel VBA

Posted by arkgame