OVH Cloud OVH Cloud

Insertion image

5 réponses
Avatar
arnaud
Bonjour à tous !

J'insere une image par macro.
J'aimerai qu'elle se positionne à un endroit précis de la feuille (centré
dans la cellule B1).
Y'a t'il une solution ???

Merci d'avance...
Arnaud

5 réponses

Avatar
Modeste
Bonsour ® Arnaud,
simple :
pour quelle se positionne en B1 coin haut gauche
selectionner B1 puis faire l'insertion

ensuite
plus complexe :
pour centrer sur [B1]....
récuperer les coordonnées et dimensions de [B1]
[B1].top
[B1].left
il n'y a pas de [B1].width
on l'obtient par [C1].left-[B1].left
meme methode pourr height

si les dimensions de l'image ne sont pas définies avant..
récupérer les dimensions de l'image Width et Height
faire les calculs..... et décaler image.top et image.left
en consequence....
tenir compte des parametres msoRatioxxxx etc...

;o)))
@+
-----Message d'origine-----
Bonjour à tous !

J'insere une image par macro.
J'aimerai qu'elle se positionne à un endroit précis de
la feuille (centré

dans la cellule B1).
Y'a t'il une solution ???

Merci d'avance...
Arnaud


.



Avatar
sabatier
comment ça, modeste : width et height n'existent pas? mon oeil,
oui...demande à gaétan mourmant ou mieux achète-lui ses CDs...
jps

h = ActiveCell.Height
w2 = ActiveCell.Width
t = ActiveCell.Top
w = ActiveCell.Left

"Modeste" a écrit dans le message de
news:037f01c4b688$27f4d220$
Bonsour ® Arnaud,
simple :
pour quelle se positionne en B1 coin haut gauche
selectionner B1 puis faire l'insertion

ensuite
plus complexe :
pour centrer sur [B1]....
récuperer les coordonnées et dimensions de [B1]
[B1].top
[B1].left
il n'y a pas de [B1].width
on l'obtient par [C1].left-[B1].left
meme methode pourr height

si les dimensions de l'image ne sont pas définies avant..
récupérer les dimensions de l'image Width et Height
faire les calculs..... et décaler image.top et image.left
en consequence....
tenir compte des parametres msoRatioxxxx etc...

;o)))
@+
-----Message d'origine-----
Bonjour à tous !

J'insere une image par macro.
J'aimerai qu'elle se positionne à un endroit précis de
la feuille (centré

dans la cellule B1).
Y'a t'il une solution ???

Merci d'avance...
Arnaud


.



Avatar
arnaud
Merci de votre aide !
ça marche très bien !!
Arnaud



"sabatier" a écrit dans le message
de news:
comment ça, modeste : width et height n'existent pas? mon oeil,
oui...demande à gaétan mourmant ou mieux achète-lui ses CDs...
jps

h = ActiveCell.Height
w2 = ActiveCell.Width
t = ActiveCell.Top
w = ActiveCell.Left

"Modeste" a écrit dans le message
de

news:037f01c4b688$27f4d220$
Bonsour ® Arnaud,
simple :
pour quelle se positionne en B1 coin haut gauche
selectionner B1 puis faire l'insertion

ensuite
plus complexe :
pour centrer sur [B1]....
récuperer les coordonnées et dimensions de [B1]
[B1].top
[B1].left
il n'y a pas de [B1].width
on l'obtient par [C1].left-[B1].left
meme methode pourr height

si les dimensions de l'image ne sont pas définies avant..
récupérer les dimensions de l'image Width et Height
faire les calculs..... et décaler image.top et image.left
en consequence....
tenir compte des parametres msoRatioxxxx etc...

;o)))
@+
-----Message d'origine-----
Bonjour à tous !

J'insere une image par macro.
J'aimerai qu'elle se positionne à un endroit précis de
la feuille (centré

dans la cellule B1).
Y'a t'il une solution ???

Merci d'avance...
Arnaud


.







Avatar
Modeste
;o)))
plaudite, cives !
In vino veritas !!!!

de omni re scibili :

"Type de données Variant en lecture seule."

Errare humanum est, perseverare diabolicum
ita JPS placuit !!!

;o)))
@+

-----Message d'origine-----
comment ça, modeste : width et height n'existent pas?
mon oeil,

oui...demande à gaétan mourmant ou mieux achète-lui ses
CDs...

jps

h = ActiveCell.Height
w2 = ActiveCell.Width
t = ActiveCell.Top
w = ActiveCell.Left

"Modeste" a écrit
dans le message de

news:037f01c4b688$27f4d220$
Bonsour ® Arnaud,
simple :
pour quelle se positionne en B1 coin haut gauche
selectionner B1 puis faire l'insertion

ensuite
plus complexe :
pour centrer sur [B1]....
récuperer les coordonnées et dimensions de [B1]
[B1].top
[B1].left
il n'y a pas de [B1].width
on l'obtient par [C1].left-[B1].left
meme methode pourr height

si les dimensions de l'image ne sont pas définies avant..
récupérer les dimensions de l'image Width et Height
faire les calculs..... et décaler image.top et image.left
en consequence....
tenir compte des parametres msoRatioxxxx etc...

;o)))
@+
-----Message d'origine-----
Bonjour à tous !

J'insere une image par macro.
J'aimerai qu'elle se positionne à un endroit précis de
la feuille (centré

dans la cellule B1).
Y'a t'il une solution ???

Merci d'avance...
Arnaud


.




.




Avatar
jps
placuite... placuite...ita soeur, geedee, grand latinologue chez gaffiot
jps

"Modeste" a écrit dans le message de
news:047301c4b6a2$40754180$
ita JPS placuit !!!

;o)))
@+

-----Message d'origine-----
comment ça, modeste : width et height n'existent pas?
mon oeil,

oui...demande à gaétan mourmant ou mieux achète-lui ses
CDs...

jps

h = ActiveCell.Height
w2 = ActiveCell.Width
t = ActiveCell.Top
w = ActiveCell.Left

"Modeste" a écrit
dans le message de

news:037f01c4b688$27f4d220$
Bonsour ® Arnaud,
simple :
pour quelle se positionne en B1 coin haut gauche
selectionner B1 puis faire l'insertion

ensuite
plus complexe :
pour centrer sur [B1]....
récuperer les coordonnées et dimensions de [B1]
[B1].top
[B1].left
il n'y a pas de [B1].width
on l'obtient par [C1].left-[B1].left
meme methode pourr height

si les dimensions de l'image ne sont pas définies avant..
récupérer les dimensions de l'image Width et Height
faire les calculs..... et décaler image.top et image.left
en consequence....
tenir compte des parametres msoRatioxxxx etc...

;o)))
@+
-----Message d'origine-----
Bonjour à tous !

J'insere une image par macro.
J'aimerai qu'elle se positionne à un endroit précis de
la feuille (centré

dans la cellule B1).
Y'a t'il une solution ???

Merci d'avance...
Arnaud


.




.