質問

EXCEL97を使っているのですが、
複数のシートを非表示にした後、全部再表示させたい場合、書式→シート→再表示だと、1枚ずつしか再表示できなくて時間がかかってしまいます。
非表示になっている全部のシート、あるいは任意の何枚かを一括で再表示させたい場合はどうすればいいですか?

通報する

回答 (2件)

書式-シート-再表示で出てくる2つ以上のシート名を
一時に捉える操作が無い様で、旨く実現できません。
ボタンにVBAを貼りつけて実行するほか無いかも。
Sub test01()
For i = 1 To Sheets.Count
If Sheets(i).Visible = False Then
Sheets(i).Visible = True
End If
Next i
End Sub

この回答へのお礼

同じくお礼が遅れて申し訳ありませんでした。
こちらも上手く一括表示できました。どうもありがとうございます。
再表示するシートをすばやく複数選択するのは、やはり難しいのですね。。。非表示にする時は簡単なのに、意外でした。

ExcelのVBAではいかがでしょうか。

Sub 全シート表示()
For Each x In Worksheets
x.Visible = True
Next
End Sub

このようなプログラムを実行すると全てのシートが表示されます。任意の何枚かというのはプログラムでは却って面倒な気もします。
少しでも役に立つと良いのですが…。頑張って下さい。

この回答へのお礼

できました!どうもありがとうございました。
週末を挟んでしまい、お礼が遅くなりましてすみませんでした。

このQ&Aは役に立ちましたか?6 件

お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!

新しく質問する

新しく質問する

このカテゴリの人気Q&Aランキング

毎日見よう!教えて!gooトゥディ

べんりQ&A特集