そのため、ワークブックにあるすべてのシートの 1 つの列から情報を取得しようとしています。現在506枚あります。それぞれに異なる数の行があり、各シートには独自の一意の名前があります。必要な各シートのデータは行 8 から始まり、それは列 J にあります。これらすべてを、同じブック内にある test と呼ばれるページの C 列に印刷しようとしていますが、506 にはカウントされません先ほど紹介したシート。これは私がこれまでに書いたものです：
Sub Test()
Columns(3).Insert
For i = 1 To i = 506
Do While Worksheets(i).Cells(i + 7, 10) <> Null
Worksheets("test").Cells(i, 3) = Worksheets(i).Cells(i + 7, 10)
Loop
Next i
End Sub
私は今日これを始めたばかりですが、他の多くの言語での経験があるため、構文も多少ずれている可能性があります。
天才的な人が提供できるアドバイス/ヒントを事前にありがとう