Thread: Automatic CAPS
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.worksheet.functions
Gord Dibben Gord Dibben is offline
external usenet poster
 
Posts: 22,906
Default Automatic CAPS

To save yourself a lot of typing just run this macro on the existing formulas to
add the NA trap.

Sub NATrapAdd()
Dim myStr As String
Dim cel As Range
For Each cel In Selection
If cel.HasFormula = True Then
If Not cel.Formula Like "=IF(ISNA*" Then
myStr = Right(cel.Formula, Len(cel.Formula) - 1)
cel.Value = "=IF(ISNA(" & myStr & "),""""," & myStr & ")"
End If
End If
Next
End Sub


Gord

On Sun, 2 Mar 2008 11:53:00 -0800, Dave wrote:

I altered my formula as recommended and the formula was deleted from the cell
(E4) and therefore defeats its purpose. I want the formula to remain but not
display #N/A if D4 is blank.

Thanks

=IF(D4="","",(INDEX('C:\Users\Laptop 2\Desktop\[Donor List.xlsx]Donor Master
list-08'!$B$1:$F$426, MATCH(D6,'C:\Users\Laptop 2\Desktop\[Donor
List.xlsx]Donor Master list-08'!$B$1:$B$426,), MATCH("Sale
Price",'C:\Users\Laptop 2\Desktop\[Donor List.xlsx]Donor Master
list-08'!$B$1:$F$1,))))