Kod:
Dim xls As New Excel.Application
Dim w As Workbook = xls.Workbooks.Open("C:\Documents and Settings\drm\Desktop\sorum\drmkayit\bin\Debug\deneme.xls")
xls.Visible = True
w.Sheets("Sayfa1").range("A1") = TextBox1.Text
w.Sheets("Sayfa1").range("D5") = TextBox2.Text
w.Sheets("Sayfa1").range("E5") = TextBox3.TextBu kod ile "Kayitformu.vb" isimli formumdaki textbox verilerini Excel dosyasına aktarabiliyorum. Birkaç sorum olacaktı.
Sorum 1-) 2 ayrı formdan aynı anda tek Excel dosyasına textbox verilerini aktarmak istiyorum; şöyleki
Üsteki koda ilaveten combobox11 de seçili müşavirinde formundaki verileri aynı Excel dosyasına aktaracak
Örnek vereyim:
"Kayitformu.vb" daki textbox verilerini "Sayfa1" deki alanlara aktardık
w.Sheets("Sayfa1").range("A1") = TextBox1.Text
w.Sheets("Sayfa1").range("D5") = TextBox2.Text
w.Sheets("Sayfa1").range("E5") = TextBox3.Text
Combobox11 den müşavirimizi seçtik ve "Musavir.vb" deki textbox lardaki verileride şöyle aktaracak
w.Sheets("Sayfa1").range("G1") = TextBox1.Text
w.Sheets("Sayfa1").range("K5") = TextBox2.Text
w.Sheets("Sayfa1").range("J5") = TextBox3.Text
Şeklinde.
Sorum 2-) "Musavir.vb" de müşaviri kaydettikten hemen sonra datayı güncellemesi ve programı açıp kapatmama gerekmemesini ve bu müşavir isminin "Kayitformu.vb" da hemen görünmesini istiyorum.
Biraz uzun oldu farkındayım. İlgileneceklere teşekkürler
