Contenu récent par jim7963

Super, ça re-fonctionne. Je me doutais bien que cela venait d'une mise à jour logicielle mais pour trouver l'origine du problème c'était une autre paire de manche. En tout cas merci infiniment.

Bonjour, je me permets de déterrer ce vieux sujet que j'avais créé il y a quelques années maintenant, car j'ai aujourd'hui un problème avec le fichier de Dranreb qui fonctionnait parfaitement jusqu'au mois dernier. Je l'utilise tous les mois sans problème, pour mes analyses et allez savoir...

Super ça marche cette fois, merci beaucoup.

Voici le fichier. Attention, il y a d'autres macros dedans.

Bonjour et merci pour vos réponses. - Roblochon, pour le lookat:=xlWhole j'ai essayé avec et sans de même qu'avec le LookIn:=xlValues, j'ai tenté toutes les combinaisons possibles cela n'a rien changé. Comme dans ma macro test je lance la recherche d'une somme qui se trouve déjà dans ma plage...

Bonjour à tous, j'ai un petit soucis avec une fonction de recherche de valeur dans une plage. Cette fonction doit me renvoyer True si elle trouve ma valeur recherchée dans une plage définie et False si elle ne la trouve pas. Public Function controleMontant(montantDon As Double) As Boolean...

Bonjour, super et merci du coup de main.

Bon après re-test, quand j'exporte mon fichier de données ça me remet l'erreur. Par contre quand je fais une modif dans le fichier de données (même en la supprimant de suite) et que je ré-enregistre le fichier là l'erreur ne se produit plus. Va comprendre...

Je n'y comprend plus rien, j'ai ouvert les fichiers pour anonymiser et j'ai refais un test par acquis de conscience avec ton code et maintenant ça marche..... Je deviens fou. Par contre une dernière question, avec ton code il ne me reprend pas la 1ère ligne d'en-tête. Avec mon code je pouvais...

Les 2 macros s’exécutent bien

Merci pour ta réponse. Pour le 1er test, oui les fichiers existent bien et le code les trouve. Pour le 2nd test, j'ai bien pris la dernière démo du fil et j'ai intégré le code dans le mien ce qui donne : Set Source = CreateObject("ADODB.Connection") Source.Provider =...

Bonjour, merci pour la réponse et toutes mes excuses pour le retour tardif. Je n'ai pas eu le temps de me re-pencher sur ce fichier depuis la semaine dernière. Pour le code ADODB j'avais pris un modèle tout fait que j'avais récupéré sur un autre site et qui fonctionnait bien jusqu'à...

Bonjour Pierre merci pour ta réponse, j'ai testé mais maintenant j'ai un nouveau message d'erreur: "Pilote ISAM introuvable". J'ai fait une petite recherche rapide sur internet et je suis tombé sur...

Bonjour à tous, voici un morceau de code que j'utilisais jusqu'à présent et qui fonctionnait très bien. Il me permet de récupérer les données de plusieurs fichiers fermés excel au format xls. Dim Source As ADODB.Connection Dim Rst As ADODB.Recordset Dim ADOCommand As ADODB.Command Dim Fichier...

Bonjour et merci pour la réponse. Une bonne nuit ayant passé, j'ai les idées plus claires. Je m'étais focalisé sur la ligne d'erreur sauf que je n'avais pas vu qu'en fait le problème venait en fait d'une autre ligne: derLi2 = Columns(1).End(xlDown).Row En fait la 1ère ligne était vide et donc...