Live-Forum - Die aktuellen Beiträge
Datum
Titel
27.09.2025 15:11:53
Probleme mit dem Autovervollständigen
27.09.2025 13:16:54
Mit VBA erstellter S.-Brief erzeugt mehr Briefe als Daten
26.09.2025 22:18:24
Liste mit Links - tricky
26.09.2025 18:34:36
Welches Datum gibt mein M-Code aus?
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1396to1400
1396to1400
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Password via VBA

Forumthread: Password via VBA

Password via VBA
17.12.2014 11:32:31
Tom
Hallo, ich habe folgendes Problem:
Ich möchte eine Arbeitsmappe mit einem/neuen Password schützen. Weder die Arbeitsmappe noch der VBA-Code sind mit einem Password geschützt!
Setze ich ein Password mittels: ActiveWorkbook.Password = "12345", dann setzt Excel jedesmal "********" als Password, also 8 Sterne! Die Datei wird anschließend OHNE Password gespeichert, Excel ignoriert also das vorgegebene Password. Das Gleiche passiert, wenn ich in der VBE die 'Vorgabe'-Passwörter zurücksetze/lösche.
Setze ich ein Password mittels 'Datei speichern unter...' Optionen, etc nimmt Excel das Password an, bei einer VBA-Abfrage erscheinen dann wieder die 8 '*' als korrektes Password und es lässt sich sogar wieder mittels VBA ändern. Ich bin ratlos... :)

Anzeige

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Password via VBA
17.12.2014 22:17:07
Matze
Hallo Tom,
meinst du es so ?
Datei würde jetzt mit dem AKTUELLEN NAMEN und in AKTUELLEN VERZEICHNIS gespeichert.
Da die Datei Makros enthält muss die Datei auch die Endung .xlms haben
Sub test()
ThisWorkbook.SaveAs Filename:=ActiveWorkbook.FullName, Password:="12345", _
ReadOnlyRecommended:=False, CreateBackup:=False
End Sub

Matze
Anzeige
;

Forumthreads zu verwandten Themen

ActiveWorkbook.SaveAs
Larissa

Hallo,
jetzt habe ich doch noch eine Frage.
In meinem Makro habe ich die Funktion: ActiveWorkbook.SaveAs 'Name_Datum'
Die Datei wird dann in Eigene Dateien abgespeichert. Wenn an diesem Platz schon eine Datei mit diesem Namen vorliegt, kommt die typische Abfrage, ob die Datei übers...
12.09.2009 17:32:49
Thread-ID: 1102264
3 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
VBA _pivate_sub save as
Volker

Hallo,
ich habe ein Problem beim Speichern einer Excel Datei. Habe ein Makro im Internet gefunden, dieses eingebaut, funktioniert wunderbar ABER jetzt wird bei jedem speichern das Dialogfeld "Save as" aufgemacht.
ISt es möglich hier eine Abfrage einzubauen, welche prüft ob der Dateinam...
25.04.2012 07:38:29
Thread-ID: 1260797
4 Beiträge
Ausschreiben von Dateien per VBA SaveAs
Dateien

Guten Morgen,
Hab ein kleines Problem und hab mich schon den ganzen Morgen durchs Internet geschlagen und auch viel hier gefunden, aber irgendwie wills bei mir nicht funktionieren ...
Hab mir hier zur Auswertung von Messdaten n kleinen Excel Tabellensatz erschaffen damit ich die Inputfi...
25.05.2012 11:57:01
Thread-ID: 1264893
5 Beiträge
VBA-Word Kontrollkästchen programmieren
Kazo

Hallo Leute, ich habe mit Word 2007 ein Formular verfasst und bräuchte Hilfe für die VBA Programmierung! Und zwar habe ich im Formular Kästchen zum Ankreuzen und möchte folgendes: Es darf entweder JA oder NEIN angekreuzt werden, wenn dass kästchen ALLE angekreuzt wir sollen automatisch alle Kä...
30.05.2014 12:09:39
Thread-ID: 1364000
2 Beiträge
Anzeige
VBA Outlook 2010 Fehler (xlDialogSaveAs).Show
Thorsten

Hallo,
ich versuche eMail-Anhänge zu speichern.
Der genaue Speicherpfad steht in den Anhängen(.xls) der eMail.
Leider ist der Name/ Bezeichnung immer anders.
Die Anhänge werden temporär gespeichert, geöffnet und dann kommt mein Problem:
der Benutzer soll das Speicherverzeich...
07.06.2014 07:21:41
Thread-ID: 1365046
4 Beiträge
Anzeige
ThisWorkbook.SaveAs = Excel Absturz !? - PLS Help
Thorben

Hallo alle zusammen,
folgender Code legt eine Kopie ab und bringt Excel dann zum Absturz!?
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean) Filestring1 = "\Test1.xlsm" Filestring2 = "\Test2.xlsm" If ActiveSheet.Range("G1") = "Bestand 1" = True Then ThisWor...
23.06.2014 14:57:24
Thread-ID: 1367056
6 Beiträge
Workbook.SaveAs einer schreibgeschüzten Datei
Bernhard

Hallo xls-ler, ich habe mein Problem der Automatisierung mit Hilfe der Recherche fast gelöst. Ein letzter Punk ist leider offen:
Der Befehl ActiveWorkbook.SaveAs soll eine Datei die Schreibgeschützt ist überschreiben. Ich dachte dadurch, dass man das Argument WriteResPassword:="test" mit dem...
16.07.2002 15:15:53
Thread-ID: 137076
3 Beiträge
ActiveWorkbook.SaveAs Dateiname aus Strings
Ben

Hallo,
ich habe folgendes VBA Programm als Makro geschrieben:
Dim pfad As String
ActiveSheet.Unprotect
Dim kursbezeichnung As String
kursbezeichnung = range("F2").Value
Application.DisplayAlerts = False
pfad = "C:\1\" & kursbezeichnung & "\Moodlezugangsdaten....
31.03.2015 14:50:36
Thread-ID: 1418235
4 Beiträge
Workbook.SaveAs: Fehler bei Punkten in Dateinamen
Chris

Guten Morgen,
ich speichere mittels eines Makros und der Funktion ActiveWorkbook.SavAs aus Excel 2016 ein Tabellelenblatt als eigene Datei.
Der dafür von mir verwendete Code ist folgender:
ActiveWorkbook.SaveAs Filename:=Pfad & Dateiname _ , FileFormat:=xlOpenXMLWorkbook, Create...
31.05.2018 07:55:03
Thread-ID: 1626687
10 Beiträge
Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Can
EFE

Hallo zusammen,
bin neu hier, zuerst mal wirklich eine tolle Community. Sehr Hilfsbereite Menschen.
Bin eigentlich ein Neuling wenn es um VBA geht. Aber ich hab es mal geschafft was zusammen zu stellen.
Kurze Erläuterung zur der Excel:
Habe 5-12 Tabellen, die je nach User eingeb...
27.09.2018 19:39:58
Thread-ID: 1648209
9 Beiträge
Bei "ActiveWorkbook.SaveAs" Nullwerte ausblenden
Maik

Wie bewerkstellige ich es, das bei einer mittels "ActiveWorkbook.SaveAs" gespeicherten Arbeitsmappe alle Nullwerte ausgeblendet werden?Bis denne,Maik
06.10.2002 17:33:59
Thread-ID: 166657
3 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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