Case à cocher pour afficher image

bonjour à tous les passionnés qui sont sur ce forum,

Si une âme charitable pouvait me venir en aide, ce serait sa B.A. du dimanche matin!

Problème :

dans un classeur , une feuille de calcul nommée "devis" comporte des cases à cocher liées à des cellules validant par VRAI ou FAUX. Chaque case à cocher est nommée . J'aimerai faire afficher des images appelées Image 1; Image 2......... lorsque la case à cocher est en valeur VRAI. Ensuite en cliquant sur l'image choisie, il faudrait indiquer sont nom dans une autre cellule, toujours la même cellule.

Par exemple, en cochant case à cocher 10, les images 1,2,3,4 s'affichent. En cliquant sur image 1, sont nom s'affiche en G11 de la feuille de calcul nommée "DEVIS".

Cette opération doit se faire par VBA, mais là, je bloque.

merci par avance pour le précieux coup de main que vous m'apporterez.

Patrick

Bonjour patrick67,

Travailler sans fichier sur ce genre de questions est pas top top ^^

bonsoir d3d9x,

tu as Raison, Avec le fichier c'est mieux. Je l'ai allégé au max pour qu'il passe en pièce jointe. Tua sl'essentiel en onglet "DEVIS".

J'aimerai qu'en cochant la case "Lambrequin" attachée à la cellule L22, toute la série d'image à droite s'affiche à l'écran, ensuite en cliquant sur une Image pour la choisir, il faudrait que son nom s'affiche en N23.

beaucoup trop compliqué pour moi qui débute en VBA!! j'espère que tu auras une idée et pourras me donner un coup de main sur cette affaire , sans trop y passer de temps.

Merci d'avance pour le temps que tu me consacreras.

cordialement https://forum.excel-pratique.com/posting.php?mode=reply&f=2&t=75369#

patrick67

Si je comprend bien, le fait d'avoir les images n'est là que pour cliquer dessus et inscrire un nom dans la cellule N22?

Bonjour d3d9x

C'est exactement ça ! Ensuite la case donnant le nom de l'image serve à calculer un prix , mais là je gère . Pour l'instant, j'ai laissé une liste déroulante qui sera supprimée quand le l'affichage des images sera validé. C'est pour le choix de pièces que l'on appelle "lambrequin" les images parlent plus que le numéro de code de ces pièces.

Bone journée

bonjour à tous,

bonjour d3d9x,

j'ai modifié mon fichier Joint qui avait trop de Renseignements privés! là je laisse le strict nécessaire pour comprendre ma demande. Les Images sont placées dans l'onglet" GRILLES TARIF". Il faudrait que toutes ces Images s'affichent dans l'onglet "DEVIS" dans la Zone 022:R27

J'ai trouvé un code écrit par "Dubois", j'essaye de l'adapter dans la macro "Affiche Image" uniquement Avec l'image "lamb_1" pour faire un essai, mais comme je ne connais pas Grand Chose à VBA, je plante bien évidemment.

Avec un peu de Chance "dubois" pourra jeter un oeil à ce problème!

bonne journée à tous

89devis-test.zip (126.26 Ko)

Voilà une proposition normalement clé en main.

ATTENTION ta case N22 était fusionnée!!!! Si tu la refusionne tu auras des problèmes.

La totalité de mon code est dans le module nommé gestionImages

ATTENTION tu as nommé ta page devis+espace

Si tu changes de nom pour ta page, il faudra obligatoirement éditer la ligne suivante de code avec le nouveau nom utilisé

Private Const feuilleDevis As String = "devis "

J'attends ton retour Tu as de la chance j'ai bien commenté le code tu devrais pouvoir t'y repérer.

193devis-test-1.zip (131.93 Ko)

merci beaucoup pour cette réponse rapide et très précise et surtout "clé en main". Ca fonctionne super bien, c'est excatement ce que je souhaitais. J'ignorais que les codes ne fonctionnent pas sur une cellule fusionnée. Je vais bien comprendre ta procédure pour l'appliquer à d'autres endroits de mon fichier, par exemple dans le choix des modèles ou des coulisses.

en principe je devrais y arriver

Amicalement

Patrick

Rechercher des sujets similaires à "case cocher afficher image"