DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
Private Sub CommandButton1_Click()
UserForm1.Hide
Application.Visible = True
Sheets("Sayfa1").Select
UserForm1.Show
End Sub
Private Sub CommandButton2_Click()
UserForm1.Hide
Application.Visible = True
Sheets("Sayfa2").Select
UserForm1.Show
End Sub
Private Sub CommandButton3_Click()
UserForm1.Hide
Application.Visible = True
Sheets("Sayfa3").Select
UserForm1.Show
End Sub