Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Excel schon offen?

Forumthread: 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

Anzeige

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
Anzeige
Anzeige