| |
ponponさん Hirofumiさん
こんにちは。お礼が遅くなりました。
早速丁寧なご解答ありがとうございました｡
大変良く分かりました｡このようなコードで表現することの素晴らしさを
理解しました｡
コマンドボタンで､入力データをシートに転記するコードを書きました
A列はうまくいきますが、B,C列は一行下にデータが転記されます(AからCまで
一行でそろいません）。どこが問題なのでしょうか？
もしご覧になっておられましたら､よろしくお願いします｡
Private Sub CommandButton1_Click()
Dim i As Integer
For i = 0 To 2
Range("A65536").End(xlUp).Offset(1, i) = UserForm1.Controls("TextBox" & i + 1).Value
Next
End Sub
Hirofumiさん
非常に長いコードで私が理解できるまでに､時間がかかりそうです｡
大切にコードを保存してじっくり勉強させていただきます｡
ご指摘の通り､住所録のチェックと入力に活用する予定です｡
本当にありがとうございました｡
これからもよろしくご指導のほどお願いします｡
|
|
Tomi
- 06/9/18(月) 14:34 -
