Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9060 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【29521】シートの表示、非表示状態の取得 みさき 05/10/6(木) 21:01 質問[未読]
【29522】Re:シートの表示、非表示状態の取得 かみちゃん 05/10/6(木) 21:08 回答[未読]
【29527】Re:シートの表示、非表示状態の取得 みさき 05/10/6(木) 22:00 お礼[未読]
【29565】Re:シートの表示、非表示状態の取得 みさき 05/10/7(金) 19:48 質問[未読]
【29521】シートの表示、非表示状態の取得
質問  みさき  - 05/10/6(木) 21:01 -
引用なし
パスワード
   こんばんは。

シート3枚を使い分け、表示、非表示を制御するようなVBAを
作ろうとしています。
Worksheets(2).Visible に TrueやFalseを設定して
シートの表示、非表示を切り替えているのですが
シートの表示状態を取得することは可能なのでしょうか？
例えば、シート2が、表示状態なのか？非表示状態なのか？
を取得したいのです。

分かりづらい説明ですみません。
宜しくお願いします。
【29522】Re:シートの表示、非表示状態の取得
回答  かみちゃん  - 05/10/6(木) 21:08 -
引用なし
パスワード
   こんにちは。かみちゃん　です。

>シートの表示状態を取得することは可能なのでしょうか？
>例えば、シート2が、表示状態なのか？非表示状態なのか？
>を取得したいのです。

Visibleプロパティで設定できているのですから、値の取得もできると思います。
以下のような感じでできると思います。

Sub Macro1()
　Dim ws As Worksheet
　
　Set ws = Sheets("Sheet1")
　If ws.Visible Then
　　MsgBox ws.Name & "は表示されています。"
　Else
　　MsgBox ws.Name & "は非表示です。"
　End If
　Set ws = Nothing
End Sub
【29527】Re:シートの表示、非表示状態の取得
お礼  みさき  - 05/10/6(木) 22:00 -
引用なし
パスワード
   ▼かみちゃん さん：

ありがとうございます。
状態取得できました。
設定できるのだから、取得もできるんですね！
有り難うございました。
【29565】Re:シートの表示、非表示状態の取得
質問  みさき  - 05/10/7(金) 19:48 -
引用なし
パスワード
   また質問させてくださいm(__)m。

メニューバーに独自のメニューを追加しています。
そのメニューバーも表示、非表示と切り替えているのですが
その状態も取得することは可能なのでしょうか？

宜しくお願い致します。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
9060 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free