28/12/2015, 09:53
siyahbere
merhaba arkadaşlar;
Dim objExcel
Dim objWorkBook
Set objExcel = CreateObject("EXCEL.APPLICATION")
objExcel.Visible = True
Set objWorkBook = objExcel.Workbooks.Open("c:\rehberlik\ogrencigorusme.xlsx")
objExcel.Cells(5, 3).Value = [Forms]![frm_ogrenci_gorusme_ust]![adisoyadi]
objExcel.Cells(6, 3).Value = [Forms]![frm_ogrenci_gorusme_ust]![sinifi]
objExcel.Cells(7, 3).Value = [Forms]![frm_ogrenci_gorusme_alt_formu]![okulno]
komutu ile Excel belgesine veri aktarmaya çalışıyorum..
çalıştığım form adı frm_ogrenci_gorusme_ust formu. bu formda birde alt form kullanıyorum ismi frm_ogrenci_gorusme_alt_formu.. ancak alt formdaki bilgileri aktaramıyorum. acaba ifadeyimi yanlış yazıyorum, yardımcı olabilir misiniz, teşekkürler
Dim objExcel
Dim objWorkBook
Set objExcel = CreateObject("EXCEL.APPLICATION")
objExcel.Visible = True
Set objWorkBook = objExcel.Workbooks.Open("c:\rehberlik\ogrencigorusme.xlsx")
objExcel.Cells(5, 3).Value = [Forms]![frm_ogrenci_gorusme_ust]![adisoyadi]
objExcel.Cells(6, 3).Value = [Forms]![frm_ogrenci_gorusme_ust]![sinifi]
objExcel.Cells(7, 3).Value = [Forms]![frm_ogrenci_gorusme_alt_formu]![okulno]
komutu ile Excel belgesine veri aktarmaya çalışıyorum..
çalıştığım form adı frm_ogrenci_gorusme_ust formu. bu formda birde alt form kullanıyorum ismi frm_ogrenci_gorusme_alt_formu.. ancak alt formdaki bilgileri aktaramıyorum. acaba ifadeyimi yanlış yazıyorum, yardımcı olabilir misiniz, teşekkürler