電子書籍の厳選無料作品が豊富!

ユーザーフォーム初心者です。

売上日報をユーザーフォームで作成しようと本やネットで勉強しているのですが、行き詰ってしまいました。
 
「営業日」「組数」「人数」「売上」を入力し 登録ボタンを押すと"売上シート"の同じ日付の行に転記されるようにしたいのですが、どうかお知恵をお貸しください。

初めての質問でいろいろとご不快な点もあるかもしれませんがよろしくお願い致します。

「ユーザーフォーム売上日報 別シート 同じ」の質問画像

A 回答 (1件)

ユーザーフォーム以外のそれなりの知識はあるのでしょうか?


ザックリとした流れは
1.テキストボックス「営業日」の日付と同じ行を探す。
ただし、
http://officetanaka.net/excel/vba/tips/tips131b. …
のように、通常の検索と違い日付(特にシリアル値の場合)はややこしいのですよ。

2.(見つかれば)該当のセルにテキストボックスの値を入力する

If FoundCell Is Nothing Then
MsgBox "検索に失敗しました" ’見つからない時のエラー処理はここで!!
Else ’本命はこちら
 FoundCell.Offset(0, 1)= textbox(”組数”).value
 FoundCell.Offset(0, 2)= textbox(”人数”).value
 FoundCell.Offset(0, 3)= textbox(”売上”).value
End If

っといった感じです。
尚、 textbox(〇〇).valueとはユーザーフォーム上の該当textboxを特定できるものを示しています。

これを、
Private Sub 登録_Click()
等の、コマンドボタン(登録)がクリックされた時に起きるプロシージャーに記載すればいいのです。
    • good
    • 1
この回答へのお礼

早速の回答、ありがとうございます。恥ずかしながら本当のVBA初心者で少しだけ関数が理解出来るようになったレベルです。
正直に申し上げて、あなた様の回答を理解できるレベルにありませんでした。MATCH関数を入れて出来るのかな?と安易に考えておりました。しかしながら貴方様のおかげで勉強する方向性が見つかりそうです。頑張ってレベルを上げていきます。せっかく回答してくださったのに申し訳ありません。

お礼日時:2020/12/11 19:13

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!