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
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen