Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

53563 / 76736

←次へ　｜　前へ→


	【27985】Re:再度ファイルを開いた時に文字がある...

ponpon - 05/8/25(木) 22:15 -


	引用なし

	パスワード

▼素人さん：
これでは、まだよくわかりません。

シート"確認表"にユーザーフォームを使って入力
シート"確認表"は、伝票形式

ここまでは、できているんですね。

>伝票一覧に確認表で入力されたデーターを保存して、そのデーターを
>その他のデーター処理に使うつもりです。

シート"確認表"に入力されたデータをシート"伝票一覧"に転記してデータを保存していく。

ならば、シート"確認表"に入力されたどのデータを
シート"伝票一覧"のどこに次々に保存していくのでしょうか？

コードからすると、シート"確認表"のK5をシート"伝票一覧"のA列に
　　　　　　　　　　　　　　　　　D7をシート"伝票一覧"のB列に　でしょうか？

保存するデータは、この２つの値だけでしょうか？

それならば、シート"伝票一覧"の１行目に項目があるとして
Sub test()
　With Worksheets("伝票一覧")
　 .Range("A65536").End(xlUp).Offset(1, 0).Value = Worksheets("確認表").Range("K5").Value
　 .Range("B65536").End(xlUp).Offset(1, 0).Value = Worksheets("確認表").Range("D7").Value
　End With
End Sub
で　シート"伝票一覧"に次々に入力できると思います。

シート"確認表"に入力の時に、同時にシート"伝票一覧"に入力することも考えましたが、
入力間違えがあったときに、困りますので、別にした方がよいかと思います。

0 hits

▼

【27978】再度ファイルを開いた時に文字がある事を... 素人 05/8/25(木) 20:31