Thread: Error 4605 ?
View Single Post

  #1 (permalink)  
Old 03-05-2004
Syd Syd is offline
Member
Yellow Belt
 
Join Date: Aug 2003
Posts: 42
Error 4605 ?

Hi,

I'd like to have my calculated route in a Word document, but when I use the CopyDirections-Function it's not working, but if I make the same process with my mouse ( right click on the route, copy route, open word, paste ) it's working.

this is my code:

If objMap.ActiveRoute.IsCalculated Then

Clipboard.Clear

Set thisWordApp = WordApp

If thisWordApp Is Nothing Then
Exit Sub
End If

If m_TempDoc Is Nothing Then
thisWordApp.Documents.Add
Set m_TempDoc = thisWordApp.activedocument
End If

strDateipfadname = strSomePath & "Route.doc"

Clipboard.Clear

objMap.CopyDirections
DoEvents

thisWordApp.Selection.Paste



perhaps it's the wrong forum but I hope to get answers for this problem. The funny thing is, the error occurs only at one pc.

Can anyone please help me?

thanks in advance
Syd
Reply With Quote