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 :

[E-03] Charger une image dans un UserForm, via le résultat d'une variable


Sujet :

Macros et VBA Excel

  1. #1
    Débutant
    Inscrit en
    Décembre 2007
    Messages
    1 235
    Détails du profil
    Informations forums :
    Inscription : Décembre 2007
    Messages : 1 235
    Points : 269
    Points
    269
    Par défaut [E-03] Charger une image dans un UserForm, via le résultat d'une variable
    Bonjour, j'ai un UserForm avec un objet Image, dont le nom est "Image1".

    Je voudrais après appui sur un bouton, venir charger une image se trouvant dans un répertoire, dont le chemin est le suivant:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    C:\Documents and Settings\maintenance.u09\Bureau\Exemple\Photos\LeNomDeMaPhoto
    Sachant que LeNomDeMaPhoto est une variable Public définit en Long.

    Le nom de cette variable est le suivant "Val_C".

    J'ai donc essayé:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    UserForm1.Image1.Picture = LoadPicture("C:\Documents and Settings\maintenance.u09\Bureau\Exemple\Photos\Val_C.jpg")
    Mais sa ne l'accepte pas, et j'ai également essayé:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
     
     Reference = Val_C
     
    UserForm1.Image1.Picture = LoadPicture("C:\Documents and Settings\maintenance.u09\Bureau\Exemple\Photos\Reference.jpg")
    Et cette fois ca me met fichier introuvable alors que la variable enregistre "3" et que j'ai bien une photo dans ce répertoire qui s'appelle 3.

    Merci

  2. #2
    Débutant
    Inscrit en
    Décembre 2007
    Messages
    1 235
    Détails du profil
    Informations forums :
    Inscription : Décembre 2007
    Messages : 1 235
    Points : 269
    Points
    269
    Par défaut
    J'ai essayé ceci aussi:

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    UserForm1.Image1.Picture = LoadPicture("C:\Documents and Settings\maintenance.u09\Bureau\Exemple\Photos\" & Val_C & ".jpg")
    [EDIT]

    Euh si sa marche en fait. Par contre comment adapter la taille de ma photo pour quelle soit de la taille de mon objet image?

  3. #3
    Débutant
    Inscrit en
    Décembre 2007
    Messages
    1 235
    Détails du profil
    Informations forums :
    Inscription : Décembre 2007
    Messages : 1 235
    Points : 269
    Points
    269
    Par défaut
    C'est tout bon

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

Discussions similaires

  1. Rotation d'une image dans un UserForm
    Par VicomteRaoul dans le forum VBA Word
    Réponses: 5
    Dernier message: 26/12/2022, 13h28
  2. Petit soucis pour insérer une image dans un userform uniquement
    Par panda78 dans le forum Macros et VBA Excel
    Réponses: 5
    Dernier message: 27/07/2012, 12h50
  3. Réponses: 3
    Dernier message: 24/11/2011, 00h28
  4. Insertion d'une image dans un UserForm
    Par babylone_59 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 29/09/2008, 20h37
  5. [VBA-E] Lien hypertexte relié à une image dans un userform
    Par sebek_2000 dans le forum Macros et VBA Excel
    Réponses: 1
    Dernier message: 22/02/2007, 06h43

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