Vba pour empecher cellule(s) vide(s)

Résolu/Fermé
isa-- Messages postés 77 Date d'inscription lundi 16 septembre 2013 Statut Membre Dernière intervention 11 mars 2020 - 5 févr. 2015 à 12:53
isa-- Messages postés 77 Date d'inscription lundi 16 septembre 2013 Statut Membre Dernière intervention 11 mars 2020 - 9 févr. 2015 à 18:44
Bonjour,

Voici mon problème, que j'ai voulu résoudre avec une validation des données, mais ca ne fonctionne pas.
Je voudrais obliger l'utilisateur à remplir certaines cellules, donc empêcher l'enregistrement du fichier si ces cellules sont vides.
Je suis d'une nullité crasse en VBa, donc je sollicite l'aide de ceux qui savent !

Merci mille fois d'avance à ceux/celles qui voudront bien me donner un coup de main.

Isa



12 réponses

f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
5 févr. 2015 à 14:10
Bonjour,

Pourriez-vous mettre votre fichier sans donnees sensible a dispo

Pour transmettre un fichier,
il faut passer par un site de pièce jointe tel que cjoint.com

Allez sur ce site : https://www.cjoint.com/
Clic sur parcourir,
Cherche ton fichier,
clic sur ouvrir,
Clic sur "Créer le lien cjoint",
Copier le lien,
Revenir ici le coller dans une réponse...

A+
0
isa-- Messages postés 77 Date d'inscription lundi 16 septembre 2013 Statut Membre Dernière intervention 11 mars 2020 1
5 févr. 2015 à 15:16
Bonjour,
ci dessous le lien vers un fichier qui a très peu d'intérêt, mais pour vous montrer que je voudrais qu'il soit impossible d'enregistrer le fichier tant que les cellules jaunes sont vides

https://www.cjoint.com/c/EBfpyxLFub8

Merci d'avance
0
f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
5 févr. 2015 à 15:39
Re,

exemple: https://www.cjoint.com/c/EBfpTItEQgC

ouvrez le fichier, effacez une ou plusieurs cellule jaune et essayez de fermer le fichier

Il y aurait moyen de verrouiller la saisie cellule jaune,mais je ne sais pas comment vous utilisez ce fichier
0
isa-- Messages postés 77 Date d'inscription lundi 16 septembre 2013 Statut Membre Dernière intervention 11 mars 2020 1
5 févr. 2015 à 17:05
Génial !
Ca marche !
Merci mille fois, je suis ravie.
Je me permets une petite question subsidiaire :
Comment faire pour que ce soit la même chose pour toutes les feuilles du classeur (si ce n'est pas abuser...)

Isa
0

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
Modifié par f894009 le 5/02/2015 à 17:11
Re,

quel fichier avez-vous recupere??

celui-ci oblige la saisie des cellules sur deplacement dans la feuille en plus de la non fermeture ou sauvegarde si cellules vide

https://www.cjoint.com/c/EBfruKeCHTM
0
isa-- Messages postés 77 Date d'inscription lundi 16 septembre 2013 Statut Membre Dernière intervention 11 mars 2020 1
5 févr. 2015 à 17:28
J'avais pris le premier.
Mais celui que vous venez de poster pourrait convenir aussi
Bravo et merci
0
f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
Modifié par f894009 le 5/02/2015 à 17:39
Re,

Pour le premier, il faut mettre tous les tests des cellules de chaque feuille dans les deux procedures de ThisWorbook

Pour le deuxieme, il faut en plus mettre du code du meme type que la feuille1 dans toutes les feuilles

Pour les deux, mettre un mot de passe de protection du code VBA
0
isa-- Messages postés 77 Date d'inscription lundi 16 septembre 2013 Statut Membre Dernière intervention 11 mars 2020 1
9 févr. 2015 à 16:55
Re bonsoir

Pour le premier, j'imagine qu'il faut modifier cette ligne :

With Worksheets("feuil1")

Mais j'avoue que je ne connais pas du tout la syntaxe pour ce faire.

Avec quoi séparer les noms des feuilles ?
Merci

Isabelle
0
f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
9 févr. 2015 à 17:08
Bonjour,

un exemple avec trois feuilles: https://www.cjoint.com/c/EBjrsO1lGRR
0
isa-- Messages postés 77 Date d'inscription lundi 16 septembre 2013 Statut Membre Dernière intervention 11 mars 2020 1
9 févr. 2015 à 17:27
Génial, ca marche !
Trop fort...
Par contre, pourquoi dans le "Workbook_BeforeClose" on a deux fois la feuil1( au début et à la fin ) et pas dans le Workbook_BeforeSave ?
0
f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 710
9 févr. 2015 à 17:28
Re,

un coller de trop.
0
isa-- Messages postés 77 Date d'inscription lundi 16 septembre 2013 Statut Membre Dernière intervention 11 mars 2020 1
9 févr. 2015 à 18:44
Bravo et merci pour votre aide, la rapidité et la pertinence de vos réponses.

Je note le sujet comme résolu.

Bonne soirée
0