Userform

[manisali50]

Arkadaşlar merhaba..
Kendi çabamla bir userform yaptım..
Bu formun üzerindeki butonlardan herhangi birine (Örneğin AZ 2) tıkladığımda o sayfaya gitmemi sağlayan komutu yazarsanız sevinirim.
Yani ;
Private Sub CommandButton1_Click()

End Sub

komutunun arasını ne ile dolduracağım..
Şimdiden teşekkürler

 

[İhsan Tank]

Arkadaşlar merhaba..
Kendi çabamla bir userform yaptım..
Bu formun üzerindeki butonlardan herhangi birine (Örneğin AZ 2) tıkladığımda o sayfaya gitmemi sağlayan komutu yazarsanız sevinirim.
Yani ;
Private Sub CommandButton1_Click()

End Sub

komutunun arasını ne ile dolduracağım..
Şimdiden teşekkürler

merhaba

Private Sub CommandButton1_Click()
Sheets("[COLOR="Red"]AZ 2[/COLOR]").Select
End Sub

bunu deneyiniz

 

[manisali50]

Üstad teşekkürler..Ama ufak bir sorun var...
Tıkladığımız sayfaya gidiyor ama userform ekranda kalmaya devam ediyor..Ancak köşesindeki kapat işaretini tıklayınca ekrandan kalkıyor..Çaresi??

 

[İhsan Tank]

Üstad teşekkürler..Ama ufak bir sorun var...
Tıkladığımız sayfaya gidiyor ama userform ekranda kalmaya devam ediyor..Ancak köşesindeki kapat işaretini tıklayınca ekrandan kalkıyor..Çaresi??

merhaba

Private Sub CommandButton1_Click()
Sheets("AZ 2").Select
Msgbox"AZ 2 Sayfasına Geçtiniz",,"İhsan Tank"
Unload Me
End Sub

kod'u bununla değişiniz

 

[manisali50]

Üstad teşekkürler

 

[İhsan Tank]

Üstad teşekkürler

rica ederim
iyi çalışmalar :mutlu: