Daten aus Passwortgeschützten Tabellen auslesen

Forumthread: Daten aus Passwortgeschützten Tabellen auslesen

09.08.2005 09:38:53

Wolfgang

Liebe Profis,
ich habe nur eine kleine Frage die ihr sicher alle beantworten könnt. Dafür bedanke ich mich schon jetzt!
Ich lese aus 10 verschiedenen Tabellen Daten aus und werte sie in einer anderen Tabelle aus. Nach der Frage, ob ich die Daten aktualisieren möchte, muss ich für jede der 10 Tabellen manuell das Passwort der Quelldatentabelle eingeben. Kann man dieses Passwort in der Formel der auslesenden Tabelle hinterlegen und wie ist die Syntax. Ich weiss, das es mit VBA geht, da ich jedoch keine Ahnung von VBA habe hoffe ich, dass es auch anders funktioniert.
Danke!!!
Wolfgang
PS: Das Forum ist KLASSE!!!

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

AW: Daten aus Passwortgeschützten Tabellen auslese

10.08.2005 00:39:15

Matthias

Hallo Wolfgang,
zuerst musst du die automatische Aktualisierung deaktivieren:
Menü Bearbeiten - verknüpfungen, Button "Eingabeaufforderung beim Start",
Option "keine Warung anzeigen und Verknüpfung nicht aktualisieren"
"OK", "Schließen"
(Mit VBA kannst du das über den Befehl "ActiveWorkbook.UpdateLinks=xlUpdateLinksNever" machen.)
So jetzt musst du aber für die Aktualisierung selber sorgen. Dir müssen die Pfade der Dateien und deren Kennwörter bekannt sein.
In die Mappe mit den Verknüpfungen musst du ins Modul "DieseArbeitsmappe" diesen Code einsetzen (und anpassen):


Private Sub Workbook_Open()
Application.ScreenUpdating = False
Workbooks.Open Filename:=ThisWorkbook.Path & "\d1.xls", Password:="123"
Workbooks.Open Filename:=ThisWorkbook.Path & "\d2.xls", Password:="123"
Workbooks.Open Filename:=ThisWorkbook.Path & "\d3.xls", Password:="123"
Do While Application.CalculationState = xlCalculating
DoEvents
Loop
Workbooks("d1.xls").Close False
Workbooks("d2.xls").Close False
Workbooks("d3.xls").Close False
Application.ScreenUpdating = True
End Sub

Der Ausdruck ThisWorkbook.Path & "Datei.xls" heißt, dass Datei.xls in gleichen Ordner wie die auswertungsmappe steht. Wenn dem nicht so ist, kannst du absolute Pfade verwenden.
Mit der Do...Loop Schleife wartet Excel auf die Aktualisierung der Verknüpfungen. Ob dies nötig ist, weiß ich nicht, es kann aber nicht schaden...
Gruß und viel Erfolg,
Matthias

Danke Matthias G. klappt also nicht ohne VBA?!

10.08.2005 07:43:11

Wolfgang

Herzlichen Dank! Ich werde versuchen ob ich es hinkriege. Ich hatte jedoch die Hoffnung, dass so etwas funktionieren könnte:
='C:\Test\[test1.xls][Password:"123"]Tabelle1'!$A$1 (wie auch immer die Syntax sei?!)
Da ich sowieso immer von den Socken bin, was IHR mit VBA anstellt, steigt mein Wunsch es zu lernen ständig. Der Einstieg fällt mir jedoch sehr schwer, da ich schon den Aufbau des Visual-Basic-Editors nicht verstehe.
Nochmals Danke für Deine Hilfe - klasse dass es Euch gibt!!!

AW: Danke Matthias G. klappt also nicht ohne VBA?!

10.08.2005 09:24:52

Matthias

Hallo Wolfgang,
Ich hatte unter Excel 5 Makros programmiert (alles hobbymäßig) und dachte bei Excel 97, als ich das erste Mal den VB-Editor sah, auch nur: Hä?
Aber mit der Zeit wird alles klar.
hier ist eine grobe Übersicht:
www.schwengi.com/itkurse/pdf/Excel_VBA_Theorie.pdf
Gruß Matthias

Infobox / Tutorial

Daten aus Passwortgeschützten Tabellen auslesen

Schritt-für-Schritt-Anleitung
Häufige Fehler und Lösungen
Alternative Methoden
Praktische Beispiele
Tipps für Profis
FAQ: Häufige Fragen

Schritt-für-Schritt-Anleitung

Um Daten aus passwortgeschützten Excel-Tabellen auszulesen, kannst du die folgenden Schritte befolgen:

Automatische Aktualisierung deaktivieren:
- Gehe zu Bearbeiten -> Verknüpfungen.
- Klicke auf den Button Eingabeaufforderung beim Start.
- Wähle die Option keine Warnung anzeigen und Verknüpfung nicht aktualisieren.
- Bestätige mit OK und schließe das Fenster.

VBA-Code einfügen:

