OVH Cloud OVH Cloud

Recherche Image et coller image

21 réponses
Avatar
Guido
Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1, est-il
possible de coller cette image se trouvant dans le répertoire
C:\image\tintin\tintin01 dans un cadre définit automatiquement. Mais plus
dur, c'est produire ce genre de commande pour d'autres images, mais se
trouvant dans des sous-répertoires différents dans le dossier C:\image\...
Qui pourrait m'aider ?
Merci d'avance ?
Guido

10 réponses

1 2 3
Avatar
LSteph
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1, est-il
possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement. Mais plus
dur, c'est produire ce genre de commande pour d'autres images, mais se
trouvant dans des sous-répertoires différents dans le dossier C:image...
Qui pourrait m'aider ?
Merci d'avance ?
Guido




Avatar
Guido
Bonsoir LSteph,
merci de ton aide, cette application est excellente
Voici ce que je voudrais pouvoir faire avec (ou par un autre moyen)
insérer le nom de l'image directement, (ex: tintin01)
et l'insérer directement dans un petit cadre destiné à cet effet.
Y-a-t'il un problème, si les images sont stockée dans des sous-dossiers
différents ?
C'est possible de le faire ?
Guido

"LSteph" a écrit dans le message de
news:uy%
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1, est-il
possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement. Mais
plus


dur, c'est produire ce genre de commande pour d'autres images, mais se
trouvant dans des sous-répertoires différents dans le dossier
C:image...


Qui pourrait m'aider ?
Merci d'avance ?
Guido








Avatar
G. L
Bonsoir LSteph,
Un vrai bijou ton joujou !
Adopté ! Bravo
Comme on est dans les images, pour insérer dans un userform il doit bien
avoir une astuce ? J'avoue ne pas avoir pris le temps de chercher, ne
"m'engueule" pas ;)
Cordialement
Gérard



"LSteph" a écrit dans le message de
news:uy%
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1, est-il
possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement. Mais
plus


dur, c'est produire ce genre de commande pour d'autres images, mais se
trouvant dans des sous-répertoires différents dans le dossier
C:image...


Qui pourrait m'aider ?
Merci d'avance ?
Guido








Avatar
Guido
Salut G.
j'ai vu dans excelabo, des trucs simpa.
tu trouveras surement ton bonheur.
http://www.excelabo.net/moteurs/recherche.php
Guido

"G. " <sugere~KillPub~@online.fr> a écrit dans le message de
news:
Bonsoir LSteph,
Un vrai bijou ton joujou !
Adopté ! Bravo
Comme on est dans les images, pour insérer dans un userform il doit bien
avoir une astuce ? J'avoue ne pas avoir pris le temps de chercher, ne
"m'engueule" pas ;)
Cordialement
Gérard



"LSteph" a écrit dans le message de
news:uy%
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1,
est-il



possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement. Mais
plus


dur, c'est produire ce genre de commande pour d'autres images, mais se
trouvant dans des sous-répertoires différents dans le dossier
C:image...


Qui pourrait m'aider ?
Merci d'avance ?
Guido












Avatar
G. L
Bonsoir Guido,
Merci pour l'info.
Tu veux insérer directement l'image dans un petit cadre destiné à cet effet.
Ce cadre est-ce une cellule ? ou une zonz texte?
Cordialement
Gérard

"Guido" a écrit dans le message de
news:
Salut G.
j'ai vu dans excelabo, des trucs simpa.
tu trouveras surement ton bonheur.
http://www.excelabo.net/moteurs/recherche.php
Guido

"G. " <sugere~KillPub~@online.fr> a écrit dans le message de
news:
Bonsoir LSteph,
Un vrai bijou ton joujou !
Adopté ! Bravo
Comme on est dans les images, pour insérer dans un userform il doit bien
avoir une astuce ? J'avoue ne pas avoir pris le temps de chercher, ne
"m'engueule" pas ;)
Cordialement
Gérard



"LSteph" a écrit dans le message de
news:uy%
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1,
est-il



possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement. Mais
plus


dur, c'est produire ce genre de commande pour d'autres images, mais
se




trouvant dans des sous-répertoires différents dans le dossier
C:image...


Qui pourrait m'aider ?
Merci d'avance ?
Guido
















Avatar
Guido
Le problème est que je voudrais automatiser l'instruction d'insertion au
plus simple de l'image dans un cadre. Mais voilà. Les images, les codes en
Excel c'est vraiment pas mon fort. L'image s'insère donc dans un cadre, qui
devrait rester fixe dans la taille visuelle (env. 6cm sur 4.5cm) en bas de
page.
Cordialement
Guido

"G. " <sugere~KillPub~@online.fr> a écrit dans le message de
news:
Bonsoir Guido,
Merci pour l'info.
Tu veux insérer directement l'image dans un petit cadre destiné à cet
effet.

Ce cadre est-ce une cellule ? ou une zonz texte?
Cordialement
Gérard

"Guido" a écrit dans le message de
news:
Salut G.
j'ai vu dans excelabo, des trucs simpa.
tu trouveras surement ton bonheur.
http://www.excelabo.net/moteurs/recherche.php
Guido

"G. " <sugere~KillPub~@online.fr> a écrit dans le message de
news:
Bonsoir LSteph,
Un vrai bijou ton joujou !
Adopté ! Bravo
Comme on est dans les images, pour insérer dans un userform il doit
bien



avoir une astuce ? J'avoue ne pas avoir pris le temps de chercher, ne
"m'engueule" pas ;)
Cordialement
Gérard



"LSteph" a écrit dans le message de
news:uy%
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1,
est-il



possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement.
Mais





plus
dur, c'est produire ce genre de commande pour d'autres images,
mais





se
trouvant dans des sous-répertoires différents dans le dossier
C:image...


Qui pourrait m'aider ?
Merci d'avance ?
Guido




















Avatar
LSteph
Bonsoir,
Content que cela te plaise.
(C'est comme indiqué dans le code inspiré d'un code de DJ avec des
jaquettes de films)
Pour un usage simple je l'ai destiné au répertoire où on l'enregistre de
préférence Mes Images
l'objectif étant de pouvoir visualiser ce que ne propose
pas forcément de la même façon insérer une image
sinon mais rien empeche de changer
de même, peu importe où tu le mets,
le tout est de concatèner correctement le nom de fichier avec le nom de
chemin
pour qu'on le retrouve.
...
C'est possible de le faire ?
oui tu noteras que c'est mis à B6 , tu peux changer.

Y-a-t'il un problème, si les images sont stockée dans des sous-dossiers
différents ?
non il suffit de modifier le path.

ceci ChDir ThisWorkbook.Path
voir dans initialize et l'enlever du combobox change ainsi que dans
CommandButton1_Click pour l'insertion d'image
mettre Curdir (pour répertoire courant)
il y a aussi un truc à corriger de je m'en rends compte dans l'initialize
pour vider la combobox avant de la remplir
Voici donc une version corrigée qui propose d'abord le choix de
répertoire.http://cjoint.com/?kjxlvxJ6oV

A+

lSteph

"Guido" a écrit dans le message de news:
%
Bonsoir LSteph,
merci de ton aide, cette application est excellente
Voici ce que je voudrais pouvoir faire avec (ou par un autre moyen)
insérer le nom de l'image directement, (ex: tintin01)
et l'insérer directement dans un petit cadre destiné à cet effet.
Y-a-t'il un problème, si les images sont stockée dans des sous-dossiers
différents ?
C'est possible de le faire ?
Guido

"LSteph" a écrit dans le message de
news:uy%
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1, est-il
possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement. Mais
plus


dur, c'est produire ce genre de commande pour d'autres images, mais se
trouvant dans des sous-répertoires différents dans le dossier
C:image...


Qui pourrait m'aider ?
Merci d'avance ?
Guido












