P
Pistolade
What I need Is a bit of code that checks Table 338 Column 6/F/"LA
PRICE(NC)" for "#VALUE!", and if that text is found to run this;
Code
-------------------
ActiveSheet.ListObjects("Table338").Range.AutoFilter Field:=6, Criteria1:="=#VALUE!", Operator:=xlFilterValues
Range("A2", Range("A2").SpecialCells(xlCellTypeLastCell).Offset(0, -4)).Select
Selection.Copy
Windows("DeleteAlso.xlsx").Activate
Range("A3").End(xlDown).Offset(-1).Select
ActiveSheet.Paste
-------------------
Else;
End Sub
Thanks,
-Pistolade
PRICE(NC)" for "#VALUE!", and if that text is found to run this;
Code
-------------------
ActiveSheet.ListObjects("Table338").Range.AutoFilter Field:=6, Criteria1:="=#VALUE!", Operator:=xlFilterValues
Range("A2", Range("A2").SpecialCells(xlCellTypeLastCell).Offset(0, -4)).Select
Selection.Copy
Windows("DeleteAlso.xlsx").Activate
Range("A3").End(xlDown).Offset(-1).Select
ActiveSheet.Paste
-------------------
Else;
End Sub
Thanks,
-Pistolade