Sayfaların Seçilmesini Sağlama isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub SayfaSeçSonraki()
On Error Resume Next
If ActiveSheet.Index = Worksheets.Count Then
Worksheets(1).Select
Else
On Error Resume Next
Worksheets(ActiveSheet.Index + 1).Select
End If
End SubAçıklama
Üstteki kodu çalıştırdığınızda sırayla tüm sayfalara geçiş yapmış olursunuz. Bu işlemi klavyeden tuşlarla yapmak isterseniz, Sonraki Sayfaya Gitme ve Önceki Sayfaya Gitme isimli kısayollarımızı inceleyebilirsiniz.Faydalanılması temennisiyle
