page 1'den sayfa 1 'e nasıl giderim.

[ünal karadavut]

Page1, Sayfa1 açsın, page2, sayfa2 açsın,page3, sayfa 3 ü açmasını istiyorum. örneğin userformu kapadığımda diğer sayfalarda nasıl açabilirim.
yani userform diğer sayfalarda da gezebilir mi?
yardımlarınızı bekliyorum.

 

[Levent Menteşoğlu]

Multipage nesnesinin change olayına aşağıdaki kodu yazın.

Private Sub MultiPage1_Change()
Sheets(MultiPage1.Value + 1).Select
End Sub

Diğer sorunuz içinde userformun properties penceresinde showmodal özelliğini false yapın.

 

[Seyit Tiken]

Userformu kapadığımda diğer sayfalarda nasıl açabilirim.

Aşağıdaki kodu ThisWorkbook'a yapıştırınız. UserFormu kapatığınızda hangi sayfadaysanız hücreyi çift tıklayıp Formu açabilirsiniz.

Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
UserForm1.Show 0
[a1].Select
End Sub

 

[ünal karadavut]

sayın levent Bey ve Sayın Seyit Bey, Allah Razı Olsun.
tam istediğim gibi yapmışsınız.
Allah Zihninizi ve ilminizi artırsın.