前後のシートを参照する(Previous/Nextプロパティ)

 Previousプロパティは指定したシートの前のシートを、Nextプロパティは指定した
シートの後のシートを参照します。非表示のシートも前後のシートの対象となります
ので、シート見出しの状態だけで判断していたのでは、期待した動作にならないこと
があります。また、前後にシートが無い場合はエラーとなります。


  構文  Object.Previous     前のシート 取得のみ
        Object.Next         後のシート 取得のみ


  設定項目         内容
  Object           Worksheet,Chartオブジェクト


 次のサンプルはアクティブシートの前後のシートの名前を変更します。


●サンプル●

Sub PreviousAndNextsamp1()

    On Error Resume Next   '---前後にシートが無い場合のエラーを無視
    With ActiveSheet
        .Previous.Name = .Name & "の1つ前"     '---前のシートの名前を変更
        .Next.Name = .Name & "の1つ後"        '---後のシートの名前を変更
    End With

End Sub

Excel2000



戻る


Excel Word Access VBA! モーグ