I have some overlapping error handlers and I can't figure out how to make the second one work. The first error handler deals with which of two naming conventions a given file might have. But then I need something that goes to the next cel in [Customers] if neither of the naming conventions are present for the current cel.
How would I write that? Humor me along with my GoTo names. Just a little comic relief in a long, glorious day of coding.
Dim cel As Range
For Each cel In ActiveSheet.[Customers]
Dim wb As String, wb2 As String
wb = cel & " " & ActiveSheet.[annum] & " " & "Week " & [F1] & ".xls"
wb2 = cel & " " & ActiveSheet.[annum] & " " & "Week " & [F1] & "_2BCoded.xls" '& [XLVersion]
On Error GoTo Paris
ChDir ThisWorkbook.Path & "\..\" & cel & "\3_Working Files\Coded\"
ChDir ThisWorkbook.Path & "\..\" & cel & "\3_Working Files\2BCoded\"
Application.DisplayAlerts = False
On Error GoTo Madrid
Application.DisplayAlerts = True