macro 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