>vbsでexcelのクリアとフォームの表示をしたい入力中の回答があります。ページを離れますか?※ページを離れると、回答が消えてしまいますページを離れるA回答を続ける入力中のお礼があります。23:32回答数:1件お世話になっております。vbsの以下の記述でexcelを開いています。開くところまでは行くのですが、その後のsheet1のデータのクリアとUserForm1の表示がどうしてもできません。申し訳ありませんが、どなたかおわかりの方、教えていただけないでしょうか。"共同資料.xlsm"通報するこの質問への回答は締め切られました。いう名前のユーザーフォームが存在する。標準モジュールを作成し、以下のコードを書いておく。ありがとうございました。自営業やフリーランスといった個人事業主の方、副業をされている方はこの時期になると確定申告のお悩みや疑問があるものです。今回は教えて!gooに寄せられた確定申告について質問の多かった代表的なQAをテーマごとにまとめてみました。Basic(VBA)4エクセルVBAのフォームを最前面にする方法を教えてください。自営業やフリーランスといった個人事業主の方、副業をされている方はこの時期になると確定申告のお悩みや疑問があるものです。今回は教えて!gooに寄せられた確定申告について質問の多かった代表的なQAをテーマごとにまとめてみました。Basic(VBA)4エクセルVBAのフォームを最前面にする方法を教えてください。Sheet1に記述していたのですがうまく動きません。回答数ランキングです。職業恋愛アドバイザー・婚活アドバイザーこの専門家の回答をチェック他の専門家の回答をチェックこのQ&Aを見た人が検索しているワードフォームVBSユーザースクリプトファイルこのQ&Aと関連する良く見られている質問QVBSの「MsgBox」についてこんにちは。VBSをかじり始めなので、的外れだったらご容赦を。「こんにちは」の部分を太字にしたり、色をつけたり、等、目立つような表示にすることは可能なのでしょうか?(また、画像を挿入したりとか)よろしくお願いします。以前に似たような質問があり、答えております。参考URLを見てください。※MsgBoxについてhttp://oshiete1.goo.ne.jp/kotaeru.php3?q=405473※ダイアログにプレビュー表示http://oshiete1.goo.ne.jp/kotaeru.php3?q=157966画像を差し込むことも可能ですが、メッセージボックスを加工するより、フォームを利用したほうが、ずーっと楽です。一応サンプルを作りました。やってみて面白かったけど、やはりオリジナルを作ったほうがかなり楽だということを実感しました。注意:ここの掲示板は文字がずれるので、図形が壊れます。以下の文章をメモ帳などのテキストエディタにコピって読んでください。[I]・・・アイコン(クラス名:Static)[MSG_AREA]・・・メッセージ表示領域(クラス名:Static)[B1/B2]・・・ボタン(クラス名:Button)という構造になっていますメッセージボックスは指定のスタイルによりアイコンの有無・ボタンの数が変化します。メッセージ文字数により、メッセージの表示領域が変更され、ダイアログのサイズも算出されます。この大きさの計算は、ダイアログオブジェクトが創生される前に行われるため、フォントを指定したあと、独自で再配置をしなければなりません。この計算ロジックは非常にややこしいものです。※VBのMsgBox関数(またはAPIMassegeBox関数)内部で行われていると思われる手順(フックしてSpyで調べました)1.MSGの文字数/ボタンの数/アイコンの有無により、ダイアログの大きさの算出・各オブジェクトの配置位置の算出2.ダイアログ本体を創生3.ボタンをダイアログ内部に創生(複数のボタンが存在するとき、左側のボタンから創生)4.アイコンがあるならアイコンを創生5.メッセージを創生6.ボタンにフォーカスをセット7.画面に表示する(サンプルではここで操作しています)という順序のようです。サンプルは、画面に表示する直前にフォントを指定しています。上記で述べたとおり、各オブジェクトはすでにできあがってしまっているので、再配置が必要になります。Mainから実行するようにしてください。[myMsgBox関数]がオリジナルMsgBoxを呼ぶための関数です。Function'オブジェクトのリサイズ'(ここは作りこまないといけない。Function一応サンプルを作りました。やってみて面白かったけど、やはりオリジナルを作ったほうがかなり楽だということを実感しました。注意:ここの掲示板は文字がずれるので、図形が壊れます。以下の文章をメモ帳などのテキストエディタにコピって読んでください。※フォントサイズの設定を可能としたメッセージボックスのサンプルを載せました。VBの標準機能のみでは無理で、APIでMSGBOXを作り直すようなものなので、極めて面倒です。フォームで作ることをお勧めします。参考URL:http://oshiete1.goo.ne.jp/kotaeru.php3?q=384428他の回答も見るQエクセルVBAのフォームを最前面にする方法を教えてください。他のどのウインドウをアクティブにしても消えない状態にしたいのですが、どのようなコードを書けばできるでしょうか。Trueとなると思うのですが、エクセルVBAだとそのような書き方はないようです。もうしわけございませんがご教示頂きたく、お願いいたします。m(__)mAベストアンサーあらかじめ、フォームのプロパティの[ShowModal]をFalseにしておいて、以下のような方法ではダメでしょうか?画面のアクティブイベントを利用するのは、個人的に嫌いなのですが。Subあらかじめ、フォームのプロパティの[ShowModal]をFalseにしておいて、以下のような方法ではダメでしょうか?画面のアクティブイベントを利用するのは、個人的に嫌いなのですが。VBA】マクロでExcel自体を終了させたい環境:WindowsXP、Excel2003マクロでエクセルを終了(ブックを閉じて、アプリケーション自体も終了)させたいのですが、以下のコードではアプリケーションが閉じてくれません。ThisWorkbook.CloseExcObj.QuitApplication.Quitどこか悪いところはありますでしょうか?よろしくお願いします。普通に考えれば質問者のコードで上手くいきそうですがhana-hana3さんの回答にもあるようにThisWorkBook.Closeでコード終了となりますのでApplication.QuitをThisWorkBook.Closeの前にもってこないといけません。Application.Quitはそれがあるプロシージャのコードが全て終わるまでその実行を保留するちょと特別動作をします。'-------------------------------------Application.QuitThisWorkbook.Close'-------------------------------------他の回答も見るQVBSでブラウザ上のテキストボックスに文字列を打ち込み、ボタンを押す方法VBSでブラウザ上のテキストボックスに文字列を打ち込み、ボタンを押す方法を教えてください。現在、下のような方法で行っているのですが応用が利かないので改善したいと思っています。"{ENTER}"操作したいページのソースの一部を抜粋すると下記のようになっています。onClick="javascript:execute・・・・略うまく操作できる方法を教えてください。VBSでブラウザ上のテキストボックスに文字列を打ち込み、ボタンを押す方法を教えてください。現在、下のような方法で行っているのですが応用が利かないので改善したいと思っています。"{ENTER}"テキスト領域でエンターするとsubmitになるのでエンターをsendkeysするのはありだとおもいますよ他の回答も見るQ配列で格納したものをmsgboxで表示する方法について教えてください。a(i)の配列で、たくさん格納したものを、MSGBOXで表示したいと思います。・・・と表示してしまうと、いくつまで表示したらよいかわからなくなってしまいます。最後の一つしか表示されませんし・・・。いう場合どのように対処していますか?どうぞよろしくお願いします。