Macro dans formulaire

Bonjour,

J'aurai aimé trouver une macro qui vérifie que les champs d'un formulaire
soit tous remplis et que cela soit bloquant si un des champs n'est pas
rempli. J'ai regardé dans les questions déjà posé et j'ai trouvé un problème
similaire mais je n'arrive pas à utiliser la macro. La solution du bouton
Macrobutton m'interesse aussi mais je suis nule en macro et je ne comprends
pas bien comment faire.

Voici le problème qui avait été posé avec la solution. Si quelqu'un pouvait
m'aider sur le mode opératoire. Merci beaucoup :


"Bien que tu aies posté 3 fois ta question, elle n'est quand même pas

très précise !!! :D

Quel type de formulaire utilises-tu ?


S'il s'agit de champs de formulaire mis avec la barre d'outils
formulaires, tu peux mettre un truc comme ça dans ton code :

If ActiveDocument.FormFields("Texte1").Result = "" Then
ActiveDocument.FormFields("Texte1").Select
remplir = MsgBox("Veuillez compléter blablabla", vbOKOnly, titre)
End If

Tu peux mettre dans ton document un bouton Macrobutton lié à une macro
qui imprime (ou qui envoie par mail) mais qui vérifie à l'aide du bout
de code ci-dessus si chaque champ est correctement rempli.

Circé
http://faqword.free.fr

Bonsoir,

Je souhaiterai construire une macro qui informerai l'utilisateur d'un
formulaire Word lors de l'enregistrement ou de l'impression que certains
champs ne sont pas ou mal remplis.

Merci de votre aide.
JP "

Bonjour nadege,

Il faudrait déjà savoir ce que tu veux bloquer si le champ n'est pas
rempli.

la sortie du champ ?
l'impression ?
l'enregistrement ?
la fermeture du document ?
l'envoi du document ?
.... ?

Circé
http://faqword.free.fr

Bonjour,

J'aurai aimé trouver une macro qui vérifie que les champs d'un formulaire
soit tous remplis et que cela soit bloquant si un des champs n'est pas
rempli. J'ai regardé dans les questions déjà posé et j'ai trouvé un problème
similaire mais je n'arrive pas à utiliser la macro. La solution du bouton
Macrobutton m'interesse aussi mais je suis nule en macro et je ne comprends
pas bien comment faire.

Voici le problème qui avait été posé avec la solution. Si quelqu'un pouvait
m'aider sur le mode opératoire. Merci beaucoup :


"Bien que tu aies posté 3 fois ta question, elle n'est quand même pas

très précise !!! :D

Quel type de formulaire utilises-tu ?


S'il s'agit de champs de formulaire mis avec la barre d'outils
formulaires, tu peux mettre un truc comme ça dans ton code :

If ActiveDocument.FormFields("Texte1").Result = "" Then
ActiveDocument.FormFields("Texte1").Select
remplir = MsgBox("Veuillez compléter blablabla", vbOKOnly, titre)
End If

Tu peux mettre dans ton document un bouton Macrobutton lié à une macro
qui imprime (ou qui envoie par mail) mais qui vérifie à l'aide du bout
de code ci-dessus si chaque champ est correctement rempli.

Circé
http://faqword.free.fr

Bonsoir,

Je souhaiterai construire une macro qui informerai l'utilisateur d'un
formulaire Word lors de l'enregistrement ou de l'impression que certains
champs ne sont pas ou mal remplis.

Merci de votre aide.
JP "

J'aimerai bloquer l'impression si un champ n'est pas rempli. J'ai des champs
avec du texte par défaut. Vaut-il mieux ne rien mettre par défaut sous peine
de fausser le blocage du document?
Dois-je avoir besoin d'une macro pour mettre à jour mes champs dans mon
document où le fait de les saisir suffit?

Merci
--
Nadège

Bonjour nadege,

Il faudrait déjà savoir ce que tu veux bloquer si le champ n'est pas
rempli.

la sortie du champ ?
l'impression ?
l'enregistrement ?
la fermeture du document ?
l'envoi du document ?
.... ?

Circé
http://faqword.free.fr

Bonjour,

J'aurai aimé trouver une macro qui vérifie que les champs d'un formulaire
soit tous remplis et que cela soit bloquant si un des champs n'est pas
rempli. J'ai regardé dans les questions déjà posé et j'ai trouvé un
problème similaire mais je n'arrive pas à utiliser la macro. La solution
du bouton Macrobutton m'interesse aussi mais je suis nule en macro et je
ne comprends pas bien comment faire.

Voici le problème qui avait été posé avec la solution. Si quelqu'un pouvait
m'aider sur le mode opératoire. Merci beaucoup :


"Bien que tu aies posté 3 fois ta question, elle n'est quand même pas

très précise !!! :D

Quel type de formulaire utilises-tu ?


S'il s'agit de champs de formulaire mis avec la barre d'outils
formulaires, tu peux mettre un truc comme ça dans ton code :

