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

Macros et VBA Excel Discussion :

dimension et position image dans word (macro excel)


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2013
    Messages
    86
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2013
    Messages : 86
    Par défaut
    J'ai ma macro excel qui envoie un screenshot de la selection de mon tableur. Hors je cherche une macro adéquate pour modifier dimension et position (marge) pour l'implantation dans word de mes screenshot.
    Car je trouve rien d'interessant.
    Un truc vraiment simple...

    Merci

    Ce bout de macro marche bien:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    9
    oWord.WordBasic.PageSetupMargins Tab:=0, PaperSize:=0, TopMargin:="1", _
            BottomMargin:="1", LeftMargin:="2.5", RightMargin:="1", Gutter:="0", _
            PageWidth:="29.7", PageHeight:="15", Orientation:=0, FirstPage:=0, _
            OtherPages:=0, VertAlign:=0, ApplyPropsTo:=4, FacingPages:=0, _
            HeaderDistance:="1.25", FooterDistance:="1.25", SectionStart:=2, _
            OddAndEvenPages:=0, DifferentFirstPage:=0, Endnotes:=0, LineNum:=0, _
            CountBy:=0, TwoOnOne:=0, GutterPosition:=0, LayoutMode:=0, DocFontName:= _
            "", FirstPageOnLeft:=0, SectionType:=1, FolioPrint:=0, ReverseFolio:=0, _
            FolioPages:=1
    Mais il me met la page en paysage alors que je veut la garder en portrait. quel paramètre à changer?

    Personne? je ne trouve absolument rien étant novice ...

  2. #2
    Invité
    Invité(e)
    Par défaut
    Bonjour,

    Il faut sans doute modifier les propriétés PageWidth, PageHeight et Orientation. Pour cela, il faut ouvrir Word et aller dans l'éditeur VBA et utiliser le ? pour connaître les paramètres de ces propriétés. A voir si PageSetUpMargin est plus adapté que PageSetUp tout court dont j'ai tiré les deux captures d'écran ci-dessous.

    Il faut sans doute a minima changer l'orientation par le paramètre indiqué dans le vidage d'écran wdOrientationPortrait qui doit sans correspondre à 1 dans votre code sinon il suffit de remplacer 0 par ce paramètre.

    Nb : Il faut avoir le réflexe d'aller voir systématiquement les membres de l'objet manipulé pour connaître les méthodes, les propriétés et les événements qu'on peut lui appliquer.

    Cordialement.


    Et


  3. #3
    Membre confirmé
    Profil pro
    Inscrit en
    Avril 2013
    Messages
    86
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Avril 2013
    Messages : 86
    Par défaut
    Oh merci! en fait j'aurai pensé qu'il fallait intervertir page widht et page height au niveau des valeurs. Sinon merci encore je prends note des conseils pour aller voir en profondeur la signification des macros.

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 2
    Dernier message: 10/11/2014, 23h28
  2. Inserer une image dans word depuis excel
    Par a.faurie dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 19/02/2014, 19h19
  3. Remplacer une image dans Word depuis Excel en VBA
    Par frankie666 dans le forum Macros et VBA Excel
    Réponses: 0
    Dernier message: 06/02/2013, 08h54
  4. [WD-2007] Insérer une image dans Word dont le lien est dans un Excel
    Par charsaud dans le forum Word
    Réponses: 6
    Dernier message: 28/06/2011, 19h45
  5. Impression d'un document Word fermé dans une macro Excel
    Par Le POlonais dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 21/11/2007, 10h00

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