VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Verknüpfung zu einer Mappe durch Eingabe der Zelladresse

Gruppe

Link

Bereich

Extern

Thema

Verknüpfung zu einer Mappe durch Eingabe der Zelladresse

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

    


Beiträge aus dem Excel-Forum zu den Themen Link und Extern