kapat butonu

[dincer47]

1.yaptıgım formda pencerenın sag ust kısmında bulunan kapat butonunun kullanım dısı olmasını ve bunun yerıne forma koyacagım bır butonla aynı gorevı gormek ıstıyorum. mesela çıkış diye bir buton olacak tıklandıgında hem program hem excel hepsı kapanacak istiyorum.
sayın üstadlar yardımlarınızı beklıyorum teşekkür ederım.

 

[Orion1]

Etkisiz kılacağınız butonu propertiesten enabled=false yapın.
Diğer butonada aşağıdaki kodu yazın.

ThisWorkbook.Close

 

[dincer47]

hocam teşekkür ederim. bir sorum daha var;
mesela ad soyad ve adres girişi yapıyorum. bunu bir listboxa eklıyo. ben bu lıitedekı ismi tıkladıgımda adsoyad adres bilgileri girilen textbox larla gorunsun. kimi tıklarsam onun bılgılerı gorunsun ıstıyorum. yolladıgım eklentıye kodları yazarsanız coks evınırım

 

[dincer47]

hocam ilk verdıgınız cevapta pencerenın kendı kapat butonunu ıptal etmek ıstıyorum. sadece benım koydugum butonlardan cıkıs yapılsın. "x" kapatı iptal etmelıyım hocam nasıl yapacam

 

[Orion1]

Ekli dosyayı inceleyiniz.

Private Sub ListBox1_Click()
If ListBox1.ListCount < 1 Then Exit Sub
TextBox1.Text = ListBox1.Column(0, ListBox1.ListIndex)
TextBox2.Text = ListBox1.Column(1, ListBox1.ListIndex)
TextBox3.Text = ListBox1.Column(2, ListBox1.ListIndex)
End Sub

 

[dincer47]

hocam elinize saglık istedigim gibi olmuş lakin exceli kapatıp açınca hersey boş. kaydetmıyo o problemıde halletme sansımız varmı? userform a kayde ve çık butonu koyabılır mısınız?

 

[Orion1]

hocam ilk verdıgınız cevapta pencerenın kendı kapat butonunu ıptal etmek ıstıyorum. sadece benım koydugum butonlardan cıkıs yapılsın. "x" kapatı iptal etmelıyım hocam nasıl yapacam

Dosya ekte.

 

[Orion1]

hocam elinize saglık istedigim gibi olmuş lakin exceli kapatıp açınca hersey boş. kaydetmıyo o problemıde halletme sansımız varmı? userform a kayde ve çık butonu koyabılır mısınız?

,
ListBoxa girdiğiniz veriler kayıt altına alınamaz.
Ancak çalışma sayfasına kaydederseniz olur.