XL 2019 tri sur fichier type "trombinoscope"

[ivgu19]

Bonjour le forum,
Ayant fait une recherche sur le site, j'ai trouvé des infos comme "déplacer et dim avec les cellules" et "décoché verrouillé!" mais les images ne suivent tjrs pas.
Pouvez-vous m'aider dans cette réalisation de tri sur une col au choix.
je joins le fichier et les photos.
Cordialement

 

[Compte Supprimé 979]

Bonjour ivgu19

Si vous voulez trier des lignes avec des images insérées dans des cellules.

Pour moi, il faut que les images soient légèrement plus petites en hauteur que les lignes pour qu'elles tiennent dans la ligne

A+

 

[Gégé-45550]

Bonjour le forum,
Ayant fait une recherche sur le site, j'ai trouvé des infos comme "déplacer et dim avec les cellules" et "décoché verrouillé!" mais les images ne suivent tjrs pas.
Pouvez-vous m'aider dans cette réalisation de tri sur une col au choix.
je joins le fichier et les photos.
Cordialement

Bonjour,
Il me semble que l'image ne doit pas déborder de la cellule à laquelle elle est liée.
Voir PJ.
Cordialement

 

[mapomme]

Bonjour @ivgu19,

Voir le fichier. Les images conservent leurs proportions (c'est plus joli ) et sont centrées dans leur cellule.
Pour le test, les images sont dans le répertoire du fichier.

 

[ivgu19]

merci pour vos réponses. Effectivement la solution que vous préconisée fonctionne mais pas à tous les coups car comme vous le soulignez certaines images se collent à la ligne.
En agrandissant assez nettement la hauteur des lignes ainsi que la colonne J, je remarque que ça marche sur tous les tris mais la présentation sans ressent.
Une macro définit les images dans un carré 2x2, une correction ou une autre macro pourrait-elle automatiquement augmenter les lignes et col J pour que l'image soit parfaitement centrée ?

 

[mapomme]

Une macro définit les images dans un carré 2x2, une correction ou une autre macro pourrait-elle automatiquement augmenter les lignes et col J pour que l'image soit parfaitement centrée ?

Avez-vous testé ma macro ? J'en doute...
Les images s'adaptent à la taille de la cellule et sont centrées.

 

[mapomme]

Re,

Une macro pour redimensionner toutes les images de la colonne F :

1. re-dimensionner la cellule F2 qui donnera sa taille à toute les cellules de F à partir de la ligne 2 (qui contiennent une image bien sûr)
2. cliquer sur le bouton bleu

Le code :

Sub redimensionner()
Dim Hauteur, largeur, x, HautGauche As Range
   Application.ScreenUpdating = False
   Hauteur = Range("j2").RowHeight               ' Taille cellule de référence J2
   For Each x In ActiveSheet.Shapes
      Set HautGauche = x.TopLeftCell             ' cellule du coin supérieur gauche de la forme
      If HautGauche.Column = Range("j1").Column Then ' si la cellule du coin sup gauche est F
         With x
            If HautGauche.Row > 2 Then HautGauche.RowHeight = Hauteur ' redimensionner la cellule comme la cellule J2
            ' Sans déformation
            .ScaleHeight 1, msoTrue              ' rétablir la hauteur d'origine
            .ScaleWidth 1, msoTrue               ' rétablir la largeur d'origine
            .LockAspectRatio = True              ' verrouiller le rapport Hauteur/Largeur
            .Width = HautGauche.Width - 2        ' la largeur de l'image est égale à celle de la cellule -2
            .Height = HautGauche.Height - 2      ' la hauteur de l'image est égale à celle de la cellule -2
            'après redimensionnement, si la largeur dépasse celle de la cellule, on remet la largeur à cvelle de la cellule
            If .Width >= HautGauche.Width - 2 Then .Width = HautGauche.Width - 2
            .Left = HautGauche.Left + (HautGauche.Width - .Width) / 2 ' Placement de l'image au milieu de la cellule
            .Top = HautGauche.Top + (HautGauche.Height - .Height) / 2 ' Placement de l'image au milieu de la cellule
         End With
      End If
   Next x
End Sub

 

[mapomme]

Re,

Une petite réorganisation des macros pour n'avoir qu'un seul bouton.

Ce qu'on fait toujours en cliquant sur le "bouton appareil photo" (que la cellule active soit en colonne F ou non) :

• on formate tout le tableau comme la ligne 2 du tableau
• on redimensionne chaque image de la colonne F pour l'adapter à sa cellule et la centrer

Ensuite ce qu'on fait optionnellement :

• on insère une image dans la cellule active (si cette cellule est en colonne F)

 

[ivgu19]

Bonsoir mapomme,
j'ai fait des essais sur les 3versions d'où mon temps de réponse.
pour trier par colonnes, je fais trier et filtrer > tri perso >trier par.
résultat :toutes les images ne suivent pas le tri (pour moi).
je suis certain que vous avez testé alors dites moi comment je dois m'y prendre (les images ne touchent pas les bords de la col J).
Bonne soirée

 

[mapomme]

e suis certain que vous avez testé alors dites moi comment je dois m'y prendre (les images ne touchent pas les bords de la col J).

Re,

Je trie par le menu Données / Trier.
Si je met un filtre automatique et si je trie via ce filtre, ça marche aussi.

C'est bizarre : vous triez avec "trier et filtrer > tri perso >trier par"? Ça ne me dit rien sur mon ExceL sans votre classeur (et encore).

 

[ivgu19]

Bonjour mapomme,
Hélas le tri ne marche pas mieux en utilisant >données> trier.


Pour répondre "C'est bizarre : vous triez avec "trier et filtrer > tri perso >trier par"? Ça ne me dit rien sur mon ExceL sans votre classeur (et encore)."
Le classeur "2023-données-test photos liées à la ligne" est présent dans ma 1ere discussion (ci-joint la capture d'écran plus facile pour un novice (accueil>édition>trier>tri perso> et trier par).

Pouvez-vous me transmettre une capture de tri par ex sur la col A avant que je réinstalle excel. Je ne

Bonjour mapomme,
Hélas le tri ne marche pas mieux en utilisant >données> trier.


Pour répondre "C'est bizarre : vous triez avec "trier et filtrer > tri perso >trier par"? Ça ne me dit rien sur mon ExceL sans votre classeur (et encore)."
Le classeur "2023-données-test photos liées à la ligne" est présent dans ma 1ere discussion (ci-joint la capture d'écran plus facile pour un novice (accueil>édition>trier>tri perso> et trier par).

Pouvez-vous me transmettre une capture de tri par ex sur la col A afin d'essayer de déduire ce qui ne fonctionne pas sur la version 3 sur mon Excel