wie kann ich mit Hilfe eines Makros alle Formeln eines Arbeitsblattes, mit der Zelle in der diese stehen, als zweispaltige Liste auf dem gleichen Arbeitsblatt ausgeben lassen?
Bsp.
A1 =B6+C7
C7 =D4+E12
usw.
Option Explicit
Sub Formeln_auflisten()
Dim C As Range, i As Long
i = 2
For Each C In Tabelle1.Cells.SpecialCells(xlCellTypeFormulas)
Cells(i, 10) = C.Address(0, 0)
Cells(i, 11) = "'" & C.FormulaLocal
i = i + 1
Next C
End Sub
Ausgabe ab Spalte 10 (auf Deinen Bedarf anpassen - ebenfalls Tabelle1).
Grüße Boris