Live-Forum - Die aktuellen Beiträge
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

SaveCopyAs mit Passwort

Forumthread: SaveCopyAs mit Passwort

SaveCopyAs mit Passwort
03.04.2003 13:37:00
Wolfgang
Hallo,
ich möchte eine Datei mit einem Kennwort schützen die ich wie folgt speichere:
Finde in der Onlinehilfe und der Recherche keinen Hinweis.

Workbooks.Add
ActiveWorkbook.SaveCopyAs Filename:=ThisWorkbook.Path & "\" & sName & Datum & "Daten.xls"

Wie gehe ich dann vor?
Danke für jeden Tip.
Gruß
Wolfgang

Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: SaveCopyAs mit Passwort
03.04.2003 14:24:02
geri

Hallo Wolfgang

aus Forum
ClassModule: DieseArbeitsmappe

Dim bln As Boolean

Private Sub Workbook_BeforeSave( _
ByVal SaveAsUI As Boolean, Cancel As Boolean)
Application.DisplayAlerts = False
If bln = False Then
Cancel = True
bln = True
ThisWorkbook.SaveAs _
FileName:=Range("B1").Value & "\test.xls", _
Password:="MeinPasswort"
End If
Application.DisplayAlerts = True
End Sub


gruss geri

Anzeige
Re: SaveCopyAs mit Passwort
03.04.2003 14:35:11
Wolfgang

Hallo Geri,
Danke für die Antwort. Dachte es geht einfacher! Dann mach ich es eben so.
Gruß
Wolfgang

Re: SaveCopyAs mit Passwort
03.04.2003 14:42:17
geri

Wolgang es geht sicher noch einfacher, diese Lösung habe ich aus Forum und funktioniert in Regel auf Anhieb
Anpassungen sind meist noch zu machen

gruss geri

Anzeige
Ok Geri und nochmals danke
03.04.2003 15:19:25
Wolfgang

Hallo Geri,
klar doch, hatte nur gemeint hinter meine Zeile Password:="" setzten zu können.
Gruß
Wolfgang

;

Forumthreads zu verwandten Themen

Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige