Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
180to184
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
180to184
180to184
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Excel schon offen?

Excel schon offen?
18.11.2002 12:15:55
Dunja
Ich dachte, daß ich mit folgender Anweisung prüfe, ob Excel schon offen ist:

Excel.Application.Visible

Wenn ich aber Excel vor meinem Programm gestartet habe, ergibt das Ergebnis trotzdem false. Kann mir da jemand helfen, wie ich ein vor VB-Programmstart geöffnetes Excel erkennen kann?
Herzlichen Dank Dunja

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Excel schon offen?
18.11.2002 12:49:36
Hans W. Hofmann
Hallo Dunja,

versuche mit GetObject eine XL-Instanz zu öffnen, wenn das schief geht ist XL noch nicht am wirken. Dann kann man ggf. mit CreateObject eine aufmachen...

Gruß HW

Re: Excel schon offen?
18.11.2002 12:49:50
Thomas Risi
Hallo Dunja

Versuch's mal in etwa so ...


Private Function xlCheck() As Boolean
    
    Dim myExcel As Object
    
    xlCheck = False
    
    On Error Resume Next
    
    Set myExcel = GetObject(, "excel.application")
    
    If Not myExcel Is Nothing Then xlCheck = True
    
    Set myExcel = Nothing
    
End Function
 
     Code eingefügt mit Syntaxhighlighter 1.15

Gruß

Thomas

Risi Thomas Softwareentwicklung


Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige