Excel und VBA: Formeln, Programmierung, Lösungen
Die Excel/VBA-Beispiele
Thema
Verknüpfungen in 2. Blatt transponiert anlegen
Gruppe
Intern
Problem
Wie kann ich in Tabelle2 Verknüpfungen zu einem Zellberich in Tabelle2 in transponierter Form anlegen, wobei der Bereich zum Einfügen bei Zelle D1 beginnen soll?
Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain
Sub Transponieren()
Dim iCounter As Integer
For iCounter = 1 To 4
With Worksheets("Tabelle2")
.Cells(1, iCounter + 3).Formula = _
"=Tabelle1!" & Cells(iCounter, 1).Address
End With
Next iCounter
End Sub