質問: Excel VBAについて。
回答: 別シートのどこに転記するのでしょうか。 Sheet1 から Sheet2 の同じセルに転記するとしたら For i = 1 To 5 If i mod 2 = 0 Then Sheet2.Cells(i, 4) = Sheet1.Cells(i, 4) Else Sheet2.Cells(i, 1) = Sheet1.Cells(i, 1) End If Next