Pb affichage image dans un tableau

Bonsoir,

Je rencontre un problème d'affichage dans le fichier Gestion concours (Modèle) sur l'onglet Répartition cibles. Suivant les formules, il devrait afficher les blasons correspondants pour chaque cible pour le départ indiqué sur l'onglet Blasons départ en C2. Mais toutes les cibles ne s'affichent pas et je ne comprends pas pourquoi.

Si quelqu’un voit où j'ai commis une( ou des) erreur(s), je suis preneur.

Cordialement

@BrunoM45,

Bonsoir Bruno,

Si tu passes par là, c'est toi qui m'avait fourni le code pour mon fichier, à l'époque.

https://forum.excel-pratique.com/excel/inserer-une-image-de-recherchev-ou-index-equiv-176496

Si tu peux jeter un œil, je t'en remercie par avance.

Cordialement

Bonjour Zebulon2

Il n'est pas souhaitable de nommer quelqu'un en particulier sur ce forum, tout le monde peut répondre
En revanche c'est très bien de rappeler le fil du sujet

Je regarderai si j'ai le temps ce soir

Cordialement

Bonjour Bruno,

Désolé pour le désagrément, je le saurais à l'avenir.

Cordialement

Bonsoir,

Personne n'a une petite idée ?

Cordialement

Bonjour Zebulon2

Est-ce que ton problème se situe pour le 14 et 15 ?

Erreur dans la formule, il s'agit de al colonne E et non F

Et à partir de la ligne 57, il n'y a plus aucune valeur dans ton onglet "Blasons Départ"

Il y a également un problème dans la requête "Départ", mais là...

Fichier avec code modifié pour l'inscription des erreurs

A+

Bonjour BrunoM45,

Merci de d'être penché sur mon problème.

Est-ce que ton problème se situe pour le 14 et 15 ?

Non, il n'y a que 13 cibles actives pour le moment.

Le problème de la requête "Départ" vient de l'instruction

= Excel.CurrentWorkbook(){[Name="_Depart"]}[Content]{0}[Column1]

Qui devrait être

= Excel.CurrentWorkbook(){[Name=_Depart]}[Content]

L'onglet erreur fait apparaitre les cibles sur lesquelles il n'y a pas d'archers inscrits.

Mon problème est sur le fait que de façon aléatoire l'image de certaines cibles n'apparait pas.

Encore merci de regarder si cela se produit aussi chez toi.

Bonne journée,

Cordialement.

Dans cet exemple, la cible 8A est manquante. C'est cela qui me pose problème

Re,

J'ai effectivement vu ce phénomène, mais en cliquant de nouveau sur le bouton il disparait, pour moi, cela ne vient pas du code.

Il faut peut-être essayer de mettre une désactivation du recalcul automatique au début de la procédure

  ' Désactiver le recalcul
  Application.Calculation = xlCalculationManual

A réactiver à la fin

A+

Re,

Je viens de tester en supprimant le timer et en désactivant le recalcul auto, cela à l'air de fonctionner.

Merci pour le temps passé et le coup de main.

Bonne continuation.

Cordialement