Aktif çalışma sayfasının bir solundaki veya bir sağındaki sayfayı seçmeye yarayan VBA kodu alternatifidir.
Option Explicit
Sub AktifCalismaSayfasininBirSolundakiSayfayiSec()
If (ActiveSheet.Index > 1) Then
Sheets(ActiveSheet.Index - 1).Select
End If
End Sub
Sub AktifCalismaSayfasininBirSagindakiSayfayiSec()
If (ActiveSheet.Index < Sheets.Count) Then
Sheets(ActiveSheet.Index + 1).Select
End If
End Sub