Makro-Abfrage, ob Datei bereits geöffnet ist

Antwort erstellen

BBCode ist eingeschaltet
[img] ist ausgeschaltet
[url] ist eingeschaltet
Smileys sind ausgeschaltet
Die letzten Beiträge des Themas
   

Ansicht erweitern Die letzten Beiträge des Themas: Makro-Abfrage, ob Datei bereits geöffnet ist

von openmind » Mi, 25.02.2004 15:50

Du kannst durch alle offenen Fenster loopen und dann das jeweilige Dokument per URL überprüfen. Aus Andrews Macro Document:

Code: Alles auswählen

Sub Main
  Dim oDocs As Object
  Dim oDoc As Object, oComponents As Object

  oComponents = StarDesktop.getComponents()
  oDocs = oComponents.createEnumeration()
  Do While oDocs.hasMoreElements()
    oDoc = oDocs.nextElement()
  Loop
End Sub

Makro-Abfrage, ob Datei bereits geöffnet ist

von mecki_45 » Mi, 25.02.2004 15:44

Hallo,
ich will feststellen, ob eine bestimmte Datei bereits geöfffnet ist.
* Ist die Datei geöffnet, so soll das Makro mit einer entsprechenden Meldung beendet werden.
* Ist die Datei nicht geöffnet, dann soll das Makro abgearbeitet werden.

In SO 5.2 habe ich dies bereits laufen gehabt, da aber die Programmierung in OO ist mir absolut noch nicht geläufig.

thx for help

Grüßle
Alex

Nach oben