Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 15:30:14
Warum Verweis zeigt Falsch an
20.04.2024 14:03:38
Http-Request (POST) für GraphQL API-Abfrage
20.04.2024 08:56:18
Textbox in Tabellenblatt ohne Bestätigung in Zelle eintragen
20.04.2024 07:57:54
Tablle fürs E-Auto - Preis wenn kürzer als 60 Min Ladezeit
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
948to952
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
948to952
948to952
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ActiveWorkbook.Saved = True

ActiveWorkbook.Saved = True
13.02.2008 14:33:00
peter
hallo,
ActiveWorkbook.Saved = True
funktioniert leider nicht!? habe ein komplexes makro, das dateien öffnet, einiges einträgt, ändert und zum schluss die mappe auf "gespeichert" setzen soll.
das ganze funktioniert, wenn ich einen haltepunkt bei "ActiveWorkbook.Saved = True" setze und dann mit "F5" weitermache, aber sobald es ohne diesen stopp läuft, geht es nicht.
hat jemand einen tipp?
vielen dank,

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: ActiveWorkbook.Saved = True
13.02.2008 14:40:14
Renee
Hi Peter,
Welcher Code kommt den nach deinem ActiveWorkbook.Saved = True Befehl ?
Wenn da nämlich weitere Änderungen gemacht werden, ist das obige für die Katz.
GreetZ Renée

AW: ActiveWorkbook.Saved = True
13.02.2008 14:55:00
peter
da kommt natürlich nichts mehr, das die mappe verändern könnte, sonst würde es ja auch mit "F5" nicht gehen!

AW: ActiveWorkbook.Saved = True
13.02.2008 15:00:37
Rudi
Hallo,

sonst würde es ja auch mit "F5" nicht gehen!


das ist nicht unbedingt richtig. Falls die Prozedur durch eine andere aufgerufen wird, die wiederum nach Beenden Änderungen bewirkt, ist .saved hinfällig. Wohingegen der alleinige Aufruf der Prozedur mit F5 durchaus erfolgreich sein kann.
Gruß
Rudi
Eine Kuh macht Muh, viele Kühe machen Mühe

Anzeige
AW: ActiveWorkbook.Saved = True
13.02.2008 15:24:00
peter
durch betätigen von "F5" nach der stoppmarke laufen auch die anderen prozeduren zu ende, also damit meine ich, dass ich nicht die problemprozedur alleine laufen lasse, sondern alles.
unabhängig davon, es kommt ausser End If - Me.Hide - Exit Sub, etc. nichts mehr, das die mappe verändert...sonst würde ich hier auch nicht posten, wenn es so einfach wäre...

AW: ActiveWorkbook.Saved = True
13.02.2008 16:35:00
Heinz
Hi,
ist das ActiveWorkbook das, in dem der Code abläuft?
Am besten, Mappe hochladen.
mfg heinz

AW: ActiveWorkbook.Saved = True
13.02.2008 17:26:00
peter
nein, es handelt sich um ein addinn, das eine bestimmte datei, die vorher im userform ausgewählt wurde öffnet, daten einträgt und dann eben auf saved=true stellen sollte. habe es auch schon probiert, den namen der datei direkt einzusetzten (workbooks(xy).saved=true), aber das phänomen bleibt bestehen.
mappe hochladen bringt leider nichts.
kurze beschreibung:
durch doppelklick eines listeintrages im userform wird "Open_PZL" aufgerufen und öffnet die datei, etc.
dann kommt besagte Stelle:
hier der abgespeckte code:

Private Sub Art_Info()
With U_1
.Show
End With
End Sub




Private Sub l_dat_DblClick(ByVal Cancel As MSForms.ReturnBoolean)
If Left(U_1.l_dat.Value, 9) = "g:\daten\" Then
Call Open_PZL(U_1.l_dat.Value)
Me.Hide
End If
End Sub




Private Sub Open_PZL(Optional fileToOpen As String)
Workbooks.Open Filename:=fileToOpen, UpdateLinks:=True
Call Get_Compo_Back(Right(Sheets("COMPO").Cells(2, 3).Value, 4))
Call Check_Autors 'Autorisierung vorhanden?
Call CheckRS
Call MANUF_Layout 'Seitenumbruch
Call Check_Sheets(100) 'Quersumme bilden beim öffnen
Call Open_Notiz 'Notiz einblenden, wenn unter aktuell
Call Create_Module 'Modul einfügen
Call OptionsfeldGebinde ' Optionsfelder einfügen
ActiveWorkbook.Saved = True
End Sub


Anzeige
AW: ActiveWorkbook.Saved = True
14.02.2008 07:56:33
luc
Die Excel-Hilfe sagt zu dem Befehl:
"True, wenn die angegebene Arbeitsmappe seit dem letzten Speichern nicht geändert wurde. Boolean-Wert mit Lese-/Schreibzugriff."
Willst Du denn die Mappe speichern oder nur den Status auf gespeichert setzen? Wenn ersteres, streiche doch einfach das "d" bei Saved. ActiveWorkbook.Save:=True speichert das Ding, dann sollte .Saved auch True sein.

AW: ActiveWorkbook.Saved = True
14.02.2008 08:48:11
peter
das hilft mir leider nicht weiter, die datei darf nicht gespeichert werden...
ich brauch die info ob sich was geändert hat um weitere aktionen zu steuern, die nur erlaubt sind, wenn der user keine daten verändert hat.

