- ベストアンサー
Excelのフォームを閉じる方法
ExcelのVBA を勉強し始めた初心者です。 Excelでシートにデータを入力していく為に、フォームを作りました。 そこで、コマンドボタンをクリックして、フォームを閉じるようにするには、どういった記述をすればいいのでしょう? バージョンは2002です。 お願いします。
- Good-Man123
- お礼率76% (138/180)
- オフィス系ソフト
- 回答数3
- ありがとう数5
- みんなの回答 (3)
- 専門家の回答
質問者が選んだベストアンサー
こんにちは。 Form上にCommandButtonを置き、Clickイベントに Private Sub CommandButton1_Click() Unload Me End Sub Meで指定しておくと オブジェクト名を変更しても動作します。 VBE画面に戻るのはVBE画面から実行しているからでしょう。 シートにCommandButtonを置きClickに Private Sub CommandButton1_Click() UserForm1.Show End Sub のようにするか、標準モジュールに Sub Form_Show() UserForm1.Show End Sub のようにして、マクロ実行から呼べばExcel画面のままで終わるハズです。
その他の回答 (2)
- nihonjinn
- ベストアンサー率39% (79/200)
unload form1 フォームをアンロードして破棄する。(フォームを閉じる) ・終了ボタンに記述してよく使用する。 とありました。.Hideは「隠す」だけなのかも 私もマクロに関しては素人で先日必要に迫られて作ったときに.Hideを使用してうまくいったのですが。
お礼
ご返答ありがとうございます。 こちらもちゃんと閉じました。 参照のHP役に立ちそうですので、お気に入りに追加させてもらいました。 ついでで申し訳ないんですが、フォームを消すと、通常VBの画面に戻りますが、シートのままにすることは可能ですか?
- nihonjinn
- ベストアンサー率39% (79/200)
フォーム名.Hideかな?
お礼
早速のご返答ありがとうございます。 やってみたところ、見事に閉じました。 ついでで申し訳ないんですが、フォームを消すと、通常VBの画面に戻りますが、シートのままにすることは可能ですか?
関連するQ&A
- VBAエクセルのフォームについて
お世話になっております。 VBAエクセルのフォームについて教えていただきたいのです。 VBAで入力のフォームを作ったのですが(TEXT BOXが4つ、コマンドボタン1つ、コマンドボタンを押したときに登録される用にしたい) 各シートの集計にしたい為、各シート(31のシートがあります)に入力フォームがあります、その各シートでの入力結果を1つのシートに 集計したいのですが、どの様なコードにしたらようか判りません。 素人のためお手数ですが、なるべく判りやすくお願いします。 よろしくお願いします。
- ベストアンサー
- オフィス系ソフト
- エクセルのユーザーフォームの作り方で
エクセルのVBAの初歩的なことで教えてください。小学生の子供用の学習ソフトを試作しています。シート1を問題の表示画面とし、シート2に問題のデータを保存しています。学習者はシート1を見て、最初に名前や使った日をユーザーフォームに入力すると、そのデータがシート1の表示されていない下の方のセルに記録されるようにマクロを組んで作りました。そのユーザーフォームを、シート1に作ったコマンドボタン(テキストは「開始」としました)を押すと表示されるようにしたいのです。そのためのコマンドボタンをどのように作ればよいでしょうか。ユーザーフォームの方は、マクロを実行すれば立ち上がり正常に入力(登録)できます。VBAの本を読んで独学で勉強し始めたばかりですので、できればわかりやすく教えてください。
- ベストアンサー
- その他MS Office製品
- Excelで入力フォームの作成方法
Excelについて質問です。 住所管理ファイルを作っています。 入力できやすいように、コマンドボタンを押すと入力フォームが表示されて入力できるように設定したいと思っています。 Accessでは簡単に作成できますがExcelではVBAなどのコードを記述しなければできないのでしょうか? 何か良い方法はありますでしょうか?
- 締切済み
- オフィス系ソフト
- エクセルのユーザーフォームについて
エクセルのユーザーフォームについて教えてください。 ユーザーフォームにてメニュー画面を作成しました。 ユーザーはメニューからの操作だけでエクセルシートを作成できるようなマクロをつくりました。 ユーザーフォームのコマンドボタンでEXCELを終了させることはできますか? VBAの記述方法も教えてください。
- ベストアンサー
- オフィス系ソフト
- BVAユーザーフォーム上でのオプションボタンについて
BVAを3時間前から勉強しだした超初心者です。よろしくおねがいします。 エクセルVBAのユーザーフォーム上でオプションボタンをA・B・Cと3つ、コマンドボタンを1つ作成します。 A・B・Cのどれかを選択した状態でコマンドボタンをクリックしたときに、シート1のA列2行目から下に順番にデータとして、Aをクリックしたときにはa、Bをクリックしたときにはb、Cをクリックしたときにはcが入力されるようにコードを作りたいです。 今試行錯誤して作ったものは、オプションボタンをクリックした時点でシート1に入力されてしまうため困っています。
- ベストアンサー
- Visual Basic
- Excelの検索フォームの作成方法を教えてください
添付画像のように、Excelに入力されている値があるとします。 これを別シートにフォームを作成し、下記のように検索・値をmsgboxで返す仕組みを作成したいです。 ●「検索開始」というボタンを作成し、ボタンをクリックすると、検索窓が表示される。 ●検索窓に名前を入力し、検索ボタンをクリックすると、元データのその名前の下に記載してある番号を msgboxに表示する。 (例) 検索窓に「山田 太郎」と入力して検索をクリックすると、「123」とmsgboxに表示されるようにしたい。 こちらの方法を教えて頂けないでしょうか。 VBAで記述する必要がある場合、コードを教えてください(><)
- 締切済み
- Excel(エクセル)
- エクセルVBA ユーザーフォームの終了について
エクセルVBAでユーザーフォームを作成しています。 コマンドボタンにVBAマクロを割り当てしているのですが 思うように動いてくれないので質問します。 コマンドボタンをクリックしたら望む動作 1、ワークシートを選択 2、その後、ユーザーフォームを消す。 と言う動作にしたいのですが、2の ユーザーフォームを消す方法、書き方が分かりません どなたか教えていただけないでしょうか 1の動作は以下のように書いています。その後の書き方を お願いします。 Private Sub CommandButton8_Click() ブック名 = "VBA演習" シート名 = "sheet1" Workbooks(ブック名 & ".xls").Worksheets(シート名).Activate End Sub (ユーザーフォームの名前は"テストフォーム"としてます)
- ベストアンサー
- オフィス系ソフト
- フォームでデータベースの内容を表示するには?
VBA初心者です。 データベースの入力用にフォームを作成しました。 登録コマンドボタンをクリックすると、フォームに入力した内容が、データベースの各項目に反映されるようになっています。 このフォームでは、いくら各項目に入力しても、登録ボタンを押さない限り、データベースには反映されません。もちろんフォームからこれまで入力したデータベースの内容は見ることができません。 しかし先日、Excelの文書件名簿ソフトで、項目1つ1つ入力するごとに、その都度データベースに反映されていくものがありました。 「次のページ」コマンドボタンはありますがこれを押す前にすでにフォームに入力した項目はデータベースに反映されています。 「前のページ」ボタンもあり、これを押すとこれまで入力してきたデータが順番にフォームで見ることができます。 このようなフォームはどのように作ればよろしいでしょうか?
- ベストアンサー
- オフィス系ソフト
- エクセルでフォームを開きたい
マクロを登録して、表の上部に「時間入力」というボタンを作って、そのボタンを押した際に A3からE45を範囲され、データ>フォームを開くということがしたいです。 マクロの記録でやろうと思ったら、フォームを開いたままの状態で「終了」はクリックできないんですね>< バージョン:エクセル2003 です。 手順など教えていただけると幸いです。 よろしくお願いします。
- ベストアンサー
- その他MS Office製品
お礼
ご返答ありがとうございます。 確かにコマンドボタンからの実行では問題ないですね。 些細なことに気付かないっというのも、自分自身情けないです(笑)。