VBAを使用してシート名でさまざまなシートからデータを取り出す

Question

メインシート「Monthly collection reeport」と日付付きシートがあります。私は、すべてのシート（全列C14〜D14のみ）からB1〜B13列のシート名を持つメインシート「Monthly」（C4-D14）にデータをプルする必要があります。

Answer 1

ので、最終的なコードは

Answer 2

ニーズにこれを調整します。

Sub xxxxx() 
Dim j As Integer 
x = Sheets.Count ' count no of sheets 
For j = 1 To x - 1 
Range("a" & j) = Worksheets(j + 1).Name ' main sheet must be the first, run code from main sheet 
Next 
End Sub