Selectionner la/les pages X et les supprimer sous word, possible ?

Question

Bonjour à tous,
J'aimerais savoir s'il est possible de selectionner ex: la page 5 et 6  sous word et de les supprimer grace à un bouton sur lequel on clique, ou peut etre voyez vous une autre solution ?
En vous remerciant par avance de la part d'une personne ignorante en programmation !!!

Merci à tous ceux qui contribuent à répandre leurs savoirs !

cs_grecko · Answer

up!

cs_Tireur · Answer

Bonjour, n'ayant pas toute les informations...  je peux quand meme te donner cette piste de solution.  Tu peux placer toute l'information de chacune des page dans un tableau (1 ligne, 1 colone avec bordure blanche, donc invisible) et quand tu veux suprimer un page, ben tu supprime le tableau.

Moi je fais ca pour mes formulaires.  La premiere page contient les information pour mettre la sécurité des macros à "faible" pour autoriser l'exécution des macros.  Je met mon code dans Document Open.  Ce qui fait que si l'utilisateur est déja à faible, ben y voit pas le tableau qui est automatiquement supprimé à l'ouverture.

Private Sub BtnSupprimer_Click()

   ' Déclaration des varaibles.
   Dim Page as integer

   ' Assignation des valeurs aux variables.
   ' L'utilisateur spécifie la page qu'il veut supprimer dans un ''Custom Texbox''.
   Page = TextboxPageASupprimer.text

   ' Retrait de la protection du document.
   ThisDocument.Unprotect 'info sur mot de passe si y'en a un.

   ' Suppression du tableau et non de la page comme le pense l'utilisateur.
   ThisDocument.Tables(Page).delete

   ' Remise de la protection du document.
   ThisDocument.Protect (NoReset = True, ) ' Avec le reste des conditions.

End Sub

Espérant que ca peux t'aider malgré l'age de ton message.

Selectionner la/les pages X et les supprimer sous word, possible ?

2 réponses

Discussions similaires