Въпросът ми чувствам ,че е елементарен ,но не можах да се справя сам а и в многото хелпове и ръководства не намерих пример.
Трябва ми код на VB6.0 който да отворя xls файл направен от ексел да чете и пише в таблица, да я съхрани с направените промени и да я затвори.
Опитвам много време и нищо не постигнах.
Същото ми трябва и за word - да отваря и чете създадени документи, да създава файл да пише в него параграфи да номерира и такива работи.
Благодаря

Съдържаниет е скрито
Влезте за да го видите

Намерих един пример, който може да ти послужи за отправна точка.Използва късно свързване.Ако искаш да видиш всичките свойства и методи можеш да си заредиш библиотеката Microsoft Excel XX Object Library и да ги разгледаш с Object Browser.Предполагам че с Word няма да е по-различно.


Dim objXL As Object
Set objXL = CreateObject("excel.sheet") 'създава обект
Set objXL = objXL.Application.ActiveWorkbook.Activesheet 'получаване на референция
objXL.range("A1").Value = Text1.Text
objXL.range("A2").Value = Text2.Text 'записване в клетките
objXL.range("A3").Formula = "=ATAN2(A1,A2)"
objXL.range("A4").Formula = "=A3*180/PI()" 'задаване на формули
Label1.Caption = objXL.range("A3").Value
Label2.Caption = objXL.range("A4").Value 'взема резултата от клетките
objXL.Application.ActiveWorkbook.SaveAs ("c:\tmp\myfile.xls") 'записва таблицата
Set objXL = Nothing

много благодаря
вече чета и пиша в екселски таблици на воля

Съдържаниет е скрито
Влезте за да го видите

... всичко това със скоростта на костенурка :-))

cheers,
</wqW>