Discussion :

[scoubi77]

Bonsoir à tous,

Je n'arrive pas à positionner mon image dans une Cellule en haut à droite !

Pour la positionnée à gauche pas de soucis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Fichier = (répertoirePhoto & "\IMAGES\" & "Li" & A & ".JPG")
    Set objImg = ActiveSheet.Pictures.Insert(Fichier)
 Set Emplacement = Feuil5.Range("B1")
Set objImg = ActiveSheet.DrawingObjects(ActiveSheet.Shapes.Count)
 With objImg.ShapeRange
    .LockAspectRatio = msoFalse
    .Left = Emplacement.Left
    .Top = Emplacement.Top
End With

Penser comme je l'ai fait remplacer Left par Right, vous mènera comme moi à venir poser la question lol

Merci par avance pour vos aides

[pijaku]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
.Left = Emplacement.OffSet(0 ,1).Left - .Width

[unparia]

Bonjour

en haut à droite

placer à droite, c'est (à moins que je n'aie trop bu) définir la gauche de l'image à la largeur de la cellule moins celle de l'image, non ?

EDIT : salut, Franck (on s'est croisés). Amitiés

[scoubi77]

Merci beaucoup je teste dès ce soir

[pijaku]

Salut Jacques.

J'ai trouvé plus simple de penser que la droite d'une cellule est égale à la gauche de la cellule immédiatement à sa droite...

Mais sinon, tu as également raison sur le principe.
J'ai eu juste un doute sur le Width ou ColumnWidth, et comme je n'avais rien sous la main pour tester...

Par ailleurs, je ne comprends pas pourquoi cette question est un problème...

Amitiés en retour.

Ps : présente également mes respects à Mme Unparia.

[unparia]

A Franck
Il ne saurait être plus clair que le choix de la cellule de la colonne suivante est de très loin le plus simple des repères.

J'ai surtout personnellement voulu forcer scoubi77 à se pencher un peu sur la logique des "choses".
(encore 20 séances de kiné - muscles maintenant à récupérer - et tout devrait rentrer dans l'ordre).

[pijaku]

tout devrait rentrer dans l'ordre.

ça c'est une très bonne nouvelle, en espérant que :

encore 20 séances de kiné

ces séances ne soient pas trop dures...
C'est galère de faire de l'exercice (un peu forcé) par ces chaleurs que l'on connait actuellement.

Je parle pour nous, gens du Nord (

) qui n'avons pas systématiquement la climatisation...

En tout cas, très bon weekend à vous, et à très bientôt, ici ou ailleurs!