「こんにちは」をExcel枠なしで表示させたい | |
---|---|
[196570] 「こんにちは」をExcel枠なしで表示させたい- ■親トピック/記事引用/メール受信=OFF■ □投稿者/ かん -(2025/04/30(13:04)) □U R L/ 次のことしたいのですが、教えてください。 1.自動実行する(Workbook_Open)。 2.msgboxを使い、"こんにちは"と表示させる。 3.そのmsgboxの背景にExcel枠を表示させない。 4.msgboxの「ok」をクリックしたあともExcel枠を表示させないで終了する。 5.すでに別のExcelが表示されていた時はそのExcelに影響を与えないよう配慮する。 別のExcelはそのまま残り、"こんにちは"と表示したExcelだけが消えるようにする。 特に3,4,5がうまくいきません。 ++++++++++++++++++++ OS ⇒Windows 11 Version⇒Excel 2019 ++++++++++++++++++++ |
[196572] Re[1]: 「こんにちは」をExcel枠なしで表示させたい- ■記事引用/メール受信=OFF■ □投稿者/ OK -(2025/04/30(18:21)) □U R L/ Application.Visible = False でアプリケーション事態を非表示にできますが、当然他のブックが 開いていたらそれも非表示になります。 また、アプリケーションが非表示の状態でエラーなどでユーザーフォーム 等が消えると見た目はエクセルが起動してないけど実際はエクセルが 起動している状態になります。 参考まで。 VBAの部品庫-Excelを非表示にする ht tps://vbanobuhinko.com/excel%E3%82%92%E9%9D%9E%E8%A1%A8%E7%A4%BA%E3%81%AB%E3%81%99%E3%82%8B/ APIを駆使すると出来るのかもしれませんが、詳しくはないので解説は出来ません。 |
[196574] Re[2]: 「こんにちは」をExcel枠なしで表示させたい- ■記事引用/メール受信=OFF■ □投稿者/ kazuo -(2025/04/30(19:41)) □U R L/ 失礼します。 個人的な用語を作成し使用するのはやめましょう。 1.「Excel枠」でググると枠線が出てきますが、たぶんかんさんのExcel枠では無いですよね? 想像するにブックを表示させないだと思われます。 そうならそのブックのThisWorkBookモジュールに記載すれば良いでしょう。 「エクセル vbaブックを非表示」でググってください。 2.別のExcelが表示されていた時 別のExcelというと通常別インスタンスで起動しているExcelをいいます。 そうなら何も気にする必要がありません。 これも想像するに別のブックのことだと思われます。 1と同じ方法で解決できます。 一例です。 Private Sub Workbook_Open() If Workbooks.Count = 1 Then Application.Visible = False Me.Windows(1).Visible = False メッセージボックス "こんにちは" 'エラーとなり投稿できないのでカタカナにしています Application.Visible = True 'デバッグ用 Me.Windows(1).Visible = True 'デバッグ用 ' Stop 'デバッグ用 If Workbooks.Count = 1 Then Application.Quit Me.Close False End Sub この記事にはVBAのコードが含まれています。 緑の太文字→注釈 茶色の太文字→条件分岐 赤の太文字→ループ 青の太文字→その他 |
[196576] Re[3]: 「こんにちは」をExcel枠なしで表示させたい- ■ ![]() □投稿者/ かん -(2025/04/30(20:32)) □U R L/ kazuo様 不適切な表現をしてしまい申し訳ありませんでした。 ご察知のとおりExcelブックのことです。 ご呈示のコードを試したところ思った通りに動作しました。 ありがとうございました。 |
このトピックに書きこむ |
---|