VB6.0用掲示板の過去のログ(No.2)−VBレスキュー(花ちゃん)
[記事リスト] [新規投稿] [新着記事] [ワード検索] [管理用]

投稿日: 2006/09/12(Tue) 18:17
投稿者ダンボ
Eメール
URL
タイトルRe^2: ワークシートだけ表示させる

花ちゃん さん、どうも有り難うございます。

>  (1)システムメニュー(FileからHelpまでの奴)が消せない。

Application.CommandBars("Worksheet Menu Bar").Enabled = False
Application.CommandBars("Standard").Visible = False
で、システムメニュー消えました。標準ツールバー消えました。
あうぅ編集ツールバーが残っています。

ということは、CommandBarsのコレクションを全部調べて、Enabled = FalseなりVisible = False
なりしてやれば良いですね。現状を覚えておいて復帰もしなければならないし。
Application.DisplayFormulaBar = False
のように一発で切り替えができると楽だったですが。
しょうがないので汎用サブルーチン作っておきます。60〜100ステップ位になるかな


> >(2)DisplayFullScreen=True で「全画面表示を閉じます」ダイアログボックスが出てしまう。
> VBから試したのではそのダイアログはでないですね。(Excel 2002)

VBAでApplication.DisplayFullScreen発行時に出たんですがね。
そのダイアログボックス内のOKボタンを押していた時期は必ず再現していました。
その後、ダイアログボックス自体の×ボタンを押したら2度と出なくなりました。
他人に提供したときに再現すると思うとちょっと解明しておきたいところ。


- 関連一覧ツリー (★ をクリックするとツリー全体を一括表示します)

- 返信フォーム (この記事に返信する場合は下記フォームから投稿して下さい)

- VBレスキュー(花ちゃん) - - Web Forum -