excel -> visio makro starten

[Soumi]

Hallo!
ich habe bereits einen post im englischen ms forum gestellt, hoffe
allerdings das mir auch im deutschen forum geholfen werden könnte.

und zwar versuche ich über vba in excel ein makro in visio zu starten.

wie kann ich das?

grüße & danke im voraus

[Chris Roth [Visio MVP]]

Hi Suomi,

Probier mal mit "ExecuteLine"

Im folgenden code:

- Visio diagram heisst: "Visio VBA Test.vsd"
- Test-sub heisst: "ThisDocument.VisioTest"

-----------------------------
Sub CallVisiomacro()

' Add a reference to: Microsoft Visio 12.0 Type Library

Dim visApp As Visio.Application
Set visApp = New Visio.Application

Dim visDoc As Visio.Document
Set visDoc = visApp.Documents.Open(ThisWorkbook.Path & "\Visio VBA
Test.vsd")

visDoc.ExecuteLine ("ThisDocument.VisioTest")

End Sub
-----------------------------
--
Hope this helps,

Chris Roth
Visio MVP


Visio Guy: Smart Graphics for Visual People

Articles: http://www.visguy.com
Shapes: http://www.visguy.com/shapes
Dev: http://www.visguy.com/category/development/
Forum: http://www.viguy.com/vgforum

Post by Soumi
Hallo!
ich habe bereits einen post im englischen ms forum gestellt, hoffe
allerdings das mir auch im deutschen forum geholfen werden könnte.
und zwar versuche ich über vba in excel ein makro in visio zu starten.
wie kann ich das?
grüße & danke im voraus

[Soumi]

Danke, genau das wars!
hast mir echt geholfen!!!

Post by Chris Roth [Visio MVP]
Hi Suomi,
Probier mal mit "ExecuteLine"
- Visio diagram heisst: "Visio VBA Test.vsd"
- Test-sub heisst: "ThisDocument.VisioTest"
-----------------------------
Sub CallVisiomacro()
' Add a reference to: Microsoft Visio 12.0 Type Library
Dim visApp As Visio.Application
Set visApp = New Visio.Application
Dim visDoc As Visio.Document
Set visDoc = visApp.Documents.Open(ThisWorkbook.Path & "\Visio VBA
Test.vsd")
visDoc.ExecuteLine ("ThisDocument.VisioTest")
End Sub
-----------------------------
--
Hope this helps,
Chris Roth
Visio MVP
Visio Guy: Smart Graphics for Visual People
Articles: http://www.visguy.com
Shapes: http://www.visguy.com/shapes
Dev: http://www.visguy.com/category/development/
Forum: http://www.viguy.com/vgforum

Post by Soumi
Hallo!
ich habe bereits einen post im englischen ms forum gestellt, hoffe
allerdings das mir auch im deutschen forum geholfen werden könnte.
und zwar versuche ich über vba in excel ein makro in visio zu starten.
wie kann ich das?
grüße & danke im voraus

[Frank]

Wie kann ich dieses Macro nutzen, um Csharp Code aufzurufen und einen string mit ?bergeben?

Post by Soumi
Hallo!
ich habe bereits einen post im englischen ms forum gestellt, hoffe
allerdings das mir auch im deutschen forum geholfen werden k??nnte.
und zwar versuche ich ??ber vba in excel ein makro in visio zu starten.
wie kann ich das?
gr????e & danke im voraus

Post by Chris Roth [Visio MVP]
Hi Suomi,
Probier mal mit "ExecuteLine"
- Visio diagram heisst: "Visio VBA Test.vsd"
- Test-sub heisst: "ThisDocument.VisioTest"
-----------------------------
Sub CallVisiomacro()
' Add a reference to: Microsoft Visio 12.0 Type Library
Dim visApp As Visio.Application
Set visApp = New Visio.Application
Dim visDoc As Visio.Document
Set visDoc = visApp.Documents.Open(ThisWorkbook.Path & "\Visio VBA
Test.vsd")
visDoc.ExecuteLine ("ThisDocument.VisioTest")
End Sub
-----------------------------
--
Hope this helps,
Chris Roth
Visio MVP
Visio Guy: Smart Graphics for Visual People
Articles: http://www.visguy.com
Shapes: http://www.visguy.com/shapes
Dev: http://www.visguy.com/category/development/
Forum: http://www.viguy.com/vgforum

Post by Soumi
Danke, genau das wars!
hast mir echt geholfen!!!
Submitted via EggHeadCafe
WCF Generic DataContract object Serializer
http://www.eggheadcafe.com/tutorials/aspnet/59ae2b9e-a3be-4cd5-a0ef-939a7abbdc3a/wcf-generic-datacontract-object-serializer.aspx