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 :

Images dans UserForm1


Sujet :

Macros et VBA Excel

Vue hybride

Message précédent Message précédent   Message suivant Message suivant
  1. #1
    Membre averti
    Profil pro
    Inscrit en
    Juin 2004
    Messages
    10
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2004
    Messages : 10
    Par défaut Images dans UserForm1
    Bonjour à tous,

    Dans ma Feuil1, j'ai plusieurs images au format jpeg.
    Dans ma UserForm1, j'ai tout simplement une listBox1, à partir de laquelle je clique sur une ligne. J'ai les résultats correspondants dans des TextBox situés dans ce même Userform1.
    Si je veux insérer 1 ou plusieurs images, automatiquement je ne peux le faire qu'à partir d'un fichier image. (jpeg, BMP etc...)

    Problème :

    Comment choisir une des images que j'ai dans ma Feuil1, toujours en fonction d'un choix que je fais dans ma ListBox1 ?
    ex : si je clique sur la 1ère ligne (qui correspond à la cellule A1 sur ma Feuil1, comment voir apparaître dans un contrôle (et lequel) l'image 1,
    si je clique sur la 2ème ligne, l'image 2 etc ...
    A savoir que j'utilise Win Millenium et Excel2000.

    SVP,
    Un grand merci d'avance, et bonne journée,
    A+
    Jo14.

  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
    Par défaut
    Pour le contrôle, c'est un contrôle image que tu places dans ton usf.
    Pour placer ton image c'est
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    me.picture1.Picture = Load(Chemin\ & NomImage)
    Si ta liste contient le nom complet des images, pour récupérer le nom c'est, soit
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    NomFich = me.listbox1.list(Listbox1.listindex)
    'soit
    NomFich = me.Listbox1.value
    Bon après-midi

  3. #3
    Membre averti
    Profil pro
    Inscrit en
    Juin 2004
    Messages
    10
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2004
    Messages : 10
    Par défaut Images dans UserForm
    Rebonjour,

    Merci pour le coup de mains, mais ça ne marche pas.
    Voila : j'ai 20 lignes (A1, A2 A3 ...)
    Dans chacune de ces cellules, j'ai le nom d'un pays (France, Belgique, USA ...)
    J'ai dans ce même fichier Excel fait des insertions d'images (qui arrivent un peu n'importe où sur la feuille, car comme tu le sais, les images ne correspondent pas à un emplacement de cellule en particulier.)
    Chacune de ces images représente le drapeau d'un des 20 pays que je vient d'expliquer
    Dans mon UserForm, j'ai mis un ListBox, où je peux donc lister mes cellules de A1 à A20.
    Quand je fais mon choix en cliquant sur un nom de pays, j'aimerai que le drapeau correspondant (que j'ai dans ma Feuil1, car je ne veux pas d'autres fichiers sparés), s'affiche dans un contrôle (image ou autre) dans mon UserForm)
    Comment faire.
    La seule source que je peux appeler à l'écran est un fichier image (en donnant son chemin), mais comme je l'ai dit, je ne veux pas faire appel à des fichiers extérieurs à mon fichier Excel qui est ouvert et où se trouve donc ces drapeaux que j'ai insérés auparavant. Dans la feuil Excel, ils portent simplement le nom Image1, Image2 etc ...

    Encore un grand merci pour ce pencher sur ce problème.
    A tout à l'heure.
    Jo14

  4. #4
    Membre Expert Avatar de Jean-Pierre49
    Homme Profil pro
    Retraité
    Inscrit en
    Juillet 2007
    Messages
    659
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 70
    Localisation : France, Maine et Loire (Pays de la Loire)

    Informations professionnelles :
    Activité : Retraité
    Secteur : Industrie

    Informations forums :
    Inscription : Juillet 2007
    Messages : 659
    Par défaut
    Bonjour,

    Regarde la dicution ouverte le même jour par oscar-cesar,

    c'est le même problème

Discussions similaires

  1. intégrer un fichier image dans une base de donnée?
    Par Lody dans le forum Requêtes
    Réponses: 9
    Dernier message: 16/03/2006, 20h08
  2. Une image dans un composant ?
    Par bjl dans le forum Composants VCL
    Réponses: 2
    Dernier message: 20/03/2003, 12h28
  3. Image dans le designer
    Par kainor dans le forum JBuilder
    Réponses: 3
    Dernier message: 19/03/2003, 15h24
  4. Smiley (image dans un RichEdit)
    Par Waxayaz dans le forum Composants VCL
    Réponses: 3
    Dernier message: 06/02/2003, 15h32
  5. [VB6] [Excel] Insérer une image dans une feuille
    Par mathias dans le forum VB 6 et antérieur
    Réponses: 7
    Dernier message: 09/10/2002, 08h44

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