Anzeige
AW: ActiveWorkbook.Saved = True
14.02.2008 10:18:00
Renee
Hi Peter,
ich brauch die info ob sich was geändert hat um weitere aktionen zu steuern
steht aber diametral deinem Code gegenüber. Dein Code setzt ja ohne Prüfung den Status so, "das nichts geändert hat".
Ein Abfrage wäre also einfach:

MsgBox IIf(ActiveWorkbook.Saved, "nix geändert", "geändert")


GreetZ Renée

AW: ActiveWorkbook.Saved = True
14.02.2008 11:04:12
peter
zum verständnis:
es wird eine datei geöffnet, von der prozedur angepasst und somit verändert. deshalb will ich die datei (ohne zu speichern) auf den status gespeichert setzen um später, wenn der user andere prozeduren ausführt, zu prüfen, ob in der zwischenzeit vom user etwas verändert wurde.
d.h. sobald die datei geöffnet ist und dem user zur verfügung steht, sollte sie "jungfreulich" sein, aber da ist das problem!
vielen dank soweit,
Anzeige

303 Forumthreads zu ähnlichen Themen

VBA-Code - Datei speichern unter; Schleife
Schulze

Halli Hallo,
ich habe eine kurze frage. und war geht es darum, dass die spalte a untersucht werden sollen. es sollen alle werte der tabelle (zeilen) kopiert werden, bis in der spalte a der wert 0 ist.
Im Folgenden habe ich eine Beispieldatei drangehangen. https://www.herber.de/bbs/user/...
21.08.2008 10:57:00
Thread-ID: 1003407
2 Beiträge
Anzeige
VBA Datei speichern gleich wieder öffnen
Timonski

Servus
ich habe eine Exceldatei mit viel VBA und bei einem Tabellenblatt wird die Datei sehr langsam,
dann speicher ich und lad sie gleich wieder...
und diesen Befehl würde ich gern als Icon in der Symbolleiste hinterlegen...
hätte mir da einer einen Vorschlag?
vielen Dank
21.10.2009 09:36:11
Thread-ID: 1110986
4 Beiträge
VBA:einzelnes Blatt in neuer Datei speichern +mehr
habneFrage

Hallo liebes Forum! Ich habe mich hier heute mal angemeldet, da ich schon seit längerer Zeit an einem Problem arbeite aber keine Lösung gefunden habe. Ich habe mit VBA nicht besonders viel am Hut, dafür kann ich mit anderen Dingen in Excel schon besser umgehen. Nun aber zu meinen Fragen:
Ic...
30.10.2009 08:03:49
Thread-ID: 1113145
14 Beiträge
Anzeige
activeWb.SaveAs funzt nicht wg. Workbook_BeforeSav
norman

Hi alle,
ich haben eine XLA-Datei geschrieben, die bei jedem Start von Excel aktiv ist. In dieser XLA-Datei wird
Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
genutzt, um in einem zentralen DB-System einen Eintrag vorzunehmen und die Datei dann in der BeforeS...
13.03.2010 21:59:44
Thread-ID: 1145651
7 Beiträge
VBA: Datei ohne Makros speichern
André

Moin zusammen,
gegeben ist eine Exceldatei mit Makros (.XSLM).
In dieser Datei soll nun ein Makro folgendes tun:
- die Datei speichern, wobei der User den Dateinamen und Pfad angeben darf
- die Datei darf nur in den Formaten XLSX oder XlS, in jedem Fall aber ohne Makros gespeich...
19.04.2010 13:13:27
Thread-ID: 1152560
8 Beiträge
Mit VBA Code löschen und Datei speichern
Uppe

Hallo Experten,
ich möchte das Blatt 2 meiner Datei ohne Code und Userforms etc speichern.
Mein Bisheriger Code sieht so aus:
Sub Speichern() vntPathAndFile = Application.GetSaveAsFilename( _ InitialFileName:=strPath & "\" & strDateiname & ".xls", Title:="Speichern als"...
20.04.2010 14:50:15
Thread-ID: 1152866
4 Beiträge
VBA Datei Speichern Unter Dialog mit HTML+Paramete
norman

Hi Leutz,
steh gerade auf dem Schlauch (sonst wäre ich ja nicht hier :)) Excel bietet mir den "Datei Speichern unter"-Dialog ja per VBA an: GetSaveAsFilename.
Jetzt will ich aber HTML speichern, und da gibt es ne Menge Parameter, die ich im GetSaveAsFilename vermisse! (Gesamte Arbeitsma...
17.07.2010 02:36:55
Thread-ID: 1167530
14 Beiträge
ActiveWorkbook.SaveAs Filename
Sandra

Hallo zusammen,
ich habe mal wieder ein Problem.
Mit dem nachfolgenden Code lasse ich automatisch speichern.
Dim Dateiname As String
Dateiname = oXlSM.Name
ActiveWorkbook.SaveAs Filename:="\\xxxx\Dokumentation\" & Dateiname & ".xml"
Das klappt auch fast. Allerdin...
21.06.2011 16:49:35
Thread-ID: 1219171
3 Beiträge

Links zu Excel-Dialogen

UserForm

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
1
2
3
13
2
6
7
3
13
2
2
12
3
2
2
5
11
1
2
2
8
2
2
19
3