KTM
XLDnaute Impliqué
SALUT le Forum
J'ai élaboré la macro suivante avec plusieurs conditions . Elle fonctionne bien mais j'aimerais savoir s'il ya un autre moyen plus simple de l'écrire. Merci
If Sheets("TB").Range("B5") = "" Or Sheets("TB").Range("B6") = "" Or Sheets("TB").Range("B7") = "" _
Or Sheets("TB").Range("B8") = "" Or Sheets("TB").Range("B9") = "" Or Sheets("TB").Range("B10") = "" _
Or Sheets("TB").Range("B11") = "" Then
MsgBox " Veuillez Renseigner Tout le Tableau de Bord ", 64
Exit Sub
End If
J'ai élaboré la macro suivante avec plusieurs conditions . Elle fonctionne bien mais j'aimerais savoir s'il ya un autre moyen plus simple de l'écrire. Merci
If Sheets("TB").Range("B5") = "" Or Sheets("TB").Range("B6") = "" Or Sheets("TB").Range("B7") = "" _
Or Sheets("TB").Range("B8") = "" Or Sheets("TB").Range("B9") = "" Or Sheets("TB").Range("B10") = "" _
Or Sheets("TB").Range("B11") = "" Then
MsgBox " Veuillez Renseigner Tout le Tableau de Bord ", 64
Exit Sub
End If