質問: マクロ初心者です。 エクセルで、A1.B1のセルに入力されている値をC1.D1に出力し、C1.D1に既に入力されている場合はC2.D2に出力以降C3.D3...と繰り返すにはどのようにすれば良いでしょうか。 拙い文章ですが、理解出来る方ご教授お願いします。
回答: 以下のようなコードでしょうか? ・「Private Sub CommandButton1_Click()」は実施環境にあわせてください。 ・データの最大(最終)はC列で判断しています。 Private Sub CommandButton1_Click() If (Range("C1").Value = "") Then Range("C1:D1").Value = Range("A1:B1").Value Else Cells(Rows.CountLarge, "C").End(xlUp).Offset(1).Resize(, 2).Value = Range("A1:B1").Value End If End Sub