[ FOX028 @ 06.05.2010. 12:47 ] @
kada iz nekog Excel dokumenta preko VBA cod-a u vec postojeci Excel dokument upisem podatke i sinimim ga, kada ga ponovo otvorim otvara mi se samo aplikacija bez radne povrsine. U VBA sam vec podesio References.


Sub Primer()
Dim objExcel As New Excel.Workbook
Set objExcel = GetObject("C:\Primer.xls")
objExcel.Application.Visible = True

objExcel.Application.Sheets(1).Cells(1, 1) = 25

objExcel.Save
objExcel.Close
End Sub
[ FOX028 @ 08.05.2010. 17:23 ] @
nije valjda da mi niko ne moze pomoci
[ Jpeca @ 08.05.2010. 20:37 ] @
Ako hoćeš da pristupiš radnoj svesci preko nove instance Excel-a vidi ovde http://www.ozgrid.com/forum/showthread.php?t=19561

Pošto otvaraš iz Excela logičnije je da koristiš metodu Workbook.Open

Code:
Sub UpisUExcelFajl2()
Dim objExcel As New Excel.Workbook
Set objExcel = Application.Workbooks.Open("C:\Primer2.xls") 'otvaranje Excel fajla

objExcel.Sheets(1).Cells(1, 1) = 25

objExcel.Save
objExcel.Close

End Sub
[ FOX028 @ 08.05.2010. 21:43 ] @
hvala, to je to