Excel und VBA: Formeln, Programmierung, Lösungen
Die Excel/VBA-Beispiele
Thema
Verknüpfung zu einer Mappe durch Eingabe der Zelladresse
Gruppe
Extern
Problem
Wie kann ich durch Eingabe einer Zelladresse (F16) in ein Zelle eine Verknüpfung zu der in der Kopfzeile der Spalte genannten Arbeitsmappe und in der Zelle darunter genannten Tabele herstellen?
Lösung
Geben Sie den Ereigniscode in das Klassenmodul der Arbeitsmappe ein.
ClassModule: DieseArbeitsmappe Private Sub Workbook_Open() Dim wks As Worksheet Dim iCol As Integer Dim sPath As String, sFormula As String Set wks = Worksheets("Tabelle1") sPath = "='" & ThisWorkbook.Path & "\" For iCol = 1 To 3 sFormula = sPath & "[" & wks.Cells(1, iCol).Value & "]" sFormula = sFormula & wks.Cells(2, iCol).Value & "'!A1" wks.Cells(3, iCol).Formula = sFormula sFormula = "" Next iCol End Sub