質問: vba ユーザーフォームから入力する 添付のユーザーフォームから入力してsheet1に反映させたいです。 自分で組んでも上手くいきません。本当は勉強のために自分でデバックから手直ししていくのが一番いいのですが、今回は時間が(仕事の締め切りが)迫っているので丸投げでお願いしたいと思います。 *種別を選択してない場合はmsg「種別が選択されてません」で選択しない場合は登録できないようにしたい *種別を選択したらsheets1のc列に「レギュラー・ハイオク・軽油」の文字を登録したい *登録ボタンをクリックしたらsheets1に反映させて、入力した値をクリアしたあと続けて入力を進めたい *終了ボタンをクリックしたら「終了しますか?」のmsgで「はい」でフォームを閉じる 以上です。 本当に丸投げで申し訳ないのですが、どなたかご教授ください。
回答: たいへん、すみませんでした。 #2の最初の1行が抜けていました。 その1行を加えて様子をみてください。 '// private ar as variant '←この行を写し損ねました。 private roil as range '種別の書き込み場所 private cmbflg as boolean