Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
891 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【77786】最小化→最大化 勉強中 15/12/22(火) 14:30 質問[未読]
【77787】Re:最小化→最大化 β 15/12/22(火) 15:50 発言[未読]
【77788】早速の返信、ありがとうございます。 勉強中 15/12/22(火) 16:55 発言[未読]
【77789】Re:早速の返信、ありがとうございます。 β 15/12/22(火) 17:38 発言[未読]
【77791】Re:早速の返信、ありがとうございます。 β 15/12/22(火) 22:44 発言[未読]
【77792】Re:早速の返信、ありがとうございます。 勉強中 15/12/23(水) 0:00 お礼[未読]
【77793】Re:早速の返信、ありがとうございます。 勉強中 15/12/23(水) 0:44 お礼[未読]
【77786】最小化→最大化
質問  勉強中  - 15/12/22(火) 14:30 -
引用なし
パスワード
   ファイルを開く際、Excelを最小化（Application.WindowState = xlMinimized）
させていますが、Sheet毎にこの指示を解除させる方法はありますか？
教えて頂けたら幸いです。よろしくお願いいたします。
【77787】Re:最小化→最大化
発言  β  - 15/12/22(火) 15:50 -
引用なし
パスワード
   ▼勉強中 さん：

>意味がいまいちわかりません。

>ファイルを開く際、Excelを最小化（Application.WindowState = xlMinimized）
>させています

Workbook_Open あたりで行っているのでしょうか？
いずれにしても、エクセルは【最小化】になっているんですよね？
で、「シート毎の」解除（xlMaximized等？）ですけど、どんな操作を考えているのですか？
何かしようとするとタスクバーをクリックせざるを得ないですよね？
そうすると、エクセルは、最小化させる前の状況、おそらく最大化になるんでしょうね？
その時のシートは、たまたまブックを開いたときに最前面に出ていたシートです。

で、「シート毎に解除」？？
どんな操作をしたときにどうしたいのですか？
【77788】早速の返信、ありがとうございます。
発言  勉強中  - 15/12/22(火) 16:55 -
引用なし
パスワード
   ご指摘の通り、Workbook_Open()で最小化を指示しています。作業内容は、Excelを最小化してVBAで作成したフォームのみ表示。しかし、そのフォームの中にあるシート(Excelの表)を呼び出す時、タスクバーをクリック(Excelアイコン)しないと表示されません。そこで、特定のシートを開く際に、自動で最大化にさせたいと思います。基本用語も使えず、適切な説明が出来ず申し訳ございません。まだまだ、勉強不足でお恥ずかしいかぎりですが、ご指導のほどよろしくお願いいたします。
【77789】Re:早速の返信、ありがとうございます。
発言  β  - 15/12/22(火) 17:38 -
引用なし
パスワード
   ▼勉強中 さん：

WindowState ではなく Application.Visible を使った例です。
UserForm1のCommandButton1をクリックするたびに、エクセルの表示・非表示を
切り替えます。

新規ブックで試してみてください。
UserForm1にはCommandButton1 を配置してください。

ThisWorkbookモジュール

Private Sub Workbook_Open()
　　Application.OnTime Now(), "ThisWorkbook.ShowForm"
　　Application.Visible = False
End Sub

Sub ShowForm()
　　UserForm1.Show
End Sub

ユーザーフォームモジュール

Private Sub CommandButton1_Click()
　　Application.Visible = Not Application.Visible
End Sub
【77791】Re:早速の返信、ありがとうございます。
発言  β  - 15/12/22(火) 22:44 -
引用なし
パスワード
   ▼勉強中 さん：

ところでユーザーフォームはモードレス表示ですか？モーダル表示ですか？
【77792】Re:早速の返信、ありがとうございます。
お礼  勉強中  - 15/12/23(水) 0:00 -
引用なし
パスワード
   ▼β さん：
返信が遅くなり申し訳ございませんでした。モードレス表示です。
さっそく、トライしてみます。結果もご報告させていただきます。
ＶＢＡは奥が深く難しいですが、これからもコツコツ勉強します。
初心者の私にも分かりやすく教えていただき、感謝申し上げます。
【77793】Re:早速の返信、ありがとうございます。
お礼  勉強中  - 15/12/23(水) 0:44 -
引用なし
パスワード
   >▼β さん：
希望通りの操作が出来ました。重ねて御礼申し上げます。
ありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
891 / 13657 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free