Es scheint, dass Visio nicht funktioniert und gut funktioniert, wenn Sie von einer Einrichtung mit mehreren Monitoren zur komprimierten Anzeige von Terminaldiensten wechseln. Das Fenster mit den Datenbankeigenschaften wurde irgendwie aus dem Bildschirm verschoben. Seltsamerweise geschah dies jetzt, da ich am Schreibtisch sitze, in all seiner 3-Monitor-Pracht.
Den VBA hier laufen zu lassen , brachte es mir zurück. Falls dieser Link jemals stirbt, hier das Skript. Fügen Sie es in den ThisDocument
Abschnitt des VBA-Editors ein:
Sub GetDbWindow() Dim win As Visio.Window For Each win In Visio.ActiveWindow.Windows If win.Caption = "Database Properties" Then Call win.SetWindowRect(0, 0, 200, 200) Exit For End If Next win End Sub