タブからデータをプルするためのマクロが必要

Question

私のスプレッドシートには、他のシートから収集してテーブルを作成する情報を表示する1つの「メイン」シートがあります。私は各情報シートで同じ4つのセルから情報を取得する必要があります。それが引くデータは、名前、稼働時間などであり、セルc1、d1、u11、およびi20からのものです。

従業員数によってシート枚数が異なる場合がありますが、メインシートのa1にセルを入れて従業員数を示すことができます。それぞれのタブは従業員の名前が付けられていますが、Excelでバックグラウンドで何らかの番号が付けられることを期待していますか？

Answer 1

次のコードは、メインシートがブック内の最初のワークシートであることを前提としています。最初の列には、個々の従業員の名前が表示されます（シートには従業員の名前が付けられます）。

Sub GetInfo() 

     Dim intCounter As Integer 

     For intCounter = 2 To Worksheets.Count 
      Worksheets(1).Cells(intCounter, 1) = Worksheets(intCounter).Name 
      Worksheets(1).Cells(intCounter, 2) = Worksheets(intCounter).Range("C1").Value 
      Worksheets(1).Cells(intCounter, 3) = Worksheets(intCounter).Range("D1").Value 
      Worksheets(1).Cells(intCounter, 4) = Worksheets(intCounter).Range("U11").Value 
      Worksheets(1).Cells(intCounter, 5) = Worksheets(intCounter).Range("I20").Value 
     Next 
    End Sub