immer wieder speichern ohne nachfragen

• immer wieder speichern ohne nachfragen von mayk vom 15.03.2005 14:12:04
• AW: immer wieder speichern ohne nachfragen - von P@ulchen am 15.03.2005 14:15:13
• zeig mal den Code...oT - von UweD am 15.03.2005 14:15:53
  • AW: zeig mal den Code...oT - von mayk am 15.03.2005 15:43:37
    • AW: zeig mal den Code...oT - von UweD am 15.03.2005 16:08:20
      • AW: danke für deine zeit läuft super oT. - von mayk am 15.03.2005 16:11:09

Betrifft: immer wieder speichern ohne nachfragen
von: mayk

Geschrieben am: 15.03.2005 14:12:04
kann mir bitte jemand weiterhelfen?,
ich möchte eine datei per klick in einem Netzwerkpfad in einen bestimmten Ordner speichern.
das habe ich über save as mit dem macro recorder aufgezeichnet.
Jetzt wird aber immer wieder gefragt, vorhandenen Datei überspeichern, ok abbrechen.
Kann man das ausstellen, so das es immer wieder überspeichert wird, ohne nachfrage.
Danke schon mal im vorraus
mayk

Betrifft: AW: immer wieder speichern ohne nachfragen
von: P@ulchen

Geschrieben am: 15.03.2005 14:15:13
Hallo Mayk,
bemühe mal die Recherche (Speichern ohne Nachfrage)...
Gruß aus Leipzig
P@ulchen
Das Forum lebt auch von den Rückmeldungen !

Betrifft: zeig mal den Code...oT
von: UweD
Geschrieben am: 15.03.2005 14:15:53
OT

Betrifft: AW: zeig mal den Code...oT
von: mayk

Geschrieben am: 15.03.2005 15:43:37
wie gesagt er ist mit recorder aufgezeichnet
in der recherche steht das im code von true auf false oder umgekehrt geändert werden soll,
aber was und wo habe ich nicht gefunden.
ChDir "P:\MAYK"
ActiveWorkbook.SaveAs Filename:="P:\MAYK\Mappe1.xls", FileFormat:=xlNormal _
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False,'muß hier auf true geändert werden?' _
CreateBackup:=False
ActiveWorkbook.SaveAs Filename:="P:\MAYK\Mappe1.xls", FileFormat:=xlNormal _
, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
CreateBackup:=False
End Sub
danke für die antwort
mayk

Betrifft: AW: zeig mal den Code...oT
von: UweD

Geschrieben am: 15.03.2005 16:08:20
Hallo
so gehts. Alles andere ist überflüssig..

Sub Test()
ChDir "c:\temp"
Application.DisplayAlerts = False ' schaltet die Warnhinweise aus
ActiveWorkbook.SaveAs Filename:="c:\temp\Mappe1.xls", ReadOnlyRecommended:=True
Application.DisplayAlerts = True ' schaltet die Warnhinweise wieder ein
End Sub

Gruß Uwe

Betrifft: AW: danke für deine zeit läuft super oT.
von: mayk
Geschrieben am: 15.03.2005 16:11:09

Excel-Beispiele zum Thema "immer wieder speichern ohne nachfragen"
Bei falscher Eingabe alten Wert wiederherstellen	Zufallszahlen generieren, die sich nicht wiederholen
Startansicht wiederherstellen	Wiederherstellung des alten Zellinhaltes bei unerlaubten Werten
Zum Druck auf Fax-Drucker umschalten und wieder zurück	Druck einer Tabelle mit wechselndem Wiederholungszeilentext
Vor dem Druck Zeilen einfügen und danach wieder löschen	Keine Wiederholung fett geschriebener Zahlen
Teilbereiche als Wiederholungszeilen anlegen	Zelleingaben speichern