Kennwortgeschützte Excel-Arbeitsmappen per VBA-Makro öffnen

04. Januar 2012
Martin Althaus Von Martin Althaus, Excel, Office ...

So öffnen Sie über ein Makro eine kennwortgeschützte Excel-Arbeitsmappe

Die Kennwortabfrage beim Öffnen einer geschützten Excel-Arbeitsmappe

Die Kennwortabfrage beim Öffnen einer geschützten Excel-Arbeitsmappe

Wenn eine Excel-Arbeitsmappe mit einem Kennwort versehen ist, fragt Excel dieses Kennwort beim Öffnen der Arbeitsmappe ab. Die folgende Abbildung zeigt, wie das Fenster zur Kennworteingabe aussieht:

Die Kennwortabfrage beim Öffnen einer geschützten Excel-Arbeitsmappe

Wenn Sie eine Arbeitsmappe per Makro öffnen, ist die Kennworteingabe natürlich sehr lästig. Sie können die Kennwortabfrage aber mit einem Makro umgehen. Setzen Sie den folgenden Programmcode ein:

Sub ArbeitsmappenKennwortOeffnen
Dim Datei As Workbook
Set Datei = Application.Workbooks.Open(Filename:="C:\Dateien\Schutzdatei.xls", Password:="Kennwort")End Sub

Um das Makro in eine Exccel-Arbeitsmappe einzubinden, gehen Sie folgendermaßen vor:

  1. Öffnen Sie die gewünschte Arbeitsmappe.
  2. Drücken Sie die Tastenkombination ALT F11, um in allen Excel-Versionen den VBA-Editor aufzurufen.
  3. Wählen Sie im VBA-Editor das Kommando EINFÜGEN - MODUL.
  4. Geben Sie das Makro ein.
  5. Beenden Sie den VBA-Editor über das Kommando DATEI - SCHLIEßEN UND ZURÜCK ZU MICROSOFT EXCEL.

Für den Start des Makros verwenden Sie in Excel die Tastenkombination ALT F8 und wählen das Makro ARBEITSMAPPENKENNWORTÖFFNEN aus.

Das Verfahren funktioniert nur dann, wenn Sie das Kennwort kennen. Ersetzen Sie dazu den Text KENNWORT durch das Passwort, das Sie festgelegt haben. Durch den Einsatz der Objektvariablen DATEI können Sie über diese Variable nach dem Öffnen der Arbeitsmappe problemlos auf die Tabellenblätter der gerade geöffneten Arbeitsmappe zugreifen. Um beispielsweise in Zelle A1 im ersten Tabellenblatt der zuvor geöffneten Arbeitsmappe den Wert 100 einzutragen, verwenden Sie das folgende Kommando:

Datei.Worksheets(1).range("A1").Formula = 100

  • Excel Vorlagen zum Sofort-Download
  • Geprüfte Vorlagen zum Sofort-Einsatz
  • Gratis Makros & Add-Ins im Downloadcenter

DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Weitere Artikel zum Thema

Newsletter

Jetzt kostenlose Excel-Hilfe anfordern!

  • die besten Tipps
  • völlig kostenlos
  • jederzeit abbestellbar
DDV Ehrencodex E-Mail-Marketing
  • Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters.
  • Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter.
  • Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Datenschutzgarantie:

Wir benötigen Ihre E-Mail-Adresse für die Zusendung des Newsletters. Wir geben Ihre E-Mail-Adresse garantiert nicht an Dritte weiter. Jederzeit abbestellbar durch einen Link im Newsletter.

Unsere Experten

Rudolf Ring twittert für @Computerwissen

Die von Ihnen eingegebene E-Mail Adresse ist nicht korrekt. Bitte korrgieren Sie Ihre Eingabe und klicken Sie auf "OK":

Bitte wählen Sie mindestens einen Newsletter aus und klicken Sie auf "OK"