Simple problem in checking multiple sheets written cells

[Klash Ville]

For some reason, the code below, only the first variable ( i ) works, while the other one ( o ) doesn't, is simply ignored.

All I want to do is check if 2 sheets are empty or not (with no written cells).

For i = 1 To Worksheets.Count        
If Worksheets(i).Name = "Feuil1" Then
    exists = True
End If
    Next i
    If Not exists Then
        MsgBox "Apparently the sheet where you were suppose to upload an example of (Feuil1) doesn't exist" & vbNewLine & vbNewLine & _
        "• This is because it was either deleted or renamed into something different than its original name...", vbExclamation
        
        Sheets("Parameters").Select
        Exit Sub
    End If
    For o = 1 To Worksheets.Count
        If Worksheets(o).Name = "Country" Then
            exists = True
        End If
    Next o
    If Not exists Then
        MsgBox "Apparently the sheet where you were suppose to upload an example of (Country) doesn't exist" & vbNewLine & vbNewLine & _
        "• This is because it was either deleted or renamed into something different than its original name...", vbExclamation
        
        Sheets("Parameters").Select
        Exit Sub
    End If

 

[Klash Ville]

oh wow, thank you!

I shall try your improved code in about half an hour or so.

Thanks for your cooperation once again =)

 

[Klash Ville]

I tried your improved code @Dave, and it works like a charm =)

Thank you so much for your effort my friend.

 

[dmt32]

I tried your improved code @Dave, and it works like a charm =)

Thank you so much for your effort my friend.

welcome - many thanks for feedback very much appreciated.

Dave