Mappe offen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:


Excel-Version: 9.0 (Office 2000)
nach unten

Betrifft: Mappe offen
von: Pius
Geschrieben am: 12.07.2002 - 10:33:02

Hallo
Ich habe in einem UserForm CheckBox felder zum auswählen welche Arbeitsmappen zusätzlich geöffent werden sollen

nun möchte ich, dass die CheckBox felder abgeblendet werden
(CheckBox.Value = False) wenn die entsprechende Arbeitsmappe bereits geöffnet ist. in einer weiteren CheckBox möchte ich die Datei wieder schliessen können.

Nachstehende Funktion habe ich bereits kopiert

Function MAPPEOFFEN(MappeName As String) As Boolean
Dim stName As String
On Error GoTo Nonexistent
stName = Workbooks(MappeName).Name
MAPPEOFFEN = True
Exit Function
Nonexistent:
MAPPEOFFEN = False
End Function

Klicke ich auf nein erscheint ein Debugger und verweisst auf folgende Zeile
If CheckBox1 = True Then Workbooks.Open Filename:="O:\Pool\PPS\PPS AA.xls"
CheckBox1.Value = False

Danke
Gruss Pius

nach oben   nach unten

Re: Mappe offen
von: Holger Levetzow
Geschrieben am: 12.07.2002 - 10:48:55

erstmal entdecke ich keinen Fehler. Wo steht die Zeile, heißt die checkbox vielleicht anders, existiert die Datei (z.B. Schreibfehler), ...

Holger


nach oben   nach unten

Re: Mappe offen
von: Pius
Geschrieben am: 12.07.2002 - 11:41:26

Hallo Holger

Ich öffen die Userform ein zweites mal
somit sind die CheckBox eigenschaften wieder zurückgestellt


Beim Debugger wird nachstehneder Teil Gelb Markiert
........ Workbooks.Open Filename:="O:\Pool\PPS\PPS AA.xls".....

 nach oben

Beiträge aus den Excel-Beispielen zum Thema "Anzeige von Stunden > 24"