(11/08/2009, 14:16)siberonik yazdı: ---------------------------------------------------------------------
Dim objExcel As Object
Dim objWorkbook As Object
Set objExcel = CreateObject("EXCEL.APPLICATION")
objExcel.Visible = True
Set objWorkbook = objExcel.Workbooks.Open("C:\test.xls")
---------------------------------------------------------------------
Kırmızı renklendirdiğim satır gibi yeni Excel dosyası oluşturabileceğim bir yapı varmı. open komutu yerine Add yazıp deendim ama olmadı
Tam olarak yapmak istediğim şey random isimli bir dosya oluşturma sonra bu kod ile açıp tablodan gerekli kayıtları dosyaya geçirip biçimlemesini yapmak. Buradaki tek sorunum Excel dosyası oluşturmak, diğerlerinde sıkıntı yok.