Bonjour,
 
Je débute en VBA. Et les erreurs sont sûrement en conséquence.
Je cherche tout d'abord à exécuter une macro dès l'ouverture du fichier joint. Il ouvre un fichier CSV dans lequel se trouve trois données qui m'intéressent.
Dans le fichier joint, je recopie une donnée du fichier CSV selon une recherche à deux critères avec BDLIRE au bon endroit dans mon fichier joint, et si la recherche n'aboutit pas, je remplis un marqueur avec des 1.
Je rencontre trois problèmes :
- le CSV utilise des ; en séparateurs. Quand je l'ouvre avec Excel "normalement" (i.e. par double-clic   ) il me sépare bien les colonnes ; mais quand le fichier est ouvert par Workbooks.Open...(*.CSV) il ne les sépare pas correctement (il attend sans doute un format américain avec des virgules en séparateurs). Comment faire pour l'ouvrir correctement ?
- Ma condition de succès d'une RECHERCHEH ne fonctionne pas (erreur 438) :
" If Not (WorksheetFunction.IsNA(WorksheetFunction.HLookup(wb2.Sheets("coherence" ).Cells(k * 240 + 1, 1), wb1.Range("C:C" ), 1, False))) "
- Je n'arrive pas à remplir les cellules par le contenu d'une autre (erreur 1004) :
" wb2.Sheets("tri" ).Cells(2, 1).Value = wb2.Sheets("coherence" ).Cells((k - 1) * 240 + x, 1).Value "
 
Le fichier en question : http://www.cjoint.com/data/0EmlzpI6mXW.htm
 
Merci d'avance  

Premier problème résolu : ajout d'une ligne avant la déclaration et ajout Local:=True... Simple en somme.

 
           Bonjour,
 
           consulter l'aide VBA de la méthode  Find  pour effectuer une recherche …
 
           Quant à l'erreur 1004, il s'agit soit d'une erreur quant au nom d'une feuille de calculs soit d'une erreur de conception
           et là il suffit de placer un point d'arrêt sur la ligne déclenchant l'erreur et d'y vérifier le contenu des variables …
           Du reste c'est certainement le même souci pour RECHERCHEH …

J'ai pu avancer ; ma recherche fonctionne, mais pas la fonction BDLIRE (Dget) qui renvoie une erreur 1004 : "Impossible de lire la propriété Dget de la classe WorksheetFunction".
 
Je n'ai rien trouvé de significatif dans l'aide, ni sur d'autres topics (erreurs courantes pour les RECHERCHEH et RECHERCHEV apparemment...)
 
Le bout problématique :
 

 
Une idée ?

 
           Merci d'utiliser l'icône dédiée pour baliser le code conformément aux règles du forum …
 
           En général l'aide intégrée au VBA ou à Excel suffit amplement.
 
           Sinon faire directement la recherche dans une cellule via une formule de calculs qui, une fois au point,
           ne sera pas difficile à traduire en VBA (en lisant le contenu de sa propriété  Formula)  …
 

Pour ceux qui galèrent avec la fonction BDLIRE (Dget) en VBA comme moi, voilà comment j'ai procédé :
 

 
Comme la formule fonctionnait lorsque tapée directement dans Excel, comme l'a suggéré Marc L j'ai copié la formule sortie par l'enregistreur de macro.
range.Formula = range.Value permet de faire ensuite un pseudo copier/coller uniquement la valeur sans être aussi gourmand si j'ai bien compris.
 
Il y a sûrement plus efficace néanmoins...
 
Merci !

 
           Peut-être directement en utilisant la puissante méthode  Evaluate  …