shiawasenataiyouアクセスVBAテキストボックスやコンボボックスを全部クリアするにはツイートシェアはてブLINEPocketアクセス担当のまみです。フォーム上のテキストボックスやコンボボックスに入力した値を消してくれるクリアボタンってとっても便利ですね。ボタン一つで全部消してくれる!そんな処理を可能にしてくれるコード自体はとっても簡単なんだけど、テキストボックスやコンボボックスの数だけ必要なんです。私も全部まとめてクリアする方法なんて知らなかった頃、一つずつ書く方法しかないのかなぁ。何かいい方法ってないのかなって思ってました。まとめてクリアする方法を知ってからはとっても重宝しています。今回は、全部まとめてクリアする方法をお伝えしますね。実際に使用したいファイルがある場合にはそのファイルでやってみてくださいね。ここでは、説明のために「営業日報」ファイルを使用します。同じファイルを使用したいなって場合は下記の記事から順番に作成してみてくださいね!【アクセス】コンボボックスにテーブルの値を表示させよう2018年10月24日ファイルの準備ができたら、「F_営業日報」フォームをデザインビューで開きましょう。「F_営業日報」フォームにクリアボタンを配置しましょう。クリア1「btnクリア」を選択した状態でプロパティーシートの2「イベント」タブを選択して、クリック時に「イベントプロシージャ」を選んでコードの画面を表示します。Sub」の間に下記のコードを追加しましょう。Control・・・変数clearを使わせてくださいねって宣言しています。Next・・・オートナンバー型があったりとかでエラーがあっても無視してねって意味です。acComboBox・・・ここでテキストボックスとコンボボックスを指定しています。id=2](はてな君)じゃぁテキストボックスしかない時はacTextBoxだけ書けばいいってこと?(あいちゃん)そうそうそういうこと!何を配置しているか、何をクリアしたいかで指定してあげるんです!そうすることで数に関係なくテキストボックスやコンボボックスを探してくれてクリアしてくれます!では「F_営業日報」をフォームビューに切り替えて動作確認してみましょう。何かデータを入力して、「クリア」ボタンを左クリック!(はてな君)クリアされた~!これって他のところにも使えるんでしょう?(あいちゃん)テキストボックスやコンボボックスの名前に関係なくどこでも使えますよ!(はてな君)登録ボタンのところをこのコードに書き換えたい!(あいちゃん)はてな君さすがですね!これから説明しようとしていたところだったんです!では、登録ボタンの現在のコードを見てみましょう。赤枠で囲ってある部分が、クリア処理の部分です。一つずつクリア処理書いていくにはそろそろ限界?な量になってきてますね。この部分を今回のコードに書き換えちゃいましょう。動作確認もしっかりしておいてくださいね!まとめテキストボックスやコンボボックスの名前に関係なく、まとめてクリアできるってとっても便利ですよ。