Delete row if #REF! shown

[ipbr21054]

Hi,
I am using this simple code =DATABASE!A202 & son on.
I have noticed that if nothing is in the cell in question then on the worksheet where there should be a value etc i see #REF !

Can we use some kind of code so that row is then deleted should #REF ! be in any cell in Column A

Thanks

 

[ipbr21054]

Hi,
I justed deleted that text in red then tried it,
Same thing happens in respect of message and same line of code in yellow

Real pain

 

[Fluff]

Weird.

Try

On Error Resume Next
   .Range("A" & Rows.Count).End(xlUp).Offset(4).Value = "=#n/a"
   .Columns("A").SpecialCells(xlFormulas, xlErrors).EntireRow.Delete
On Error GoTo 0

 

[ipbr21054]

Hi,
If written like below then i opened it ok without any message being shown.

Private Sub Workbook_Open()   With Worksheets("INV DETAILS")
On Error Resume Next
   .Range("A" & Rows.Count).End(xlUp).Offset(4).Value = "=#n/a"
   .Columns("A").SpecialCells(xlFormulas, xlErrors).EntireRow.Delete
On Error GoTo 0
   End With
End Sub