Macro: Help creating pop-up box if column has certain word!!

[adam18]

Excel Macro question:

Can you help me out creating a pop-up box that says "Choose other" if Column F has the word "#N/A"?

Thanks!

 

[JoeMo]

Excel Macro question:

Can you help me out creating a pop-up box that says "Choose other" if Column F has the word "#N/A"?

Thanks!

Please clarify. You want a pop-up if a cell in col F is selected and contains the error #N/A? If yes, is that error being returned by a formula in the cell?

 

[adam18]

Thanks for replying!


Sorry about the wording.

Basically I want to check the entire column F. Then if the column contains the word "#N/A", I want a pop-up box that has the message "error"

 

[JoeMo]

Thanks for replying!


Sorry about the wording.

Basically I want to check the entire column F. Then if the column contains the word "#N/A", I want a pop-up box that has the message "error"

You didn't answer my question as to whether the error, if any, is being returned by a formula so I'll assume it is.

Sub Adam18()
Dim c As Range
On Error Resume Next
With Intersect(Range("F:F"), ActiveSheet.UsedRange)
    For Each c In .SpecialCells(xlCellTypeFormulas, xlErrors)
        On Error GoTo 0
        If c Is Nothing Then Exit Sub
        If c.Value = CVErr(xlErrNA) Then
            MsgBox "error"
            Exit For
        End If
    Next c
End With
End Sub