Recherche h

Résolu
aminesc Messages postés 70 Date d'inscription   Statut Membre Dernière intervention   -  
aminesc Messages postés 70 Date d'inscription   Statut Membre Dernière intervention   -
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

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 313
 
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
aminesc Messages postés 70 Date d'inscription   Statut Membre Dernière intervention  
 
bonjour,
le résultat est toujours #nom?
il prend pas la variable i en considération
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 313
 
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
aminesc Messages postés 70 Date d'inscription   Statut Membre Dernière intervention  
 
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
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
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
aminesc Messages postés 70 Date d'inscription   Statut Membre Dernière intervention  
 
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
jordane45 Messages postés 38486 Date d'inscription   Statut Modérateur Dernière intervention   4 752
 
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
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 313
 
Bonjour Aminsec:

Que veux tu faire exactement (sans parler excel) ?
0
aminesc Messages postés 70 Date d'inscription   Statut Membre Dernière intervention  
 
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

Vous n’avez pas trouvé la réponse que vous recherchez ?

Posez votre question
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 313
 
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
aminesc Messages postés 70 Date d'inscription   Statut Membre Dernière intervention   > michel_m Messages postés 16602 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