Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
604to608
604to608
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Arbeitsmappe schließen

Forumthread: Arbeitsmappe schließen

Arbeitsmappe schließen
03.05.2005 19:57:09
Alex
Hallo,
Ich möchte per VBA Code eine Arbeitsmappe schließen ohne sie zu speichern.
Auch die Rückfrage, ob man diese Arbeitsmappe speichern soll, müsste verschwinden. Kann mir jemand helfen?
Gruß Alex
Anzeige

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Arbeitsmappe schließen
03.05.2005 19:59:30
Hajo_Zi
Hallo Alex,
falls Du es per VBA machen willst
ThisWorkbook.Close False
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Home SP2 und Excel Version 2003 SP1.



"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.
Anzeige
AW: Arbeitsmappe schließen
03.05.2005 20:02:04
Patrick
Hallo Alex,
ich habe es so gelöst:

Sub Create_button_close()
ActiveChart.Deselect
ActiveSheet.Buttons.Add(10, 5, 5, 60).Select
Selection.OnAction = "Delete_sheet"
ActiveChart.Shapes("Button 1").Select
Selection.Characters.Text = "Close"
Selection.AutoScaleFont = False
With Selection.Characters(Start:=1, Length:=5).Font
.Name = "Arial"
.FontStyle = "Standard"
.Size = 9
.Strikethrough = False
.Superscript = False
.Subscript = False
.OutlineFont = False
.Shadow = False
.Underline = xlUnderlineStyleNone
.ColorIndex = xlAutomatic
End With
Selection.Font.Bold = True
Selection.ShapeRange.LockAspectRatio = msoFalse
Selection.ShapeRange.Height = 14.17
Selection.ShapeRange.Width = 141.73
ActiveChart.Deselect
End Sub

Die Variablen kannst Du ja dann noch ändern
Gruss
Patrick
Anzeige
AW: Arbeitsmappe schließen
03.05.2005 20:05:13
Hajo_Zi
Hallo Patrick,
ist Dein Beitrag beim richtigen Beitrag?
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.
Anzeige
AW: Arbeitsmappe schließen
03.05.2005 20:09:59
Patrick
Hallo Hajo,
fast richtig würde ich sagen... aber ich denke, dass mein Vorschlag auch nicht sooo schlecht ist, oder ?! ... bis auf das es sich auf den aktuellen Sheet bezieht.
Ich weiss, wer lesen kann, ist klar im Vorteil ;-))) kommt bei jedem ja mal vor.
Gruss
Patrick
AW: Arbeitsmappe schließen
03.05.2005 20:12:07
Hajo_Zi
Hallo Patrick,
ich habe in Deinem Code die Stelle noch nicht gefunden die mit Arbeitsmappe schließen zu tun hat.
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.
Anzeige
AW: Arbeitsmappe schließen
03.05.2005 20:14:18
Patrick
Hallo Hajo nochmals,
ich habe ja nun zugegeben, dass ich mich verlesen habe, daher ist denke ich mein Vorschlag somit auch hinfällig. Kann ja wie gesagt passieren, wenn man(n) nicht richtig liest, oder?
Also dann, schönen Feierabend,
Patrick
AW: Arbeitsmappe schließen
03.05.2005 20:19:34
Alex
Hallo Hajo_Zi
Der Code ist nicht schlecht, nur würde ich gerne die komplette Excel-Datei schließen, nicht nur die Arbeitsmappe.
Hab mich wohl unklar ausgedrückt.
Gruß Alex
Anzeige
AW: Arbeitsmappe schließen
03.05.2005 20:23:28
Hajo_Zi
Hallo Alex,
was ist für Dich der Unterschied zwischen "komplette Excel-Datei schließen, nicht nur die Arbeitsmappe", das ist für mich das selbe.
Falls Du das Programm Excel meinst? Application.Quit
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.

"Wer Rechtschreibfehler findet, darf sie behalten!"
Dies gilt auch für Bert.
Anzeige
AW: Arbeitsmappe schließen
03.05.2005 20:27:28
Alex
Hallo Hajo_Zi
Das mit Application.Quit hatte ich schon, nur dann kommt immer diese Rückfrage, die ich nicht brauche.
Gruß Alex
AW: Arbeitsmappe schließen
03.05.2005 20:30:31
Hajo_Zi
Hallo Alex,
dann hast Du mehr als eine Datei auf. Da mußt Du rst eine Schleife über alle öffenen Dateien machen und alle schließe außer ThisWorkbook und zum Schluß ThisWorkbook.Close False und Application.Quit
Gruß Hajo
Das Forum lebt auch von den Rückmeldungen.
Anzeige
AW: Arbeitsmappe schließen
03.05.2005 20:37:51
Alex
Hallo Hajo_Zi
Ich habe genau eine Datei offen. In einer Userform habe ich eine Button ("Beenden") mit dem ich Excel komplett schließen möchte.
Mit Schleifen und so kenn ich mich nicht aus - leider.
Gruß Alex
AW: Arbeitsmappe schließen
03.05.2005 20:42:14
Holger
Hi,
im Code des Button:
Thiisworkbook.saved = True
Applivcation.Quit
mfg Holger
Anzeige
Hat sich erledigt
03.05.2005 20:46:14
Alex
Hallo Hajo_Zi
Habe zuerst "Application.Quit" und dann "ThisWorkbook.Close False" eingesetzt. Vielen Dank für den Denkanstoß.
Gruß Alex
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige