Steuerelement Visio Control

  • Sonstige

    Steuerelement Visio Control

    Hi!
    Ich habe eine Userform in VBA unter ACCESS.
    Da steht der Steuerelement Microsoft Visio Drawing Control, wie kann ich dort eine Visio- Datei öffnen?
    Oder irgendwelche Shapes platzieren?
    Ich schreibe so:
    Dim appVisio As Visio.Application
    Dim docsObj As Visio.Documents
    Dim docObj As Visio.Document
    Set appVisio = CreateObject("Visio.Application")
    appVisio.Visible = True
    Set docsObj = appVisio.Documents
    Set docObj = docsObj.Add("C:\Funktion_1.vsd")

    Doch es wird in einem neuen Fenster geöffnet ich aber will, dass es im Steuerelement geöffnet wird