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

Speichern unter

Forumthread: Speichern unter

Speichern unter
Conny
Hallo Excelianer(innen)
wie kann ich "Speichern unter" für ein bestimmtes Workbook mit VBA dummy setzen? Normales Speichern soll erlaubt sein.
liebe Grüße Conny
soll auch für Office 2007 gelten
Anzeige

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

Betreff
Benutzer
Anzeige
Befehl 'Speichern unter...' per VBA verbieten
27.07.2010 16:27:51
NoNet
Hallo Conny,
kopiere den folgenden Code in das Klassenmodul "DieseArbeitsmappe" im VBA-Editor :
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If SaveAsUI And ActiveWorkbook.Path  "" Then
MsgBox "'Speichern unter...' nicht erlaubt !", vbOKOnly + vbInformation, "Abbruch"
Cancel = True
End If
End Sub
Es ist das nur das "normale" (bzw. erstmalige) Speichern der Mappe möglich, sämtliche Alternativen des "Speichern unter..."-Fenster funktionieren (in dieser Mappe !) nun nicht mehr !
Gruß, NoNet
Anzeige
AW: Befehl 'Speichern unter...' per VBA verbieten
27.07.2010 16:32:33
Conny
Hallo Nonet
vielen Dank und einen lieben Gruß
Conny
Was soll das bringen?
27.07.2010 17:11:48
Nepumuk
Hallo,
ich mach nämlich einfach eine Kopie der Datei und ändere den Namen der Kopie. Schon ist das Makro ohne die geringste Anstrengung ausgehebelt.
Gruß
Nepumuk
AW: Was soll das bringen? ...Viel
27.07.2010 18:22:36
And
Hallo,
"ich mach nämlich einfach eine Kopie der Datei und ändere den Namen ..."
ja Du, aber andere Normaluser nicht.
Und für die reicht sowas um zu verhindern dass nach dem öffnen einer
Datei im Netzwerk schreibgeschützt, da schon offen, das Speichern unter abzubrechen.
zum Beispiel!!!!!!
Gruß Andreas
Anzeige
AW: Was soll das bringen? ...Viel
27.07.2010 19:40:04
Nepumuk
Hallo,
ich weiß ja nicht, was du für User kennst, aber in den letzten 30 Jahren hab ich schon so ziemlich alles erlebt was möglich und angebleich unmöglich ist.
Gruß
Nepumuk

Beliebteste Forumthreads (12 Monate)

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