MAMIBUSSOL
Board Regular
- Joined
- Jun 2, 2011
- Messages
- 95
I am running the following code on a series of transactions with various acc codes two scenario's exist
Scenario 1
there are transactions assigned to CHARGES in which case this code works without a problem
Scenario 2
there are no transactions assigned to CHARGES in which case this code works but transfers all transactions, I need a way to bypass this line if the filter doesn't have any matching records
any suggestions would be appreciated
Scenario 1
there are transactions assigned to CHARGES in which case this code works without a problem
Code:
With ActiveWorkbook.Worksheets("CRED")
.Range("$A$1:$IE$388").AutoFilter Field:=3, Criteria1:="=CHARGES"
.Range("$AU$3:$AU$388").Value = "YES"
.Range("$A$3:$G$388").Copy Sheets("TRIAL").Range("AC" & Sheets("TRIAL").Rows.Count).End(xlUp).Offset(1)
End With
Scenario 2
there are no transactions assigned to CHARGES in which case this code works but transfers all transactions, I need a way to bypass this line if the filter doesn't have any matching records
Code:
.Range("$A$3:$G$388").Copy Sheets("TRIAL").Range("AC" & Sheets("TRIAL").Rows.Count).End(xlUp).Offset(1)
any suggestions would be appreciated