CommandButton Kod hakkında yardım

[ferhat73]

Arkadaşlar forumdan ferhat pazarçevirdi bey in hazırlamış olduğu adres defteri
dosyasında Private Sub CommandButton1_Click() içeriğinde yer alan aşağıdaki kod ların tam olarak ne işe yaradığını anlayamadım.

Aşağıdaki kodları Private Sub CommandButton1_Click() içinden sildiğimde de dosyayı bir önceki hali gibi kullanabiliyorum.

konu ile ilgili yardımlarınızı rica ediyorum


Degistirilecek_Satir = ListBox1.ListIndex + 2
Range("B" & Degistirilecek_Satir).Value = TextBox1.Text
Range("C" & Degistirilecek_Satir).Value = TextBox2.Text
Range("D" & Degistirilecek_Satir).Value = TextBox3.Text
Range("E" & Degistirilecek_Satir).Value = TextBox4.Text
..............................................

Range("M" & Degistirilecek_Satir).Value = TextBox12.Text

Sheets("Data").Select

Unload UserForm1

 

[fedeal]

bu kodlar listboxta seçip textboxlara getirdiginiz satırdaki bilgileri degiştirmenizi(güncelleme) sağlıyor. kodun üstünde olan If Yeni_mi = True Then sorgusunda devreye giriyor.

 

[ferhat73]

fedeal bey
yardımınız için teşekkür ederim şimdi anladım

iyi çalışmalar

 

[fedeal]

ricaederim iyi çalışmalar