Les photos se superposent ?
Résolu/Fermé
philippe74440
Messages postés
6
Date d'inscription
samedi 26 novembre 2011
Statut
Membre
Dernière intervention
2 novembre 2020
-
26 avril 2013 à 01:59
philippe74440 Messages postés 6 Date d'inscription samedi 26 novembre 2011 Statut Membre Dernière intervention 2 novembre 2020 - 27 avril 2013 à 11:31
philippe74440 Messages postés 6 Date d'inscription samedi 26 novembre 2011 Statut Membre Dernière intervention 2 novembre 2020 - 27 avril 2013 à 11:31
A voir également:
- Les photos se superposent ?
- Partage de photos - Guide
- Toutes mes photos - Guide
- Doublons photos - Guide
- Les photos de profil - Guide
- Gestionnaire de photos - Guide
2 réponses
eriiic
Messages postés
24580
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
5 juin 2024
7 222
26 avril 2013 à 09:40
26 avril 2013 à 09:40
Bonjour,
Uniquement en vba, Alt+F11 pour ouvrir VBE.
Les images doivent être intégralement dans la cellule.
https://www.cjoint.com/?CDAjMIFGaDm
eric
Uniquement en vba, Alt+F11 pour ouvrir VBE.
Les images doivent être intégralement dans la cellule.
https://www.cjoint.com/?CDAjMIFGaDm
eric
philippe74440
Messages postés
6
Date d'inscription
samedi 26 novembre 2011
Statut
Membre
Dernière intervention
2 novembre 2020
26 avril 2013 à 11:57
26 avril 2013 à 11:57
Bonjour "Eriiic",
je suis désolé, mais mon niveau de simple utilisateur ne me permet pas de comprendre la manip. pour arriver au résultat de ton exemple.
Pourrais-tu me la détailler ?
En double cliquant sur l'image, je suis arrivé sur le fameux "projet VBA Project" et une fenêtre contenant ceci :
"Option Explicit
Private Sub Image5_Click()
End Sub
Private Sub Worksheet_Calculate()
Static nblig As Long, a
Dim shp As Shape
For Each shp In ActiveSheet.Shapes
If shp.Type = msoOLEControlObject Or shp.Type = msoPicture Then
shp.Visible = Not Rows(shp.TopLeftCell.Row).Hidden
End If
Next
End Sub"
Si tu as encore un peu de ton temps à m'accorder, je t'en remercie.
Bien cordialement,
Philippe
je suis désolé, mais mon niveau de simple utilisateur ne me permet pas de comprendre la manip. pour arriver au résultat de ton exemple.
Pourrais-tu me la détailler ?
En double cliquant sur l'image, je suis arrivé sur le fameux "projet VBA Project" et une fenêtre contenant ceci :
"Option Explicit
Private Sub Image5_Click()
End Sub
Private Sub Worksheet_Calculate()
Static nblig As Long, a
Dim shp As Shape
For Each shp In ActiveSheet.Shapes
If shp.Type = msoOLEControlObject Or shp.Type = msoPicture Then
shp.Visible = Not Rows(shp.TopLeftCell.Row).Hidden
End If
Next
End Sub"
Si tu as encore un peu de ton temps à m'accorder, je t'en remercie.
Bien cordialement,
Philippe
eriiic
Messages postés
24580
Date d'inscription
mardi 11 septembre 2007
Statut
Contributeur
Dernière intervention
5 juin 2024
7 222
26 avril 2013 à 14:15
26 avril 2013 à 14:15
C'est du vba, langage de programmation d'excel.
Copie le texte du code en entier, va sur ton classeur, clic-droit sur sur nom de l'onglet concerné et 'visualiser le code' et coller le code.
Mettre la formule n'importe où sur la feuille, ensuite ta feuille masquera les images lorsque tu filtreras.
J'ai mis une autre version dans la réponse à michel, mais vu que tu débutes si celle d'avant te va bien contente-toi d'elle, plus simple.
eric
Copie le texte du code en entier, va sur ton classeur, clic-droit sur sur nom de l'onglet concerné et 'visualiser le code' et coller le code.
Mettre la formule n'importe où sur la feuille, ensuite ta feuille masquera les images lorsque tu filtreras.
J'ai mis une autre version dans la réponse à michel, mais vu que tu débutes si celle d'avant te va bien contente-toi d'elle, plus simple.
eric
philippe74440
Messages postés
6
Date d'inscription
samedi 26 novembre 2011
Statut
Membre
Dernière intervention
2 novembre 2020
27 avril 2013 à 11:31
27 avril 2013 à 11:31
Bonjour Eric,
Cela fonctionne !
Merci beaucoup !
Cela donnerait envie de se mettre à ce fameux VBA-VBE. mais ne réalisant pas de macros, je pense que cela ne doit pas être du tout évident.
Bien cordialement,
Philippe
Cela fonctionne !
Merci beaucoup !
Cela donnerait envie de se mettre à ce fameux VBA-VBE. mais ne réalisant pas de macros, je pense que cela ne doit pas être du tout évident.
Bien cordialement,
Philippe
26 avril 2013 à 11:00
très belle macro: je fourgonne dans mon grenier et te plussoie
cordialement
26 avril 2013 à 14:15
tu as vu, sobre... ;-)
Une autre version avec plus de possibilité : https://www.cjoint.com/?CDAonUkLUVb
eric
26 avril 2013 à 15:05
j'vas étudier le code car il y a quelques lignes que je comprends pas pour l'instant
tu as le droit à un 3° + (le 2° c'est pas moi)
26 avril 2013 à 22:18
Effectivement c'est une superbe macro "sobre" mais cela se complique s'il faut traiter chaque type...
Toujours zen
La perfection est atteinte, non pas lorsqu'il n'y a plus rien à ajouter, mais lorsqu'il n'y a plus rien à retirer. Antoine de Saint-Exupéry
26 avril 2013 à 23:48
Bah, c'est surtout que j'ai voulu en profiter pour creuser un peu ces propriétés des objets sur les feuilles et certains dans les formulaires).
Ici autant traiter en bloc, pas vraiment de raison de ne pas rendre invisible tel ou tel type.
Mais pour un autre usage qui sait.. :-)
eric