Discussion :

[fibule38]

Bonjour,

Merci encore pour ce forum et je fais appel encore une fois à vous pour une question qui me parait simple mais pour laquelle je ne sais pas s'il existe une solution.

Dans une feuille excel 2010, j'ai une cellule en F20 avec un choix OUI ou NON. Si on tope OUI, il apparait en A3 (grace à une simple fonction SI) le libellé "adresse" et on doit saisir l'adresse du client pour le contacter en B3 B4 et B5.
Existe il une formule ou une fonction qui permettrait de rendre obligatoire la saisie des cellules B3 (adresse) B4 (code postal) et B5 (ville) sous condition que F20 soit à OUI avant qu'on puisse enregistrer le document, svp.
Le but est de ne pas pouvoir oublier la saisie de ces zones.

En vous remerciant par avance des vos réponses.

Cordialement

[antonysansh]

Bonjour fibule38,

Une piste avec Workbook_BeforeClose un exemple ici

[Menhir]

Ou bien Workbook_BeforeSave. Elle permet, entre autre, d'annuler la sauvegarde

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel as Boolean)
 
   If Range("F20")="OUI" And (Range("B3")="" Or Range("B4")="" Or Range("B5")="") Then
      MsgBox("Adresse incomplète" + Chr(13) + "Enregistrement refusé", vbOKOnly)
      Cancel = True
   End If
 
End Sub

[fibule38]

Grands mercis à tous les 2.
Je vais suivre vos conseils
Bonne journée
Cordialement

[antonysansh]

Ou bien Workbook_BeforeSave. Elle permet, entre autre, d'annuler la sauvegarde

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel as Boolean)
 
   If Range("F20")="OUI" And (Range("B3")="" Or Range("B4")="" Or Range("B5")="") Then
      MsgBox("Adresse incomplète" + Chr(13) + "Enregistrement refusé", vbOKOnly)
      Cancel = True
   End If
 
End Sub

Le problème de cette méthode et qui si l'utilisateur ferme le classeur et qu'Excel plus demande de sauvegarder, si la sauvegarde n'est pas possible alors le fichier est fermé quand même.

[fibule38]

bonjour,

Exact, si je change d'onglet ou que je ferme le dossier, il enregiste sans avoir bloquer la fermeture. A noter que j'ai plusieurs onglets qui portent les noms : client01 client02 etc jusqu'à 300 et que bien sur ils sont identiques quand ils sont vierges mais différents lors de chaque saisies. F20 pourra être soit à OUI, soit à NON

De plus, comme c'est un document qui aura son importance le jour J, j'ai donc mis en enregistrement automatique toutes les minutes

Merci encore

[Menhir]

Le problème de cette méthode et qui si l'utilisateur ferme le classeur et qu'Excel plus demande de sauvegarder, si la sauvegarde n'est pas possible alors le fichier est fermé quand même.

L'un n'empêche pas l'autre. Je pense même que les deux sont nécessaires.
En ne mettant que BeforClose, ça n'empêcherait pas l'utilisateur de sauvegarder puis de sauvegarder une seconde fois sous un autre nom. Le BeforeClose n'empêcherait pas, alors, la première sauvegarde d'être fallacieuse.
Ca n'empêcherait pas non plus de sauvegarder et de fermer la feuille en fermant Excel.

Je pense donc qu'il faut utiliser les deux.

Exact, si je change d'onglet ou que je ferme le dossier, il enregiste sans avoir bloquer la fermeture. A noter que j'ai plusieurs onglets qui portent les noms : client01 client02 etc jusqu'à 300 et que bien sur ils sont identiques quand ils sont vierges mais différents lors de chaque saisies. F20 pourra être soit à OUI, soit à NON

Tu n'avais pas précisé que tu avais plusieurs onglets.

Tu as le choix : soit tu mets dans les deux procédures citées si-dessus une boucle qui scrute toutes tes feuilles (ce qui peut être long s'il y en a beaucoup), soit mettre la même vérification dans SheetDeactivate et WindowDeactivate ce qui aurait l'avantage de provoquer le message quand l'utilisateur est encore dans la feuille souhaitée.

De plus, comme c'est un document qui aura son importance le jour J, j'ai donc mis en enregistrement automatique toutes les minutes

Toutes les minutes, ça semble beaucoup. Ca risque d'handicaper fortement les utilisateurs.
Teste-le avant de le diffuser.

[fibule38]

bonjour et merci une fois de plus de vos conseils

Bien cordialement