| |
こんにちは。
>うちの事業所にあるPC約８０台の内の半数以上がスペックの低いものを
わたしのＰＣも４３３ＭＨｚと今では低スペックと呼ばれる域ですけど
>インターネットエクスプローラーで動作するソフトの中で使用しております
ＩＥ内でエクセル開いてVisible/Hiddenするマクロを動かしても
一瞬で終わりますね。
>グループウェアーと言う
とかいうのが重いんですかね‥‥‥
>最後だけ一旦全てを表示させて
>シート２だけ残す処理をしておりますので
なんで全てを一端[Visible]にする必要があるのでしょう？
そこが判りません。
Sheet2だけ表示させて、他を隠すなら、↓のようなマクロで良いと
思いますが？
既に[Hidden]状態のものは、そのまま[Hidden]のままにしておけば良いだろうし
[Visible]のものだけ[Hidden]設定すれば良いでしょう。
Dim wksh As Worksheet
With Worksheets("Sheet2")
.Visible = xlSheetVisible
.Activate
End With
For Each wksh In ThisWorkbook.Worksheets
If (wksh.Name <> "Sheet2") And _
(wksh.Visible = xlSheetVisible) Then
wksh.Visible = xlSheetVeryHidden
End If
Next wksh
|
|
角田
- 04/11/9(火) 22:27 -
