* heureusement que tu as transmis un fichier .xlsm et pas un fichier .xlsx ! sinon, j'aurais dû te signaler qu'un fichier .xlsx ne peut pas contenir de macros, et j'aurais eu droit à 8 mister green (pour le moins !)
* 1ère mauvaise surprise : à l'ouverture du fichier : un écran sans ruban Excel, ni aucun onglet (t'aurais quand même pu prévenir ! )
* tu n'as pas décrit quelle est la manipulation tu fais, qui aboutit à ton erreur 13 d'incompatibilité de type ; malgré plusieurs clics un peu partout, ça m'est pas arrivé ; alors peut-être que c'est juste pour toi que ça arrive ? peut-être que le méchant petit code VBA t'en veut personnellement ?
* bon, finalement, j'me suis quand même retrouvé sur l'écran de Visual Basic (à cause d'une erreur, oui, mais pas ton erreur 13, une autre ! alors peut-être que le code VBA m'en veut à moi aussi, finalement ? au secours, y' l'VBA qui m'poursuit ! un vrai film d'horreur ! )
* heureusement qu't'as pas indiqué sur quel module et pour quelle sub l'erreur se produit, pa'c'qu'avec 3 modules de classe, 8 modules classiques, 5 codes de UserForm, un code de ThisWorkbook, et aussi quelques codes de feuilles, c'est pas comme si on cherchait une aiguille dans une botte de foin, pas vrai ? une vraie partie d'plaisir ! au p'tit bonheur la chance, quoi !
* en tout cas, là où j'ai eu énormément d'chance, c'est d'pouvoir trouver une trace des auteurs du méfait ; oui, car en entête de chaque module, il y a inscrit ceci bien en évidence :
'AUTEUR: Leakim avec le soutien de Banzai64 , Eriiic, Curulis et Ceuzin via le forum excel-pratique
' et le soutien de tatiak pour son calendrier
' et d'autres contributeurs tel que JCGL, gilbert_RGI et boisgontierjacques via le forum excel-downloads
'DATE: 09/08/2017
'Titre: Réservations V3
alors si le grand jacques boisgontier lui-même et les meilleures têtes pensantes du forum se sont tous ligués ensemble pour concevoir ton erreur 13, qui suis-je pour pouvoir y remédier ?
* bon, comme tu as écrit dans ton énoncé initial : « en sélectionnant la date qui donne l'erreur comme écrit, dans "Feuil10 = (" BD_CAL ") » et qu'il y a sous « Microsoft Excel Objets » une « Feuil10 (BD_CAL) », y'a une possibilité qu'ce soit là ... mais manque de pot, pas dans l'code VBA de cette feuille, ça c'est sûr, vu qu'il contient que la patte des auteurs susmentionnée.
* faudrait aussi pouvoir trouver le code VBA que tu as indiqué dans ton post initial :
If (i - Index + 1) = Day(CDate(Range("E3").Value)) And _
Mois = Month(CDate(Range("E3").Value)) And _
Annee = Year(CDate(Range("E3").Value)) Then _
mais vu qu'je l'ai trouvé en d'multiples endroits, on retombe sur le même problème de la botte de foin ! alors tu voudras bien m'excuser si j'passe la main !
oui, bon, j'te dispense d'écrire un post avec 700 millions de mister green ; même dans un post d'extrême-orient, j'ai pas besoin d'rencontrer toute la population de Chine : chanson « 700 millions de p'tits chinois, et moi, et moi, et moi » de Jacques Dutronc.
si ton prochain post contient seulement 100 millions de mister green, ça suffira ... mais j'ai des couverts que pour deux personnes.
c'est vrai, mais mon frigo est déjà aux trois quart vide, alors faut pas trop compter sur moi pour nourrir le quart monde.
dhany