Macro "IF" Condition

[GreatOffender]

Greetings, With a lot of board help I was able to cobble together a functional macro to assist in my day to day work requirements. I do however have a problem that has been on and off and I will explain. The problem is "on" when the macro places a filter an condition that are not met and it halts and awaits debugging. Fortunately this has been the exception and not the rule but today I have time to work on it so I will present my dilemma and hope anyone and everyone with Macro experience will be able to lead me out of the woods. Problem occurs when none of the entries meet the filter requirements and the data changes daily so I cannot foresee the impending issue until it is run.

Thank you,

Set wf = Application.WorksheetFunction
Set rngData = .Range("A2:A" & lngLastRow)
    With rngData
    .AutoFilter Field:=3, Criteria1:=Array( _
        "3456", "3125", "3451", "3110", "3370"), Operator:=xlFilterValues
    For Each c In wsd.AutoFilter.Range.Range("M2:M" & lngLastRow).SpecialCells(xlCellTypeVisible)
        c.Value = wf.WorkDay(c.Value, 1)
    Next

 

[Joe4]

There are a few ways you can go about this.
You can count how many rows your filter returns using the SUBTOTAL function shown here: Excel formula: Count visible rows in a filtered list | Exceljet.
(note to use this in VBA, you would preface it with Application.Worksheetfunction.Subtotal(...))

Another thing you can do is add error handling to your VBA code to ignore/bypass that error.
You can check out this link, specifically the "On Error Statement" section.

VBA Error Handling - A Complete Guide - Excel Macro Mastery

“Abort, Retry, Fail?” – MS-DOS error message circa 1986 This post provides a complete guide to VBA Error Handing. If you are looking for a quick summary then check out the quick guide table in the first section. If you are looking for a particular topic on VBA Error Handing then check out the...

excelmacromastery.com

 

[GreatOffender]

Thank you for your reply. I believe the VBA Error Handling... is not only informative but certainly more than sufficient.

Thanks again!

 

[Joe4]

You are welcome.