Ｐａｇｅ 794 ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ 通常モードに戻る ┃ ＩＮＤＥＸ ┃ ≪前へ │ 次へ≫ ━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━ ▼シートの表示と非表示 たけ 03/2/25(火) 8:55 ┣Re:シートの表示と非表示 ポンタ 03/2/25(火) 10:25 ┃ ┗被っちゃった つん 03/2/25(火) 10:28 ┣Re:シートの表示と非表示 つん 03/2/25(火) 10:25 ┃ ┗Re:シートの表示と非表示 たけ 03/2/25(火) 11:10 ┗おまけです。 ぴかる 03/2/25(火) 15:00 ─────────────────────────────────────── ■題名 ： シートの表示と非表示 ■名前 ： たけ ■日付 ： 03/2/25(火) 8:55 -------------------------------------------------------------------------
| シートの表示、非表示をコードで書きたい と思っています。 シート間を移動するコマンドボタンを作成 していまして、シートは非表示にしてありますと コマンドボタンを押しても非表示になっている為 移動出来ません。 コマンドボタンを押した時、シートを非表示から 再表示を実行しまして、シートを表示させるには どうするのですか？ |
| こんな感じでいかがでしょう？ Private Sub CommandButton1_Click() With Worksheets("Sheet3") .Visible = xlSheetVisible .Activate End With End Sub |
| ポンタ さん、おはようございます。 すんません、かぶりました。 しかも、ポンタさんのが親切やし・・・（＾＾; |
| たけ さん、おはようございます。 シートの表示、非表示は Sub test() Worksheets("Sheet1").Visible = False End Sub Sub test2() Worksheets("Sheet1").Visible = True End Sub これでＯＫです。testで「非表示」test2で「表示」です。 |
| ポンタさん、つんさんおはようございます。 出来ましたよ、ありがとうございます |
| こんにちは。 解決済みの様ですが、ちょっとだけおじゃまさせて頂きます。 ↓を使って非表示にすると、マクロでのみ再表示が有効です。 隠れシートなんかには、お勧めですね。ピカつーるも使ってます。 Sub シートを非表示() Sheets("Sheet1").Visible = xlVeryHidden End Sub |