Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
280to284
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
280to284
280to284
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Exceldateien schliessen

Exceldateien schliessen
22.07.2003 10:43:58
Exceldateien schliessen
beim öffen einer bestimmten Excel-Datei sollten alle anderen offenen Exceldateien automatisch schliessen. Kann mir jemand den VBA Code mitteilen.
Danke

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Exceldateien schliessen
22.07.2003 10:53:21
Ivan


hi unbekannter
du solltest hier unbedingt deinen namen angeben!!
Sub Alleszu()'außer der mappe mit code
Dim InI As Integer
    For InI = Workbooks.Count To Step -1
        If Workbooks(InI).Name <> ThisWorkbook.Name Then Workbooks(InI).Close True
    Next InI
End If
End Sub
gruss
ivan

Anzeige
AW: Exceldateien schliessen
22.07.2003 10:50:09
Nike
Hi,
ein kleines Hallo und Tschüss sowie ein Name tut keinem weh, oder?
Hier ein Codeansatz:

Private Sub Workbook_Open()
Dim wkb As Workbook
For Each wkb In Workbooks
If wkb.Name <> ActiveWorkbook Then
wkb.Close False
End If
Next
End Sub

Bye
Nike

AW: Exceldateien schliessen
22.07.2003 10:57:00
Dani
Hallo Nike
ich bin der Dani und sage Dank
Sorry für mein Tölpelbenehmen

AW: Exceldateien schliessen
22.07.2003 10:49:09
Michael Scheffler
Ja, bitte.

AW: Exceldateien schliessen
22.07.2003 10:54:12
Dani
Hallo
beim öffen einer bestimmten Excel-Datei sollten alle anderen offenen Exceldateien automatisch schliessen. Kann mir jemand den VBA Code mitteilen.
Danke

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige