Açılan En Son Sayfaya Geri Dönme

[askm]

Hayırlı geceler. Ana sayfa gibi bir düğme ile aktif sayfa açılmadan önceki sayfaya dönme imkanı olur mu. Bunun için nasıl bir kod yazılmalı.
Örneğin Sayfa1 de iken Sayfa3 açıldı. Geri düğmesine basınca Sayfa1 i açsın. Sayfa5 den Sayfa2 ye geçilmiş ise geri deyince. Sayfa5 Açsın gibi.

 

[antonio]

Her açılan sayfanın kullanılmayan bir hücresini yardımcı hücre olarak kullanırsanız çok kolay halledersiniz.
Örnek:

Dim syf As String, onceki As String
Sub sayfadan_sayfaya()
syf = ActiveSheet.Name
Sheets("Sayfa3").Activate
Sheets("Sayfa3").Range("A1").Value = syf
End Sub
Sub onceki_sayfaya_geri_don()
onceki = Range("A1").Value
Sheets(onceki).Activate
End Sub

 

[askm]

Sayın Antonio çok teşekkür ederim.

 

[antonio]

Rica ederim. İyi çalışmalar.