makro (listboxta veri silme)

[mkokluce]

sayın site yöneticileri ve üyeleri;
bir arkadaşım isteği üzerine küçük bir çalışma yapmaya çalıştım,elbette bu siteden aldığım kodlar ve bilgiler yol gösterdi.Fakat çalışmamın bir-kaç bölümümü istediğim gibi tamamlayamadım.çalışmamı gönderiyorum.
Sorunum :
1-verileri silme konusunda,sildiğim satırlar listbox ve veri sayfasında boş kalıyor
2-textbox3 / textbox2'nin sonucunu veri sayfasına ve textbox4'e %45 gibi kaydedebilirmiyiz.
ilgilenirseniz çok sevinirim.saygılarımla
( bu benim vba ile ilgili ilk denememdir)

 

[Levent Menteşoğlu]

Birinci sorunuz için Sil butonuna aşağıdaki kodu kopyalayın.

Private Sub CommandButton3_Click()
Rows(ListBox1.ListIndex + 2).Delete
UserForm_Initialize
End Sub

İkinci sorunuz içinde textbox2 ve textbox3 e aşağıdaki kodları kopyalayın.

Private Sub TextBox2_Change()
If TextBox2 <> "" And TextBox3 <> "" Then TextBox4 = Format(TextBox3 / TextBox2 * 100, "% 0.00")
End Sub
 
Private Sub TextBox3_Change()
If TextBox2 <> "" And TextBox3 <> "" Then TextBox4 = Format(TextBox3 / TextBox2 * 100, "% 0.00")
End Sub

Birde eklediğiniz dosya ile ilgili olarakta lütfen aşağıdaki linki okumanızı rica ediyorum.

http://www.excel.web.tr/showthread.php?t=16775

 

[zafer]

Merhaba

İyi akşamlar

Sayfa korumasının şifresi nedir.Koruma koyduğunuz sayfada satır silemezsiniz.

Ayrıca diğer göndereceğiniz dosyalarda otomatik açılışa excel ekranı düzenlemesi ile ilgili kodlar koymayınız ve userformlarınızın giriş ve çıkışları sade olursa daha çabuk cevap alacağınızı umuyorum.

http://www.excel.web.tr/showthread.php?t=16775

Edit : İyi akşamlar Levent....)

 

[mkokluce]

özür ve teşekkür

sayın leventm,
yardımınız ve uyarılarınız için teşekkür ediyorum.