Centrer image dans cellule

Bonjour a tous,

Je peaufine mon fichier de classification de pieces lego (simpliste).

J'aimerais centrer les images que j'importe dans la cellule de destination

Quelqu'un peut il me conseiller ?

D'avance Merci

13stock-lego.zip (262.73 Ko)

Bonsoir Damsa17,

Utiliser cette modif pour adaptation à la cellule.

'Première partie du code...

 'L'image couvre la cellule dans laquelle elle s'insère
            With Image
                .ShapeRange.LockAspectRatio = msoFalse 'Modif à faire ici et chiffres en commentaires
                .Width = cel.Offset(0, -8).Width '   - 5
                .Height = cel.Offset(0, -8).Height '  - 5
                .Left = cel.Offset(0, -8).Left
                .Top = cel.Offset(0, -8).Top '   + 3
             End With
             '4 lignes de code à ajouter
             Ratio = cel.Offset(0, -8).Width / Image.Width
             Image.Select
             Selection.ShapeRange.LockAspectRatio = msoFalse
             Selection.ShapeRange.ScaleWidth Ratio, msoFalse, msoScaleFromTopLeft

             With Image.ShapeRange.Line

suite du code...

Bons tests, bonne continuation.

Merci, c'est pas trop mal,

Mais ce que j'aimerais c'est que l'image soit plus petite que la cellule(d'ou les -5 et +3) et centrée dans celle-ci.

A nouveau,

Remet les des chiffres identiques pour Top, Width, Height et Left.

Cela va réduire l'image et créer un liseré autour. Teste pour voir car je verrais cela plus tard.

Vu qu'il n'existait pas d'image dans ton fichier pour tester.

Merci, j'essayais ça demain et par la même occasion je mettrais un fichier avec des images pour tester cela

A nouveau,

Remet les des chiffres identiques pour Top, Width, Height et Left.

Cela va réduire l'image et créer un liseré autour. Teste pour voir car je verrais cela plus tard.

Vu qu'il n'existait pas d'image dans ton fichier pour tester.

Bonjour X cellus,

J'ai essayer mais cela ne fonctionne pas.

Bonjour Damsa17,

J'ai repris un fichier réalisé pour un autre membre du Forum. En le modifiant pour ton besoin. Un premier test a été effectué et est correct.

Regardes après l'avoir testé de pouvoir intégrer le code dans ton programme.

Voir colonne I à partir des lignes 20 ainsi que les notes en rouge.

Bons tests, bonne continuation.

35exemplejona.xlsm (28.90 Ko)

Merci,

Je regarderais a ce point plus tard ( c'est juste pour de la mise en page) pour la fin.

Rechercher des sujets similaires à "centrer image"