stella69670
XLDnaute Nouveau
Bonjour,
J'ai pu appliquer ce code uniquement sur A2, mais j'aimerai que ce soit le cas pour les cellules :
A2 / C2 / E2 / J2
Je pense que le code ne fonctionne pas car il y a de fusionné :
C2:.D2 // E2:G2 // J2:N2
Merci pour votre aide.
J'ai pu appliquer ce code uniquement sur A2, mais j'aimerai que ce soit le cas pour les cellules :
A2 / C2 / E2 / J2
Je pense que le code ne fonctionne pas car il y a de fusionné :
C2:.D2 // E2:G2 // J2:N2
VB:
Private Sub Workbook_BeforeClose(Cancel As Boolean)
If ThisWorkbook.Sheets("Feuil2").Range("A2:M2") = "" Then
Cancel = True
MsgBox "Remplir d'abord les cellules Jaunes"
End If
End Sub
Merci pour votre aide.