ユーザーがワークシートを前後に移動するボタンのペア (「続行」と「戻る」) があります。
進むボタンは、表示されているシートを問題なく前方に移動できるようで、非表示のシートをスキップします。
ただし、アクティブなシートと以前の表示されているシートの間に非表示のシートがある場合、[戻る] ボタンは何もしません。
2つのコードは実質的に同一であるため、私は混乱しています:
フォワード: (正常に動作します)
Sub MoveNext()
On Error Resume Next
Sheets(ActiveSheet.Index + 1).Activate
If Err.Number <> 0 Then Sheets(1).Activate
End Sub
裏:(隠しシートで失敗)
Sub MoveBack()
On Error Resume Next
Sheets(ActiveSheet.Index - 1).Activate
If Err.Number <> 0 Then Sheets(1).Activate
End Sub
各ボタンは、上記のサブルーチンに適切にバインドされています。