Discussion :

[formabox]

Hello le forum,

La pêche ? Moi je me réjouie du week-end car VBA me prend la tête...

J'ai un document Word où j'ai appliqué des champs formulaire simple (par la barre d'outils Formulaire de Word (zone de texte, case à cocher et liste déroulante).

Si j'imprime mon document sans passer par une macro, les champs que je n'ai pas rempli ne s'imprime pas (normal)

Lorsque je fais une macro pour lancer l'impression, chaque champ vide se voit à l'impression et est représenté par deux petits traits en grisé qui s'affiche devant et derrière le champ...

Je ne comprends pas pourquoi il fait pas la même chose que lorsque j'imprime sans macro et existe-t-il une procédure dans VBA pour supprimer l'affichage de ces petits crochets ?

Merci d'avance pour votre réponse

[formabox]

Je viens de comprendre le pourquoi mais je ne sais pas comment résoudre ce problème...

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Private Sub oApp_DocumentBeforePrint(ByVal Doc As Document, Cancel As Boolean)
 
ActiveDocument.Unprotect ("toto")
 
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
 
Selection.HeaderFooter.Shapes("Picture 2").Visible = msoTrue
Selection.HeaderFooter.Shapes("Picture 3").Visible = msoTrue
 
ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
 
ActiveDocument.Sections(1).ProtectedForForms = True
    ActiveDocument.Sections(2).ProtectedForForms = True
    ActiveDocument.Sections(3).ProtectedForForms = False
    ActiveDocument.Sections(4).ProtectedForForms = False
 
ActiveDocument.Protect Password:="toto", NoReset:=False, Type:= _
        wdAllowOnlyFormFields, UseIRM:=False, EnforceStyleLock:=False
 
 
 
End Sub

J'ai remarqué que lorsque le document est déprotégé, les crochets s'affiche autour des champs et qu'ils ne s'impriment pas lorsqu'il est protégé.

Je pense que l'impression se déclenche dès le début du code alors que la première ligne déprotège... Mais ma dernière action reprotège le code...

Alors pourquoi la procédure BeforePrint n'imprime pas le document une fois la dernière ligne de code exécutée seulement ? Ca devrait être plus logique...

Idéalement, il faudra que je puisse lui dire dans ces lignes par une commande que c'est à partir de là qu'il doit lancer l'impression ?