Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender

Forumthread: relativer Verweis auf andere Excel-Datei

relativer Verweis auf andere Excel-Datei
12.05.2006 08:17:59
stefanseevetal
Hallo! ich hab schon wieder eine Frage!
Ich möchte durch anklicken eines Buttons, dass eine andere Excel-Datei geöfnet wird. Das funktioniert auch so wie hier beschrieben:

Sub zu_Checkliste()
Workbooks.Open Filename:="O:\Sonstiges\...\Aktuell\checkliste.xls"
End Sub

Ich möchte es aber lieber mit relativen Verweisen auf die anderen Dateien machen, damit die Makros auch noch funktionieren, wenn ich den Ordner mal verschiebe. Sämtliche untereinander verknüpfte Excel-Dateien sind im gleichen Ordner. Hatte gedacht, dass man vielleicht einfach
Workbooks.Open Filename:="checkliste.xls"
schreiben kann, aber so einfach funktioniert es leider nicht.
Hat jemand eine Idee?
Vielen Dank und Gruß,
Stefanseevetal
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: relativer Verweis auf andere Excel-Datei
12.05.2006 08:43:09
Harry
Hallo Stefanseevatal
mir ist da nicht's bekannt. Ich löse das Problem so:
Beim Öffen der Hauptdatei lese ich den Pfad aus (ThisWorkbook.path) und setze den in eine Zelle oder wärend der Laufzeit in die Variable Pfad - dadurch erhälst Du den relativen Pfad.
Im 2. Schritt erfolgt dann beim Start des Buttons eine Verknüpfung des relativen Pfad und der gewünschten Datei.
gruss Harry
Anzeige
AW: relativer Verweis auf andere Excel-Datei
12.05.2006 10:19:10
stefanseevetal
Hallo Harry! Vielen Dank für die Antwort.
Da ich mich mit VBA leider nicht so gut auskenne habe ich noch Probleme mit der Syntax. Wie definiere ich die Variable zur Laufzeit und wie verknüpfe ich den relativen Pfad mit der gewünschten Datei?
Hab mir gedacht, dass es vielleicht so gehen könnte, aber das ist falsch:

Sub zu_Checkliste()
CHDir (ThisWorkbook.Path)
Workbooks.Open Filename:="checkliste.xls"
End Sub

Danke und Gruß,
Stefanseevetal
Anzeige
AW: relativer Verweis auf andere Excel-Datei
12.05.2006 11:40:00
Harry
Hallo Stefanseevatal
ganz einfach (wenn man's weiss ;)

Sub DateiOpen()
Dim Pfad As String
Dim Datei As String
Pfad = ThisWorkbook.Path
Datei = "checkliste.xls"
Workbooks.Open Filename:=Pfad & "\" & Datei
End Sub

geschlossen o.w.T.
12.05.2006 12:24:06
Reinhard

Gruß Reinhard ps: Ich freue mich über eine Rückmeldung ob diese Antwort hilfreich war oder nicht..
Anzeige
warum? o.T.
HansHei
AW: warum? o.T.
12.05.2006 23:14:12
Reinhard
Hallo Hans,
weil er 3 Stunden nach der ersten Anfrage einen neuen Thread aufgemacht hat und da Lösungen bekam und hier stand die Frage noch auf offen deshalb schloss ich das hier.
https://www.herber.de/forum/messages/763518.html
Gruß
Reinhard
Anzeige
;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Relativer Verweis auf andere Excel-Datei


Schritt-für-Schritt-Anleitung

Um einen relativen Verweis auf eine andere Excel-Datei zu erstellen, befolge diese Schritte:

  1. Öffne die Hauptdatei in Excel.

  2. Füge ein neues VBA-Modul hinzu:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.
    • Klicke mit der rechten Maustaste auf "VBAProject (DeineDatei.xlsx)" und wähle Einfügen > Modul.
  3. Gebe den folgenden Code ein:

    Sub DateiOpen()
       Dim Pfad As String
       Dim Datei As String
       Pfad = ThisWorkbook.Path
       Datei = "checkliste.xls"
       Workbooks.Open Filename:=Pfad & "\" & Datei
    End Sub
  4. Schließe den VBA-Editor und kehre zu Excel zurück.

  5. Füge einen Button hinzu:

    • Gehe zu Entwicklertools > Einfügen > Schaltfläche.
    • Zeichne die Schaltfläche auf das Blatt und weise das Makro DateiOpen zu.
  6. Klicke auf den Button, um die andere Datei zu öffnen.

Damit hast du erfolgreich einen Excel Bezug zu einer anderen Datei mit einem relativen Pfad erstellt.


Häufige Fehler und Lösungen

  • Fehler: Excel Verweis auf andere Datei funktioniert nicht
    Mögliche Ursache: Die Datei, auf die verwiesen wird, existiert nicht im angegebenen Verzeichnis. Stelle sicher, dass sich die Datei im gleichen Ordner wie die Hauptdatei befindet.

  • Fehler bei der Syntax
    Überprüfe, ob der Code korrekt eingegeben wurde, insbesondere bei der Verwendung von & für die Verknüpfung von Strings.


Alternative Methoden

Eine alternative Methode, um einen Excel Bezug auf eine andere Datei herzustellen, ist die Verwendung von Excel-Formeln. Du kannst beispielsweise die Funktion INDIREKT verwenden, um auf Daten in einer anderen Datei zuzugreifen. Beachte jedoch, dass die Datei geöffnet sein muss.

Beispiel:

=INDIREKT("'[checkliste.xls]Tabelle1'!A1")

Diese Formel verweist auf die Zelle A1 in der Datei checkliste.xls, die sich im selben Verzeichnis wie die Hauptdatei befindet.


Praktische Beispiele

Hier sind einige praktische Beispiele für den Excel Verweis auf andere Excel-Datei:

  1. Öffnen einer Datei mit einem relativen Pfad:

    Sub OpenOtherFile()
       Dim Pfad As String
       Pfad = ThisWorkbook.Path
       Workbooks.Open Filename:=Pfad & "\Daten.xlsx"
    End Sub
  2. Verwendung eines relativen Links in einer Formel:

    =SVERWEIS(A1, '[Daten.xlsx]Tabelle1'!$A$1:$B$100, 2, FALSCH)

Tipps für Profis

  • Verwende konstante Variablen für Dateinamen und Pfade, um die Wartung zu erleichtern.
  • Teste deinen Code gründlich, insbesondere wenn du Excel Referenzen auf andere Dateien erstellst, um sicherzustellen, dass der relative Pfad immer korrekt bleibt.
  • Halte deine Ordnerstruktur klar und übersichtlich, um Verwirrungen zu vermeiden. Das macht den Excel Bezug zu anderer Datei viel einfacher.

FAQ: Häufige Fragen

1. Kann ich auch andere Dateiformate öffnen?
Ja, du kannst auch andere Excel-Dateiformate wie .xlsm oder .csv verwenden, solange sie sich im gleichen Ordner befinden.

2. Was mache ich, wenn ich die Datei verschiebe?
Wenn du die Hauptdatei und alle verknüpften Dateien im gleichen Ordner verschiebst, bleibt der relative Pfad intakt und die Verweise funktionieren weiterhin.

3. Funktioniert das auch in Excel Online?
Die beschriebenen Methoden sind für die Desktop-Version von Excel gedacht. Excel Online unterstützt keine VBA-Makros, daher musst du in diesem Fall auf andere Lösungen zurückgreifen, z.B. manuelle Verlinkungen.

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