ich hab nen großes Problem und ich weiß nicht an wenn ich mich wenden soll...
Ich starte von Access aus Visio und möchte dann eine Makro/Private Sub ausführen, allerdings klappt das nicht, ich probier es mit Run und Call, aber keine Chance! Von Access zu Excel hat es bei mir früher schon mal geklappt...
'Access Quellcode...
Dim Vis As Visio.Application
Set Vis = CreateObject("visio.Application")
Vis.Documents.Open ("C:\Zeichnung\VersuchTür 1_21.VSD")
Vis.Run "AccessOeffnung"
vis = Nothing
End Sub
'Visio...
Private Sub AccessOeffnung()
MsgBox "Hallo"
End Sub
Aber das geht nicht, ich bekomm immer schon bei Access ne Fehlermeldung, dass das Objekt diese Methode (RUN) nicht ünerstützt!
Könnt ihr mir helfen? Sorry, dass ich ins "falsche" Forum schreibe, aber...
Gruß
Chris