VB word - impossible de reproteger le formulaire !!!

bonjour,
j'ai fait un formulaire, qui est rempli depuis Word, j'ai ajouté du code pour numeroter automatiquement
l'imprimé apres l'avoir rempli, ce numéro s'inscrit dans l'en tete.  Un bouton est placé sur celui ci.

Mon problème c'est que le numero s'inscrit bien, mais ensuite j'ai un debogage car je veux que
le formulaire soit reprotegé, et le probleme est là il ne me le reprotege pas

Mon code deprotege le formulaire, inscrit le numero dans l'en tete, puis doit reproteger le formulaire.


Quelqu'un pourrait il m'expliquer ce qui coince ????  merci

  
Vous pouvez l'essayer me dire si il fonctionne chez vous, merci 

Code: 

  Private Sub CommandButton1_Click()  
num = ActiveDocument.AttachedTemplate.AutoTextEntries("numéro").Value  
num = num + 1

If ActiveDocument.ProtectionType<>wdNoProtection Then 
    ActiveDocument.Unprotect
End If
 
ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader  

ActiveDocument.AttachedTemplate.AutoTextEntries("numéro").Value = num  
Selection.TypeText Text:="N° " & num & "/2006"  
num = Right("0000" & num, 4)  
SendKeys "o"  
ActiveDocument.SaveAs FileName:="N" & num & ".doc"  

ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument

If ActiveDocument.ProtectionType=wdNoProtection Then 
    ActiveDocument.Protect wdAllowOnlyFormFields
End If 

End Sub

Benco

bonjour,
te serais-t-il pas plus simple de mettre un signet dans ton entete!
comme ça c'est plus simple de déprotégé de remplir le signet et de reprotéger. parcontre si tu crois que de faire plusieur fois la manip va à chaque foi ke tu ouvre ton formulaire t'incrémenté de 1 ton numéro, c'est pas bon car une fois que ton fichier word se ferme la valeur stocker dans num s'efface vu que le VBA c'est pas un exécutable c une MACRO, je sias pas si je suis bien claire...
Jordinette

Bonjour
signet, pourquoi pas si cela peut effectuer ce que je souhaite, mais je ne sais pas m'en servir....

tu es sur pour le probleme du +1 ??   car en fait, la sauvegarde se fait dans un repertoire sur le DD, je pensais que ma macro, à chaque ouverture savait quel dernier numero avait été incrementé afin de faire +1.....tu me mets le doute  :))   je vais aller voir ça

merci 

Benco