Avatar
LSteph
;o) c'est déjà dans un userform si tu notes bien
En fait j'ai donné une version où il y a un truc à corriger dans
l'initialize
combobox1.clear à rajouter au début
Sinon voir http://cjoint.com/?kjxlvxJ6oV corrigé et qui propose de changer
de répertoire (sinon annuler)

"G. " <sugere~KillPub~@online.fr> a écrit dans le message de news:

Bonsoir LSteph,
Un vrai bijou ton joujou !
Adopté ! Bravo
Comme on est dans les images, pour insérer dans un userform il doit bien
avoir une astuce ? J'avoue ne pas avoir pris le temps de chercher, ne
"m'engueule" pas ;)
Cordialement
Gérard



"LSteph" a écrit dans le message de
news:uy%
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1, est-il
possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement. Mais
plus


dur, c'est produire ce genre de commande pour d'autres images, mais se
trouvant dans des sous-répertoires différents dans le dossier
C:image...


Qui pourrait m'aider ?
Merci d'avance ?
Guido












Avatar
Guido
Je me rends compte que c'est abuser de demander, mais c'est vraiment un truc
génial.
Le truc pour chercher les images gifs, j'ai pas vraiment bien compris.
la commande

Private Sub UserForm_Initialize()
Dim f
ChDir chemin
f = Dir("*.jpg") <----- ici
ComboBox1.Clear
Do While Len(f) > 0
ComboBox1.AddItem f
f = Dir
Loop
End Sub

n'est pas ce qui empèche l'affichage des autres formats usuels d'images.

Et là, je voudrais savoir, comment attribuer une dimention standart à
l'image qui sera affichée puis imprimée avec tout le reste.

Désolé, je reprendrais un texte écris précédemment à Gérard:
Mais voilà. Les images, les codes en Excel c'est vraiment pas mon fort.
L'image s'insère donc dans un cadre, qui devrait rester fixe dans
la taille visuelle (env. 6cm sur 4.5cm) en bas de page.
Un grand merci encore
Guido



"LSteph" a écrit dans le message de
news:
Bonsoir,
Content que cela te plaise.
(C'est comme indiqué dans le code inspiré d'un code de DJ avec des
jaquettes de films)
Pour un usage simple je l'ai destiné au répertoire où on l'enregistre de
préférence Mes Images
l'objectif étant de pouvoir visualiser ce que ne propose
pas forcément de la même façon insérer une image
sinon mais rien empeche de changer
de même, peu importe où tu le mets,
le tout est de concatèner correctement le nom de fichier avec le nom de
chemin
pour qu'on le retrouve.
...
C'est possible de le faire ?
oui tu noteras que c'est mis à B6 , tu peux changer.

Y-a-t'il un problème, si les images sont stockée dans des sous-dossiers
différents ?
non il suffit de modifier le path.

ceci ChDir ThisWorkbook.Path
voir dans initialize et l'enlever du combobox change ainsi que dans
CommandButton1_Click pour l'insertion d'image
mettre Curdir (pour répertoire courant)
il y a aussi un truc à corriger de je m'en rends compte dans l'initialize
pour vider la combobox avant de la remplir
Voici donc une version corrigée qui propose d'abord le choix de
répertoire.http://cjoint.com/?kjxlvxJ6oV

A+

lSteph

"Guido" a écrit dans le message de news:
%
Bonsoir LSteph,
merci de ton aide, cette application est excellente
Voici ce que je voudrais pouvoir faire avec (ou par un autre moyen)
insérer le nom de l'image directement, (ex: tintin01)
et l'insérer directement dans un petit cadre destiné à cet effet.
Y-a-t'il un problème, si les images sont stockée dans des sous-dossiers
différents ?
C'est possible de le faire ?
Guido

"LSteph" a écrit dans le message de
news:uy%
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1,
est-il




possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement. Mais
plus


dur, c'est produire ce genre de commande pour d'autres images, mais
se




trouvant dans des sous-répertoires différents dans le dossier
C:image...


Qui pourrait m'aider ?
Merci d'avance ?
Guido
















Avatar
LSteph
...
f = Dir("*.jpg") <----- ici


Oui c'est bien là!
Depuis un autre classeur vide du moment que visioxl3 est ouvert dans excel
tu appelle la macro visioxl3.xls!showform
Pour la taille pas sûr, on pourrait remplacer
Selection.ShapeRange.Name = "cetici"
'par

With Selection.ShapeRange
.Name = "cetici"
.Width = 350
.Height = 425
End With

mais cela dépend de l'image car quand on la colle , il y a une question de
proportionalité à respecter.
Sinon pour l'emplacement tu choisis la cellule tout simplement.

Bonne nuit.

lSteph
"Guido" a écrit dans le message de news:

Je me rends compte que c'est abuser de demander, mais c'est vraiment un
truc
génial.
Le truc pour chercher les images gifs, j'ai pas vraiment bien compris.
la commande

Private Sub UserForm_Initialize()
Dim f
ChDir chemin
f = Dir("*.jpg") <----- ici
ComboBox1.Clear
Do While Len(f) > 0
ComboBox1.AddItem f
f = Dir
Loop
End Sub

n'est pas ce qui empèche l'affichage des autres formats usuels d'images.

Et là, je voudrais savoir, comment attribuer une dimention standart à
l'image qui sera affichée puis imprimée avec tout le reste.

Désolé, je reprendrais un texte écris précédemment à Gérard:
Mais voilà. Les images, les codes en Excel c'est vraiment pas mon fort.
L'image s'insère donc dans un cadre, qui devrait rester fixe dans
la taille visuelle (env. 6cm sur 4.5cm) en bas de page.
Un grand merci encore
Guido



"LSteph" a écrit dans le message de
news:
Bonsoir,
Content que cela te plaise.
(C'est comme indiqué dans le code inspiré d'un code de DJ avec des
jaquettes de films)
Pour un usage simple je l'ai destiné au répertoire où on l'enregistre de
préférence Mes Images
l'objectif étant de pouvoir visualiser ce que ne propose
pas forcément de la même façon insérer une image
sinon mais rien empeche de changer
de même, peu importe où tu le mets,
le tout est de concatèner correctement le nom de fichier avec le nom de
chemin
pour qu'on le retrouve.
...
C'est possible de le faire ?
oui tu noteras que c'est mis à B6 , tu peux changer.

Y-a-t'il un problème, si les images sont stockée dans des sous-dossiers
différents ?
non il suffit de modifier le path.

ceci ChDir ThisWorkbook.Path
voir dans initialize et l'enlever du combobox change ainsi que dans
CommandButton1_Click pour l'insertion d'image
mettre Curdir (pour répertoire courant)
il y a aussi un truc à corriger de je m'en rends compte dans l'initialize
pour vider la combobox avant de la remplir
Voici donc une version corrigée qui propose d'abord le choix de
répertoire.http://cjoint.com/?kjxlvxJ6oV

A+

lSteph

"Guido" a écrit dans le message de news:
%
Bonsoir LSteph,
merci de ton aide, cette application est excellente
Voici ce que je voudrais pouvoir faire avec (ou par un autre moyen)
insérer le nom de l'image directement, (ex: tintin01)
et l'insérer directement dans un petit cadre destiné à cet effet.
Y-a-t'il un problème, si les images sont stockée dans des sous-dossiers
différents ?
C'est possible de le faire ?
Guido

"LSteph" a écrit dans le message de
news:uy%
Bonjour,
pas sûr mais me suis fait ce joujou
à enregistrer dans un rep d'images
http://cjoint.com/?kjvBRA1viE

lSteph
"Guido" a écrit dans le message de news:

Bonsoir,
En insérant le nom du fichier image (zaza01) dans la cellule A1,
est-il




possible de coller cette image se trouvant dans le répertoire
C:imagetintintintin01 dans un cadre définit automatiquement. Mais
plus


dur, c'est produire ce genre de commande pour d'autres images, mais
se




trouvant dans des sous-répertoires différents dans le dossier
C:image...


Qui pourrait m'aider ?
Merci d'avance ?
Guido




















1 2 3