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 PowerPoint Discussion :

VBA insérer une image


Sujet :

VBA PowerPoint

  1. #1
    Membre du Club
    Profil pro
    Inscrit en
    Novembre 2005
    Messages
    112
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Novembre 2005
    Messages : 112
    Points : 57
    Points
    57
    Par défaut VBA insérer une image
    Bonjour
    Je recherche le code qui permettrait d'insérer une image dans une diapo.
    Par avance merci.
    Cordialement
    Jean-Claude

  2. #2
    Candidat au Club
    Homme Profil pro
    Responsable des études
    Inscrit en
    Novembre 2017
    Messages
    3
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 33
    Localisation : Maroc

    Informations professionnelles :
    Activité : Responsable des études
    Secteur : Aéronautique - Marine - Espace - Armement

    Informations forums :
    Inscription : Novembre 2017
    Messages : 3
    Points : 3
    Points
    3
    Par défaut VBA insérer une image
    Bonjour,

    je pense que ça va t'aider :

    Sub collage_image()
    ' déclaration
    Dim objSld As Slide
    Dim strPathImage As String

    ' affectation
    strPathImage = "C:\test\test.jpg"
    ' on parcourt les diapositives de la présentation
    For Each objSld In ActivePresentation.Slides
    ' on ajoute l'image 1
    Set objShp = objSld.Shapes.AddPicture(strPathImage1, msoFalse, msoTrue, 50, 50)
    With objShp
    .LockAspectRatio = msoTrue ' désactivation du ration
    .Height = 300 ' hauteur
    ' .Width = 215 ' largeur
    .Top = 100 ' position par rapport au haut de la diapo
    .Left = 50 ' postion par rapport au bord gauche de la diapo
    End With

    ' on passe à la diapositive suivante
    Next objSld

Discussions similaires

  1. Réponses: 1
    Dernier message: 17/08/2011, 20h36
  2. [AC-2010] VBA - Insérer une image dans un mail Outlook
    Par Vince26exe dans le forum Access
    Réponses: 3
    Dernier message: 24/03/2011, 16h33
  3. insérer une image sous word depuis vba-A
    Par Ofeneim dans le forum VBA Access
    Réponses: 2
    Dernier message: 28/05/2007, 11h32
  4. [VBA-E] Débutante, insérer une image dans une cellule
    Par sab_etudianteBTS dans le forum Macros et VBA Excel
    Réponses: 16
    Dernier message: 23/03/2007, 16h55
  5. [VBA-Excel] Insérer une image à une treeview
    Par marsupilami34 dans le forum Macros et VBA Excel
    Réponses: 4
    Dernier message: 23/08/2006, 16h54

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