If ActiveDocument.FormFields("Texte1").Result = "" Then
ActiveDocument.FormFields("Texte1").Select
remplir = MsgBox("Veuillez compléter blablabla", vbOKOnly, titre)
End If

Tu peux mettre dans ton document un bouton Macrobutton lié à une macro
qui imprime (ou qui envoie par mail) mais qui vérifie à l'aide du bout
de code ci-dessus si chaque champ est correctement rempli.

Circé
http://faqword.free.fr

Bonsoir,

Je souhaiterai construire une macro qui informerai l'utilisateur d'un
formulaire Word lors de l'enregistrement ou de l'impression que certains
champs ne sont pas ou mal remplis.

Merci de votre aide.
JP "

Rebonjour,

Il faudra donc une macro événementielle DocumentBeforePrint... Geo sait
très bien les manipuler.... (N'est pas Geo ?...)

On peut bloquer parce que le champ est vide ou parce qu'il contient un
texte particulier (ton remplissage par défaut).

Si c'est pour ton usage perso, càd pour éviter d'imprimer par erreur,
il n'y a pas de soucis... S'il s'agit d'un formulaire à remplir par
d'autres utilisateurs, dis-toi néanmoins qu'ils vont vite comprendre
qu'un champ vide est bloquant, et ils le rempliront n'importe comment
pour ne pas le laisser blanc (aventure vécue !!! :D))

Pas besoin de macro pour mettre les champs à jour... C'est soit ils
sont vides, soit ils remplis. Si des champs de formulaire dépendent
d'autres champs (comme tes calculs), il suffit de cocher l'option
Calculer à la sortie.

Circé
http://faqword.free.fr

nadeger a pensé très fort :

J'aimerai bloquer l'impression si un champ n'est pas rempli. J'ai des champs
avec du texte par défaut. Vaut-il mieux ne rien mettre par défaut sous peine
de fausser le blocage du document?
Dois-je avoir besoin d'une macro pour mettre à jour mes champs dans mon
document où le fait de les saisir suffit?

Merci
--
Nadège

Bonjour nadege,

Il faudrait déjà savoir ce que tu veux bloquer si le champ n'est pas
rempli.

la sortie du champ ?
l'impression ?
l'enregistrement ?
la fermeture du document ?
l'envoi du document ?
.... ?

Circé
http://faqword.free.fr

Bonjour,

J'aurai aimé trouver une macro qui vérifie que les champs d'un formulaire
soit tous remplis et que cela soit bloquant si un des champs n'est pas
rempli. J'ai regardé dans les questions déjà posé et j'ai trouvé un
problème similaire mais je n'arrive pas à utiliser la macro. La solution
du bouton Macrobutton m'interesse aussi mais je suis nule en macro et je
ne comprends pas bien comment faire.

Voici le problème qui avait été posé avec la solution. Si quelqu'un pouvait
m'aider sur le mode opératoire. Merci beaucoup :


"Bien que tu aies posté 3 fois ta question, elle n'est quand même pas

très précise !!! :D

Quel type de formulaire utilises-tu ?


S'il s'agit de champs de formulaire mis avec la barre d'outils
formulaires, tu peux mettre un truc comme ça dans ton code :

If ActiveDocument.FormFields("Texte1").Result = "" Then
ActiveDocument.FormFields("Texte1").Select
remplir = MsgBox("Veuillez compléter blablabla", vbOKOnly, titre)
End If

Tu peux mettre dans ton document un bouton Macrobutton lié à une macro
qui imprime (ou qui envoie par mail) mais qui vérifie à l'aide du bout
de code ci-dessus si chaque champ est correctement rempli.

Circé
http://faqword.free.fr

Bonsoir,

Je souhaiterai construire une macro qui informerai l'utilisateur d'un
formulaire Word lors de l'enregistrement ou de l'impression que certains
champs ne sont pas ou mal remplis.

Merci de votre aide.
JP "

En fait, il s'agit d'un formulaire à usage collectif qui permet d'élaborer
un contrat de travail, donc s'ils remplissent n'importe quoi dans un champ
afin d'éviter que cela bloque, le contrat de travail sera faux.

' 1er événement de document Open : on instancie le module de classe
Private Sub Document_Open()
Set X.appWord = Word.Application
End Sub

Voici la méthode Anacholutienne pour interdire l'impression de votre
document:

Dans le projet VBA correspondant à votre formulaire, mettre ce code
dans le ThisDocument:
-----------
Dim X As New NonImprimer
' 1er événement de document Open : on instancie le module de classe
Private Sub Document_Open()
Set X.appWord = Word.Application
End Sub
-----------
Créer un module de classe toujours dans le projet que vous nommerez
"NonImprimer"
et placez-y ce code :
---------
Public WithEvents appWord As Word.Application

