OVH Cloud OVH Cloud

image du web sur excel?

4 réponses
Avatar
ksandre
bonjour

Et oui c'est encore moi !!!

Alors j'ai un nouveau problème toujours avec mon tableau de commande.
J'aimerai faire correspondre à une référence ,l'image correspondante . Cette
image sera sur le web donc je voulais savoir s'il était possible en utilisant
la boite à outil de controle , de placer une image et de lui indiquer où
aller la chercher sur le web .....
j'ai bien vu la formule INCORPORE(forms.image1;"") mais en mettant
l'adresse internet de l'image à la place cela ne marche pas... peut-être
faut-il employer une macro?
je remet mon tableau en ligne pour ceux qu'ils ne l'ont pas vu :
http://cjoint.com/?ehpXUhmpid

comme vous pouvez le voir sur le tableau mes images se trouveront dans
la colonne A.
Par la suite mon tableau sera mieux en ligne sur mon site pour permettre
à mes client de passer commande .

Voilà ......... d'avance merci à ceux qui se creuseront les ménage avec
moi pour trouver la solution .
Ksandre

4 réponses

Avatar
ksandre
bon eh bien vu le nombre de réponse qui m'ont été donné ..... je crois bien
que c'est impossible

merci quand même d'avoir cherché

cordialmement Ksandre


bonjour

Et oui c'est encore moi !!!

Alors j'ai un nouveau problème toujours avec mon tableau de commande.
J'aimerai faire correspondre à une référence ,l'image correspondante . Cette
image sera sur le web donc je voulais savoir s'il était possible en utilisant
la boite à outil de controle , de placer une image et de lui indiquer où
aller la chercher sur le web .....
j'ai bien vu la formule INCORPORE(forms.image1;"") mais en mettant
l'adresse internet de l'image à la place cela ne marche pas... peut-être
faut-il employer une macro?
je remet mon tableau en ligne pour ceux qu'ils ne l'ont pas vu :
http://cjoint.com/?ehpXUhmpid

comme vous pouvez le voir sur le tableau mes images se trouveront dans
la colonne A.
Par la suite mon tableau sera mieux en ligne sur mon site pour permettre
à mes client de passer commande .

Voilà ......... d'avance merci à ceux qui se creuseront les ménage avec
moi pour trouver la solution .
Ksandre


Avatar
Norvi
Bonsoir Ksandre,

Voilà une solution pour insérer des images présentes sur Internet
dans ton classeur (mais qui n'est pas dynamique) :

Manuellement :
Inserer>Image>A partir du fichier puis mettre l'URL dans le nom du
fichier.

Avec une macro :
Sub Picture_Web()
Dim MonImage As String
MonImage = "http://groups.google.com/groups/img/groups_medium_fr.gif"
With ThisWorkbook.Worksheets(1)
.Range("A1").Select
.Pictures.Insert (MonImage)
End With
End Sub

Bonne soirée,

N.
Avatar
ksandre
mille fois merci norvi

il est vrai que je n'avais pas pensé à mettre l'url de l'image vu que je
croyais qu'en faisant ça il fallait absolumment que l'image soit sur l'ordi

merci beaucoup

cordialement ksandre


Bonsoir Ksandre,

Voilà une solution pour insérer des images présentes sur Internet
dans ton classeur (mais qui n'est pas dynamique) :

Manuellement :
Inserer>Image>A partir du fichier puis mettre l'URL dans le nom du
fichier.

Avec une macro :
Sub Picture_Web()
Dim MonImage As String
MonImage = "http://groups.google.com/groups/img/groups_medium_fr.gif"
With ThisWorkbook.Worksheets(1)
..Range("A1").Select
..Pictures.Insert (MonImage)
End With
End Sub

Bonne soirée,

N.




Avatar
raph77
Bonjour,

Justement pour les experts, quand on insere automatiquement en VBA dans
Excel une image gif ou jpeg a partir d'une URL sur le net, l'image
prend tres rapidement plusieurs centaines de kilo octets (meme si
l'image originale ne fait que quelques kilo octets).

Quelqu'un connait t'il le moyen de "compresser" cela afin de reduire la
taille du fichier xls ?

Merci d'avance si certains ont la reponse.

Raph


mille fois merci norvi

il est vrai que je n'avais pas pensé à mettre l'url de l'image vu que je
croyais qu'en faisant ça il fallait absolumment que l'image soit sur l' ordi

merci beaucoup

cordialement ksandre


Bonsoir Ksandre,

Voilà une solution pour insérer des images présentes sur Internet
dans ton classeur (mais qui n'est pas dynamique) :

Manuellement :
Inserer>Image>A partir du fichier puis mettre l'URL dans le nom du
fichier.

Avec une macro :
Sub Picture_Web()
Dim MonImage As String
MonImage = "http://groups.google.com/groups/img/groups_medium_fr.gif"
With ThisWorkbook.Worksheets(1)
..Range("A1").Select
..Pictures.Insert (MonImage)
End With
End Sub

Bonne soirée,

N.