L
Lee
Does anyone know how to list all the formulas in a worksheet and what cells
they are in?
Thanks in advance,
they are in?
Thanks in advance,
You are using an out of date browser. It may not display this or other websites correctly.
You should upgrade or use an alternative browser.
You should upgrade or use an alternative browser.
J
Jacob Skaria
Hi Lee
The below macro will identify all formulas from Sheet1 and list out in
Sheet2..with cell address and the formula in text format..Adjust to suit. Try
and feedback
Sub Mac()
Dim lngRow As Long: longRow = 1
For Each cell In Sheets("Sheet1").UsedRange
If Left(cell.Formula, 1) = "=" Then
lngRow = lngRow + 1
Sheets("Sheet2").Range("A" & lngRow) = cell.Address
Sheets("Sheet2").Range("B" & lngRow) = "'" & cell.Formula
End If
Next
End Sub
The below macro will identify all formulas from Sheet1 and list out in
Sheet2..with cell address and the formula in text format..Adjust to suit. Try
and feedback
Sub Mac()
Dim lngRow As Long: longRow = 1
For Each cell In Sheets("Sheet1").UsedRange
If Left(cell.Formula, 1) = "=" Then
lngRow = lngRow + 1
Sheets("Sheet2").Range("A" & lngRow) = cell.Address
Sheets("Sheet2").Range("B" & lngRow) = "'" & cell.Formula
End If
Next
End Sub
F
FSt1
hi
another way would be to use the keyboard shortcut Ctrl + ~ .
this would allow you to toggle from normal view to formula view and back.
Regards
FSt1
another way would be to use the keyboard shortcut Ctrl + ~ .
this would allow you to toggle from normal view to formula view and back.
Regards
FSt1
R
Rick Rothstein
If Left(cell.Formula, 1) = "=" Then
Another possibility (a simpler one) for this line would be...
If cell.HasFormula Then
L
Lee
Thank you everyone. All your suggestions work perfectly.
Thanks again,
Thanks again,