Visual Basic Yardım

[cenkaltunkaya]

Arkadaşlar visual basic'te bi form oluşturdum.
Adı :
Soyadı :
Telefon :
falan filan.Ama bu formun exeli açtığımda otomatik açılmasını ve girdiğim bilgileri kaydet tışuyla sayfaya taşımak istiyorum.
Yani bilgileri doldurucam kaydet dicem kitaba kaydedecek yeni dicem form boş açılacak.
Birde visual basicte oluşturduğum formdaki kutucuklara yazıları yazıyorumya bunları exel'de istediğim bir yere yazmasını ve kaydet dediğimde kaydetmesini istiyorum nasıl yapıcam bunu.
Yardımcı olursanız çok sevinirim.Lütfen arkadaşlar bunu bi arkadaş bana ayrıntılı şekilde izah etsin.
Þimdiden teşekkür ederim.

 

[Kemal Demir]

Gunaydın Dosyayı Sabahtan beri
Yollama calısıyom Yollayamıyorum (sadece bu dosya) Ama sana kodları yazıcam 3 adet textbox,1 adet command buton,1 adet list box ekle ve kodları yapısıtr


'''**'''
Private Sub CommandButton1_Click()
Application.ScreenUpdating = False
satir = WorksheetFunction.CountA(Sheets("data").Range("A1:A65536")) + 1 'VERİ sayfasında, a kolonundaki son dolu hücreden sonraki satir
Sheets("data").Cells(satir, 1) = TextBox1.Value
Sheets("data").Cells(satir, 2) = TextBox2.Value
Sheets("data").Cells(satir, 3) = TextBox3.Value
TextBox1.Value = ""
TextBox2.Value = ""
TextBox3.Value = ""
End Sub

Private Sub CommandButton2_Click()
Unload UserForm3
End Sub
Private Sub UserForm_Initialize()
ListBox1.ColumnCount = 3
ListBox1.RowSource = "data!a2:c65536"
ListBox1.ColumnHeads = True
End Sub
'' bu kadar keske dosyayı yollsaydım ama denıcem ujmarım daha sonra yollarım