Signification code ?

[Fatifleur]

svp qlq'un peut m'expliquer un peut en détail que veut dir cette ligne de code:

lig = Val(Mid(ligne, InStr(ligne, "_") + 1, InStr(ligne, "]") - (InStr(ligne, "_") + 1)))

Merci

 

[wilfried_42]

Re : !!!!!!!!!!!!????

bonjour

il serait interresant, pour les recherches futures que tu modifies le titre de ta question, il ne veut rien dire

instr donne la position d'un caractere dans une chaine, le caractere cherché est "_", on as besoin de instr car la position du _ n'est pas fixe

ensuite dan ligne tu as un nombre qui est terminé par ]

exemple :
123456789 ' les positions
azs_14]xyz ' la chaine de caractere
instr(ligne,"_") donne 4
instr(ligne,"]") donne 7
mid(ligne,4+1,7-(4+1)) donc mid(ligne,5,2) soit 15

 

[XL_Luc]

Re : !!!!!!!!!!!!????

C'est pour prende dans une chaine du type :

zzyyxx_123]ssiinjkhklh la valeur 123 quelque soit la position du _ et du ]

alors explication :

Mid, fonction

Renvoie une valeur de type Variant (String) contenant un nombre indiqué de caractères extraits d'une chaîne de caractères.

Syntaxe

Mid(string, start[, length])

ligne = chaine à traiter
début = position du caractere "_" +1 (pour en pas le prendre)
longueur = position du caractère "]" - position du caractere "_" +1 --> longeur de la valeur entre _ et ]

j'espère être clair

 

[XL_Luc]

Re : !!!!!!!!!!!!????

Je me suis fait griller par Wilfried 😀

 

[Fatifleur]

Re : !!!!!!!!!!!!????

Mecri les gas c genti de votre pard
🙂

 

[Fatifleur]

Re : !!!!!!!!!!!!????

j'esper que vous puvier m'aider sur mon probleme

je doit éfectuer une recherche dans un document text sur une chaine de caractére que je saisie dans la cellule B2 de mon claseur excel.
la macro doit faire ces tache :
aprés ouverture de fichier en lecture seul (que j'ai déjat fait)
il doit balayé toute les lignes et chercher la chaine de caractére inscri dans la cellule B2 et le rest de la chaine de caractére si elle est ataché a un nombre ou autre lettre
exemple
si dans la cellule B2 j'ai saisie la chaine de caractere suivant : ENFR

la macro doit chercher dans mon Text et dé quel trouve cette chaine de caractere elle términe la lectuer et dé quel rencontre le premiere espace elle s'arréte et recopie la chaine + la suit atacher

ENFR001