IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

VBA Word Discussion :

[VBA] [WORD] se placer sur la 1ere page


Sujet :

VBA Word

  1. #1
    Membre habitué Avatar de meufeu
    Profil pro
    Inscrit en
    Septembre 2003
    Messages
    355
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2003
    Messages : 355
    Points : 166
    Points
    166
    Par défaut [VBA] [WORD] se placer sur la 1ere page
    Bonjour,

    Je voudrais sélectionner une image qui est dans l'entete de la premiere page (page de garde de mon rapport, page 1 donc entete1 de la section1)
    Je pensais que c'etait tout bete :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    ActiveDocument.Sections.First.Headers(wdHeaderFooterFirstPage).Shapes(1)
    mais il va sur la section 3 ...

    La section 3 est la première section a contenir des numéros de page ...

    Comment faire ?
    Merci d'avance !

  2. #2
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    commence par aller sur la première page, ensuite, passe dans l'entête

    Ex :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
        Selection.HomeKey Unit:=wdStory
        ActiveWindow.ActivePane.View.SeekView = wdSeekCurrentPageHeader
        Selection.TypeText Text:="Ceci est mon entête"
        ActiveWindow.ActivePane.View.SeekView = wdSeekMainDocument
    A+

  3. #3
    Membre habitué Avatar de meufeu
    Profil pro
    Inscrit en
    Septembre 2003
    Messages
    355
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2003
    Messages : 355
    Points : 166
    Points
    166
    Par défaut
    merci de ta réponse et de ta rapidité

    ca m'embete de procéder comme tu dis
    car c lourd (l'utilisateur voit que l'on se déplace dans le document)
    et je perd l'endroit ou j'etais !

  4. #4
    Inactif  
    Avatar de ouskel'n'or
    Profil pro
    Inscrit en
    Février 2005
    Messages
    12 464
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Février 2005
    Messages : 12 464
    Points : 15 543
    Points
    15 543
    Par défaut
    On ne voit rien si tu mets

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.ScreenUpdating = false
    Avant de te déplacer dans le document

    et

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    Application.ScreenUpdating = True
    pour mettre à jour l'affichage

    Regarde l'aide, c'est très bien expliqué...

    A+

  5. #5
    Membre habitué Avatar de meufeu
    Profil pro
    Inscrit en
    Septembre 2003
    Messages
    355
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Septembre 2003
    Messages : 355
    Points : 166
    Points
    166
    Par défaut
    ah ouais, c sympa ca, ca va pas mal optimiser mon prog !!
    merci

    par contre, je n'arrive pas, a partir du code que tu m'a donné
    a aller dans l'entete de la premiere page et récupérer mes deux "shapes"

Discussions similaires

  1. Réponses: 3
    Dernier message: 29/01/2008, 11h32
  2. [VBA-W] Insérer texte sur toutes mes pages word
    Par STEPH69000 dans le forum VBA Word
    Réponses: 1
    Dernier message: 02/01/2007, 11h54
  3. [VBA-E] Insertion d'un pied de page dans Word
    Par fred bx dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 22/05/2006, 12h49
  4. [VBA][Word] débutant suppression d'une page
    Par cyrcroix dans le forum VBA Word
    Réponses: 3
    Dernier message: 30/12/2005, 19h22
  5. VBA Word - Aide sur les "Retours" dans tableaux
    Par wouebmaster dans le forum VBA Word
    Réponses: 5
    Dernier message: 29/12/2005, 10h08

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo