OVH Cloud OVH Cloud

insertion image

7 réponses
Avatar
major5
Bonjour,
Peut-on ins=E9rer une image dans une seule cellule et=20
egalement peut-on inserer une image par rapport =E0 une=20
plage de cellule, par exemple de la cellule A1 =E0 X31.

Si cela est r=E9alisable, comment le fait-on ?

Merci.

7 réponses

Avatar
Philippe.R
Bonjour,
24 réponses (dont des classeurs exemples à télécharger) s'offrent à toi à cette adresse :
http://www.excelabo.net/moteurs/recherche.php?pge=2&f_mot=image&f_auteur --
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"major5" a écrit dans le message de
news:1d77b01c423b1$e8fe9b00$
Bonjour,
Peut-on insérer une image dans une seule cellule et
egalement peut-on inserer une image par rapport à une
plage de cellule, par exemple de la cellule A1 à X31.

Si cela est réalisable, comment le fait-on ?

Merci.
Avatar
major5
Merci Beaucoup !


-----Message d'origine-----
Bonjour,
24 réponses (dont des classeurs exemples à télécharger)
s'offrent à toi à cette adresse :

http://www.excelabo.net/moteurs/recherche.php?
pge=2&f_mot=image&f_auteur=

--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"major5" a écrit
dans le message de

news:1d77b01c423b1$e8fe9b00$
Bonjour,
Peut-on insérer une image dans une seule cellule et
egalement peut-on inserer une image par rapport à une
plage de cellule, par exemple de la cellule A1 à X31.

Si cela est réalisable, comment le fait-on ?

Merci.


.



Avatar
Michel Pierron
Bonjour major5;

Sub Question1()
Application.ScreenUpdating = False
Const Img As String = "C:Mes DocumentsMes imagesloupe.jpg"
Dim W&, H&
With ActiveSheet
.Range("A1").Select
With .Pictures.Insert("C:Mes DocumentsMes imagesloupe.jpg")
W = .Width: H = .Height
End With
.Range("A1").EntireRow.RowHeight = H
With .Range("A1").EntireColumn
While .Width > W
.ColumnWidth = .ColumnWidth - 0.1
Wend
While .Width < W
.ColumnWidth = .ColumnWidth + 0.1
Wend
End With
End With
End Sub

Sub Question2()
Application.ScreenUpdating = False
Const Img As String = "C:Mes DocumentsMes imagesloupe.jpg"
Dim W&, H&
With ActiveSheet
W = (.Range("X31").Left + .Range("X31").Width) - .Range("A1").Left
H = (.Range("X31").Top + .Range("X31").Height) - .Range("A1").Top
.Range("A1").Select
With .Pictures.Insert("C:Mes DocumentsMes imagesloupe.jpg")
.Width = W: .Height = H
End With
End With
End Sub

MP

"major5" a écrit dans le message de
news:1d77b01c423b1$e8fe9b00$
Bonjour,
Peut-on insérer une image dans une seule cellule et
egalement peut-on inserer une image par rapport à une
plage de cellule, par exemple de la cellule A1 à X31.

Si cela est réalisable, comment le fait-on ?

Merci.
Avatar
JièL Goubert
Heu Philippe, la, tu mettrais "c'est avac plaisir" ou bien "c'est avec
grand plaisir" ? ;-))))))))))))

Your welcome

--
JièL Plaie zir

Le 16/04/2004 15:31 vous nous disiez ceci :
Merci Beaucoup !


Avatar
Philippe.R
Ah, diable, Jean Louis, tu m'embarrasses !
V'la t'y pas que je vais être obligé d'y réfléchir à 2 fois à présent !
--
Amicales Salutations

"JièL Goubert" a écrit dans le message de
news:
Heu Philippe, la, tu mettrais "c'est avac plaisir" ou bien "c'est avec
grand plaisir" ? ;-))))))))))))

Your welcome

--
JièL Plaie zir

Le 16/04/2004 15:31 vous nous disiez ceci :
Merci Beaucoup !




Avatar
Philippe.R
Tout bien réfléchi, c'était avec plaisir !
;o)))
--
Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Dim n as long
Set n= [mesplaisirs]
n=n+1

"major5" a écrit dans le message de
news:1aad901c423b7$17a05f70$
Merci Beaucoup !


-----Message d'origine-----
Bonjour,
24 réponses (dont des classeurs exemples à télécharger)
s'offrent à toi à cette adresse :

http://www.excelabo.net/moteurs/recherche.php?
pge=2&f_mot=image&f_auteur >--

Amicales Salutations
Retirer A_S_ pour répondre.
XL 97 / 2000 / 2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"major5" a écrit
dans le message de

news:1d77b01c423b1$e8fe9b00$
Bonjour,
Peut-on insérer une image dans une seule cellule et
egalement peut-on inserer une image par rapport à une
plage de cellule, par exemple de la cellule A1 à X31.

Si cela est réalisable, comment le fait-on ?

Merci.


.



Avatar
JièL Goubert
MMMDDRRRRRRRR ;-)))))))))

Le 16/04/2004 15:47 vous nous disiez ceci :

Ah, diable, Jean Louis, tu m'embarrasses !
V'la t'y pas que je vais être obligé d'y réfléchir à 2 fois à présent !