FiveTech Software tech support forums

... However, I get an error: Word.Application:ACTIVEDOCUMENT:TABLES:ITEM:CELL:RANGE:DUPLICATE:FIND/3 DISP_E_MEMBERNOTFOUND: EXECUTE If oRng.Find.MatchAllWordForms:= .F. , then everything is fine. ...

... Local cText:=Texto oWord:=TOleAuto():New( "Word.Application" ) oWord:Visible := .f. oWord:Documents:Add() oDoc := oWord:Get("ActiveDocument") oTexto := oWord:Selection() oTexto:Text := Texto oDoc:CheckSpelling() cText := oTexto:Text oDoc:Close(0) oWord:Quit() oTexto:=NIL ...

Hi.

II want to get the column width of the Word table

oTb:Item(1):Columns:Item(1):Width

but get an error: Error Word.Application:ACTIVEDOCUMENT:TABLES:ITEM:COLUMNS/9 "Item". That is, Columns:Item() is not defined. How do I solve this problem ?

... arroja un error. oWord := win_oleCreateObject( "Word.Application") Called from: => WIN_OLEAUTO:GET( 0 ) oActiveDoc := oWord:Get("ActiveDocument") <===== En esta Linea se produce el Error. Muchos Saludos. Antonio Application===========   Path and name: C:\Desa\FichasWin\MenuFicha.exe ...

... } } For n:=1 to Len(aArrReplace) Reemplaza_Text_F2( oSel, aArrReplace[n][1], aArrReplace[n][2] ) Next n oActiveDoc := oWord:Get("ActiveDocument") oActiveDoc:SaveAs(cDestino + cSave) oActiveDoc:PrintOut() * oWord:Documents:Close() //AQUI: si estos estan omitidos, siempre quedarán ...

Hallo,
the following lines work well:

For j := 1 to oWord:ActiveDocument:Bookmarks:Count()
AADD(aBM, oWord:ActiveDocument:Bookmarks:Item(j):Name)
Next j

Thank you four your help
Kind regards, Hoschik

Hallo, the error I'm getting is: [3232] -> Error Word.Application:ACTIVEDOCUMENT/0 S_OK: BOOKMARKS Arguments: ( [ 1] = Type: N Val: 2) >NIL< [3232] -> Error at ...: TOLEAUTO:BOOKMARKS(0) in Module: >../../win32ole.prg< when i wrote AADD(aTextmarke, ...

Also try this

AADD(aTextmarke, oWord:ActiveDocument:Bookmarks( j + 1 ):Name)

What error do you get ? Please copy it here, thanks

Have you tried this ?

For j := 1 to oWord:ActiveDocument:Bookmarks:Count()
AADD(aTextmarke, oWord:ActiveDocument:Bookmarks( j - 1 ):Name)
Next j

Hallo, möchte die Bookmarks (Textmaken) eines Word Dokumentes ermitteln und finde den entsprechenden Aufruf nicht, z.B. durch: For j := 1 to oWord:ActiveDocument:Bookmarks:Count() AADD(aTextmarke, oWord:ActiveDocument:Bookmarks(j):Name) Next j Das funktioniert nicht! Zwar liefert oWord:ActiveDocument:Bookmarks:Count() ...

... PROPERTYGET BSTR Name() STDCALL dispatch PROPERTYGET PTR Documents() STDCALL dispatch PROPERTYGET PTR Windows() STDCALL dispatch PROPERTYGET PTR ActiveDocument() STDCALL dispatch PROPERTYGET PTR ActiveWindow() STDCALL dispatch PROPERTYGET PTR Selection() STDCALL dispatch PROPERTYGET IDispatch ...

MAILMERGE The next error: Error description: Error Word.Application:ACTIVEDOCUMENT:MAILMERGE/3 DISP_E_MEMBERNOTFOUND: EXECUTE I resolved by changing the registry key: HKEY_CURRENT_USER\Software\Microsoft\Office\14.0\Word\Options "SQLSecurityCheck" ...

... Build 7601 Service Pack 1 Time from start: 0 hours 0 mins 1 secs Error occurred at: 04/28/13, 00:25:10 Error description: Error Word.Application:ACTIVEDOCUMENT:TABLES:ADD:ROWS:ITEM:CELLS:ITEM:RANGE/0 S_OK: INSERTAFTER Args: [ 1] = D / / Stack Calls =========== Called from: => TOLEAUTO:INSERTAFTER( ...

Save and printing : oWord:ActiveDocument:SaveAs("c:\temp\test.doc") oWord:PrintOut() oWord:Quit() release object oRange, oWord oWord = null // Finally, stub out the reference to make sure it's released setting margins : #define ...

Thanks Anserkk For add a picture Emg tell me to insert oWord:ActiveDocument:Shapes:AddPicture( "c:\logoditta.bmp", .T., .T., 1, 1, 150, 80) but this is not transparent , how I can make to insert a big picture transparent ? I'm trying to create ...