Separateur en trop

[sergio5862]

Bonjour au forum

Je concatenere une plage que j'enregistre en fichier texte ,ensuite j'ouvre ce fichier et je copie le resultat en B6.Le probleme est que je me retrouve avec le separateur a gauche en trop.Je suis obligé de recopier ce resultat en B85 a l'aide d'une formule.=REMPLACER(B6;1;1;GAUCHE(B6;0)).
Pouvez vous regarder a la macro et me donner une piste car je bloque.
Ensuite comme je voudrai recopier le resultat vers un fichier quand je recherche la fin de la derniere cellule a partir de B85:Y ? ,il me donne la derniere avec formule alors que je veux que celle ou il y a un resultat.


Merci


ci joint fichier

 

[Mytå]

Re : Separateur en trop

Salut le forum

Remplace la ligne concatener = concatener & "." & cellv par

If concatener = "" Then
concatener = cellv
Else
concatener = concatener & "." & cellv
End If

Mytå

P.S. Je n'ai pas ouvert ton fichier me suis servi du code que tu as effacé.

 

[sergio5862]

Re : Separateur en trop

Bonsoir Myta

Je teste
Merci

toujours le meme resultat avec le point en trop a gauche

Serge

Mea culpa

Merci Myta ,ta procedure fonctionne parfaitement,j'avais laissé Print #1, concatener en commentaire pour les tests.

 

[sergio5862]

Re : Separateur en trop

Bonsoir Myta

Je teste
Merci

toujours le meme resultat avec le point en trop a gauche

Serge

Mea culpa

Merci Myta ,ta procedure fonctionne parfaitement,j'avais laissé Print #1, concatener en commentaire pour les tests.

Je me suis casser la tête alors que le test était simple mais bon la nuit les neurones fonctionnent moins vite....
Merci Myta ,Grace a toi ,j'ai pu terminer la macro cette nuit avec la recupération des valeurs sans passer par des formules.Merci au Forum et vive L'entraide
Cordialement
Serge