Öffne den Visual Basic Editor (Alt + F11).
Suche das Modul DieseArbeitsmappe.
Füge den folgenden Code ein und passe ihn an deine Dateipfade und Passwörter an:

Private Sub Workbook_Open()
   Application.ScreenUpdating = False
   Workbooks.Open Filename:=ThisWorkbook.Path & "\d1.xls", Password:="123"
   Workbooks.Open Filename:=ThisWorkbook.Path & "\d2.xls", Password:="123"
   Workbooks.Open Filename:=ThisWorkbook.Path & "\d3.xls", Password:="123"
   Do While Application.CalculationState = xlCalculating
       DoEvents
   Loop
   Workbooks("d1.xls").Close False
   Workbooks("d2.xls").Close False
   Workbooks("d3.xls").Close False
   Application.ScreenUpdating = True
End Sub

Dateien und Pfade anpassen:
- Stelle sicher, dass die angegebenen Dateien im gleichen Ordner wie deine Auswertungsmappe liegen. Andernfalls kannst du absolute Pfade verwenden.
Makro ausführen:
- Schließe den VBA-Editor und speichere deine Arbeitsmappe als Makro-enabled Datei (.xlsm).
- Öffne die Arbeitsmappe erneut, damit das Makro ausgeführt wird.

Häufige Fehler und Lösungen

Fehlermeldung beim Öffnen: Stelle sicher, dass der Pfad zur Datei korrekt ist und die Datei nicht verschoben wurde.
Passwort falsch: Überprüfe, ob das Passwort korrekt eingegeben ist.
VBA funktioniert nicht: Stelle sicher, dass Makros in deinen Excel-Einstellungen aktiviert sind.
Daten werden nicht aktualisiert: Überprüfe die Verknüpfungen und stelle sicher, dass die Quell-Dateien geöffnet werden.

Alternative Methoden

Falls du VBA nicht verwenden möchtest, gibt es einige alternative Möglichkeiten:

Power Query: Mit Power Query kannst du Daten aus verschiedenen Quellen, einschließlich passwortgeschützter Excel-Dateien, importieren. Du kannst dabei die Passworte in den Abfrageeinstellungen speichern.
Manuelle Eingabe: Du kannst die Daten manuell aus den passwortgeschützten Dateien kopieren, jedoch ist dies bei vielen Dateien zeitaufwendig.

Praktische Beispiele

Ein Beispiel für die Verwendung von VBA zur Datenextraktion könnte so aussehen:

Angenommen, du hast drei Tabellen (d1.xls, d2.xls, d3.xls), aus denen du die Werte in deiner Auswertungsmappe zusammenfassen möchtest. Der oben bereitgestellte VBA-Code öffnet diese Dateien, liest die erforderlichen Daten aus und schließt die Dateien anschließend wieder.

Ein Beispiel für die Verwendung von Power Query könnte sein:

Gehe in Excel zu Daten -> Daten abrufen -> Aus Datei -> Aus Arbeitsmappe. Wähle die Datei aus, gib das Passwort ein und importiere die Daten.

Tipps für Profis

VBA lernen: Wenn du häufig mit passwortgeschützten Dateien arbeitest, ist es sinnvoll, Grundkenntnisse in VBA zu erwerben. Es gibt viele Ressourcen und Tutorials online, die dir helfen können.
Sicherheitsaspekte: Behandle Passwörter und sensible Daten mit Sorgfalt. Stelle sicher, dass deine Arbeitsmappen nicht ungeschützt herumliegen und dass du die Daten ordnungsgemäß speicherst.

FAQ: Häufige Fragen

1. Kann ich das Passwort in einer Formel speichern?
Leider kannst du das Passwort nicht direkt in einer Formel speichern. Das Auslesen der Daten aus passwortgeschützten Tabellen erfordert in der Regel VBA.

2. Was mache ich, wenn ich VBA nicht verstehe?
Es gibt viele Online-Ressourcen und Kurse, die dir helfen können, die Grundlagen von VBA zu lernen. Der Einstieg kann schwierig sein, aber mit etwas Übung wirst du schnell Fortschritte machen.

Beliebteste Forumthreads (12 Monate)

Daten aus Passwortgeschützten Tabellen auslesen

Forumthread: Daten aus Passwortgeschützten Tabellen auslesen

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

Infobox / Tutorial

Daten aus Passwortgeschützten Tabellen auslesen

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

Daten aus Passwortgeschützten Tabellen auslesen

Forumthread: Daten aus Passwortgeschützten Tabellen auslesen

3 Beiträge zum Forumthread Beiträge zu diesem Forumthread

Forumthreads zu verwandten Themen

VBA Beispiele zu diesem und ähnlichen Themen

Infobox / Tutorial

Daten aus Passwortgeschützten Tabellen auslesen

Schritt-für-Schritt-Anleitung

Häufige Fehler und Lösungen

Alternative Methoden

Praktische Beispiele

Tipps für Profis

FAQ: Häufige Fragen

Beliebteste Forumthreads (12 Monate)

3
Beiträge zum Forumthread

Beiträge zu diesem Forumthread