|
>そこで上のように作ってみたのですが、シートを非表示にすると
>「worksheetクラスのselectメソッドが失敗しました。」と出ます。
>試行錯誤してみたのですが、どうもうまくいきません。
非表示になっているシートをSelectすると、このエラーが出るんですよね。
そもそも「非表示のシートを選択する」ということは、どういうことでしょうか。
非表示のシートを印刷することが目的ならば、
そのときだけ表示させて、印刷が終わったらまた非表示にする
…というのはどうでしょうか。
それとも「非表示のシートを表示させる」ことが目的なのでしょうか?
----------
また老婆心ながら…
>If Range("s2") = 5 Then Sheets(5).Select
>If Range("s2") = 6 Then Sheets(6).Select
>If Range("s2") = 7 Then Sheets(7).Select
こうするよりも、
If Range("s2") = 5 Then
Sheets(5).Select
ElseIf Range("s2") = 6 Then
Sheets(6).Select
ElseIf Range("s2") = 7 Then
Sheets(7).Select
End If
という形にしたほうがいいんじゃないかなと思います。
この違いは…って、
もしかしたら承知の上で、最初の3行の形でされてるのかもしれないですね。
すみません。
とりあえずちょっと気になったので、提議だけさせていただきます。
ちなみに、
If Range("s2") = 5 Then
Sheets(5).Select
ElseIf Range("s2") = 6 Then
Sheets(6).Select
ElseIf Range("s2") = 7 Then
Sheets(7).Select
End If
は、
Select Case Range("s2").Value
Case 5
Sheets(5).Select
Case 6
Sheets(6).Select
Case 7
Sheets(7).Select
End Select
とすると、もっとシンプルになることも併記させてください。
ご存知でしたら、ごめんなさい…
|
|