la mouette
XLDnaute Nouveau
Bonjour Forum
Voilà mon p'tit problème, après plusieurs tentatives infructueuses je cherche à faire en sorte que mon fichier excel ne puisse être sauvegardable que si toutes les cellules que j'ai choisies sont remplie.
J'ai tésté plusieurs façons de le faire dont celle-ci :
Le problème c'est qu'il suffit juste de remplir une seule de ces cellules pour pouvoir sauvegarder (et pas toutes comme je le voudrais... ).
Merci de m'apporter vos lumières
Voilà mon p'tit problème, après plusieurs tentatives infructueuses je cherche à faire en sorte que mon fichier excel ne puisse être sauvegardable que si toutes les cellules que j'ai choisies sont remplie.
J'ai tésté plusieurs façons de le faire dont celle-ci :
Code:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If IsEmpty(Range("B10")) And IsEmpty(Range("M16")) And IsEmpty(Range("O22")) And IsEmpty(Range("027")) Then
Cancel = True
MsgBox "SAUVEGARDE IMPOSSIBLE ! Toutes les cellules doivent être renseignées."
End If
End Sub
Le problème c'est qu'il suffit juste de remplir une seule de ces cellules pour pouvoir sauvegarder (et pas toutes comme je le voudrais... ).
Merci de m'apporter vos lumières