Aktualisieren von eingebettetem Excel (OLE-Objekt) in Visio

Question

Ich habe ein eingebettetes Excel-Blatt in Visio, das den Inhalt eines Arrays darstellt. Das Füllen dieses Blattes funktioniert gut, aber nach dem Beenden des Makros sind keine Werte im Blatt sichtbar, bis ich das ebedded Excel manuell öffne (Doppelklick).

Muss ich explizit ein OLE-Objekt aktualisieren oder was muss ich tun, um Änderungen in Visio sofort zu sehen?

Vielen Dank im Voraus!

Code:

Dim ws As Object 

Index = ActiveDocument.Pages("Vorlage").Index 

Set acc3 = New Access_Schnittstelle 

Set ws = ActiveDocument.Pages(Index).OLEObjects(1).Object.Sheets(1) 

range1 = XYZ 

ws.Range(ws.Cells(1, 1), ws.Cells(10, 10)) = range1 

Answer 1

ich nur 'gelöst', diese Frage mit dem Speichern der Datei, nachdem das Makro beenden.

Dies "aktualisiert" auf irgendeine Weise alle eingebetteten Excel-Objekte in meinem Visio-Dokument.