Funktions-/Formelparameter auslesen
06.10.2006 07:32:26
Stefan
vielleicht kann mir jemand weiterhelfen.
Ich lasse mir mit folgendem Code die Adressen aller Zellen,
die eine Formel bzw. Funktion beinhalten anzeigen.
Gibt es einen Weg auch die Parameterwerte der jeweiligen Funktion
auszulesen? Die Bearbeitung jedes c.cells.FormulaLocal Strings mit den
üblichen Stringoperationen möchte ich vermeiden.
Sub catchCellAdr()
Dim rngFormulas, c As Range
Set rngFormulas = ActiveSheet.UsedRange.SpecialCells(xlCellTypeFormulas)
If Not rngFormulas Is Nothing Then
For Each c In rngFormulas
Debug.Print c.Cells.Address
Next c
End If
End Sub
Hier die Funktion mit den Parametern, die ich gern haben würde.
Function myFunction(id As String, value As String)
End Function
Danke.
Gruss
Stefan