Private Sub appWord_DocumentBeforePrint _
(ByVal Doc As Document, Cancel As Boolean)
MsgBox "Impression interdite !"
Cancel = True
End Sub
--------
Il faut évidemment adapter cette procédure en ajoutant une condition
sur le fait que les conditions soient réalisées ou non pour
l'impression.
Ca suppose donc une ou des variables publiques déclarées dans un module
(normal) VBA, lesquelles variables sont affectées dans votre
formulaire.

--
A+

Merci beaucoup, mais j'ai dû mal a tout saisir. Est-ce que vous pouvez
m'aider au niveau de la procédure car je suis perdue.

Bonjour Circé,

En fait, il s'agit d'un formulaire à usage collectif qui permet d'élaborer
un contrat de travail, donc s'ils remplissent n'importe quoi dans un champ
afin d'éviter que cela bloque, le contrat de travail sera faux. Ils seront
donc obliger de me contacter pour les aider à remplir. Le but c'est d'avoir
un contrat bon avec un contrôle dessus.

C'est pour cela que j'aimerai avoir une macro qui bloque l'impression et qui
met un message comme "Impression impossible, des champs ne sont pas
remplis!".
Peut être que j'en demande un peu trop, moins en tous les cas je suis
dépassée!
--
Nadège

Rebonjour,

Il faudra donc une macro événementielle DocumentBeforePrint... Geo sait
très bien les manipuler.... (N'est pas Geo ?...)

On peut bloquer parce que le champ est vide ou parce qu'il contient un
texte particulier (ton remplissage par défaut).

Si c'est pour ton usage perso, càd pour éviter d'imprimer par erreur,
il n'y a pas de soucis... S'il s'agit d'un formulaire à remplir par
d'autres utilisateurs, dis-toi néanmoins qu'ils vont vite comprendre
qu'un champ vide est bloquant, et ils le rempliront n'importe comment
pour ne pas le laisser blanc (aventure vécue !!! :D))

Pas besoin de macro pour mettre les champs à jour... C'est soit ils
sont vides, soit ils remplis. Si des champs de formulaire dépendent
d'autres champs (comme tes calculs), il suffit de cocher l'option
Calculer à la sortie.

Circé
http://faqword.free.fr

nadeger a pensé très fort :

J'aimerai bloquer l'impression si un champ n'est pas rempli. J'ai des
champs avec du texte par défaut. Vaut-il mieux ne rien mettre par défaut
sous peine de fausser le blocage du document?
Dois-je avoir besoin d'une macro pour mettre à jour mes champs dans mon
document où le fait de les saisir suffit?

Merci
--
Nadège

Bonjour nadege,

Il faudrait déjà savoir ce que tu veux bloquer si le champ n'est pas
rempli.

la sortie du champ ?
l'impression ?
l'enregistrement ?
la fermeture du document ?
l'envoi du document ?
.... ?

Circé
http://faqword.free.fr

Bonjour,

J'aurai aimé trouver une macro qui vérifie que les champs d'un
formulaire soit tous remplis et que cela soit bloquant si un des champs
n'est pas rempli. J'ai regardé dans les questions déjà posé et j'ai
trouvé un problème similaire mais je n'arrive pas à utiliser la macro.
La solution du bouton Macrobutton m'interesse aussi mais je suis nule
en macro et je ne comprends pas bien comment faire.

Voici le problème qui avait été posé avec la solution. Si quelqu'un
pouvait m'aider sur le mode opératoire. Merci beaucoup :


"Bien que tu aies posté 3 fois ta question, elle n'est quand même pas

très précise !!! :D

Quel type de formulaire utilises-tu ?


S'il s'agit de champs de formulaire mis avec la barre d'outils
formulaires, tu peux mettre un truc comme ça dans ton code :

If ActiveDocument.FormFields("Texte1").Result = "" Then
ActiveDocument.FormFields("Texte1").Select
remplir = MsgBox("Veuillez compléter blablabla", vbOKOnly, titre)
End If

Tu peux mettre dans ton document un bouton Macrobutton lié à une macro
qui imprime (ou qui envoie par mail) mais qui vérifie à l'aide du bout
de code ci-dessus si chaque champ est correctement rempli.

Circé
http://faqword.free.fr

Bonsoir,

Je souhaiterai construire une macro qui informerai l'utilisateur d'un
formulaire Word lors de l'enregistrement ou de l'impression que
certains champs ne sont pas ou mal remplis.

Merci de votre aide.
JP "

Merci beaucoup, mais j'ai dû mal a tout saisir. Est-ce que vous pouvez
m'aider au niveau de la procédure car je suis perdue.

Ce n'est pas très étonnant.
Je suis en train d'écrire un papier sur le sujet (gestion des
événements) pour la faq, je peux vous le faire parvenir.
Mais comme ce n'est pas terminé je préférerais le faire par message
privé.
Vous pouvez me joindre à :
geo point le point du at free point fr

--
A+