「Excel VBA」アクティブなシート名を取得するサンプル

2021年3月16日

書式
シートの数 Worksheets.Count
現在のシート名 ActiveSheet.Name
使用例

Sub sampleC()
 '全てのシート名
 For i = 1 To Worksheets.Count
      Debug.Print Worksheets(i).Name
  
 Next
 
 '現在のアクティブなシート名
 actName = ActiveSheet.Name
 Debug.Print actName
    
End Sub

 

Excel VBA

Posted by arkgame