Recherche h

Résolu
aminesc Messages postés 70 Statut Membre -  
aminesc Messages postés 70 Statut Membre -
Bonjour,
je sais pas mais sa marche pas aider moi

Sub rechercheeee()

Dim i As Integer

i = 4
Range("J20").Select
ActiveCell.FormulaR1C1 = "=HLOOKUP(""date"",amine,i,FALSE)"
Range("J20").Select
End Sub

5 réponses

  1. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour

    si c'est la date du jour que tu utilises enlève les guillemets
    i = 4 
    Range("J20").FormulaR1C1 = "=HLOOKUP(date,amine,i,FALSE)"


    en vba évite au maximum les "select"-"selection "
    0
    1. aminesc Messages postés 70 Statut Membre
       
      bonjour,
      le résultat est toujours #nom?
      il prend pas la variable i en considération
      0
  2. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    combien as tu de lignes dans le tableau "amine" ?

    au besoin:
    Mettre le classeur sans données confidentielles en pièce jointe sur https://www.cjoint.com/
    et coller le raccourci proposé (clic droit) dans le message de réponse
    Dans l'attente

    0
    1. aminesc Messages postés 70 Statut Membre
       
      Bonjour michel_m,
      j'ai plus de 3000 ligne , en tous qu'a sa c le premier problème que j'ai rencontre
      voici le fichier
      https://www.cjoint.com/c/EKfwb5OcEby
      0
  3. jordane45 Messages postés 30427 Date d'inscription   Statut Modérateur Dernière intervention   4 832
     
    Bonjour,

    Sans chercher plus loin... je suppose que ton "i" est une variable...
    il faut donc le sortir des guillemets...
     ActiveCell.FormulaR1C1 = "=HLOOKUP(date,amine," & i & ",FALSE)" 
    
    0
    1. aminesc Messages postés 70 Statut Membre
       
      Bonjour jordane45
      Merci beaucoup sa marche enfin , mais ce que je comprend pas que sa marche pas lorsque je cherche une valeur texte :
      Range("F" & 5 + lign).FormulaR1C1 = "=HLOOKUP("date",amine," & i & ",FALSE)"
      0
    2. jordane45 Messages postés 30427 Date d'inscription   Statut Modérateur Dernière intervention   4 832
       
      Pour les valeurs de type "texte" ... il faut ajouter des guillemets autour de ta variable
      un truc du style :
      ActiveCell.FormulaR1C1 = "=HLOOKUP(date,amine,""" & i & """,FALSE)" 
      
      0
  4. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour Aminsec:

    Que veux tu faire exactement (sans parler excel) ?
    0
    1. aminesc Messages postés 70 Statut Membre
       
      Bonjour Michel m,
      c'est une fichier fournie par le service commerciale ;que je veux transforme chaque ligne on Ecriture comptable , ce qui signifie chaque ligne se transforme on plusieurs ligne
      0
  5. Vous n’avez pas trouvé la réponse que vous recherchez ?

    Posez votre question
  6. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour

    dans ton tableau de sortie tu as une colonne débit-crédit et dans ton tableau d'entrée tu n'as aucune mention de débit et crédit: j'ai donc travaillé en débit après un pile ou face...

    compte tenu du nombre de lignes annoncé (3000), j'ai travaillé par variable-tableau pour une question rapidité car par cellule vers cellule, la durée d'exécution serait très longue

    http://www.cjoint.com/c/EKijf2Yqi2v

    0
    1. aminesc Messages postés 70 Statut Membre > michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention  
       
      Bonjour michel_m ,

      je vous le jure que je vient de voire votre réponse on avez un problème de connexion au boulo ,
      pour le fichier je vais le consulter mes je vous remercie infiniment pour le travail et le temps consacrer pour m'aider c très très très gentils
      0