Supprimer uniquement retours chariot de fin de chaîne

Résolu/Fermé
Guinpin54 Messages postés 13 Date d'inscription mercredi 16 septembre 2015 Statut Membre Dernière intervention 23 septembre 2016 - 21 oct. 2015 à 16:09
Chris 94 Messages postés 50978 Date d'inscription mardi 8 janvier 2008 Statut Modérateur Dernière intervention 17 février 2023 - 22 oct. 2015 à 14:44
Bonjour à toutes et à tous,

Je débute en VBA et je suis confronté à un petit problème. Je ne trouve pas la solution sur le forum, donc je me suis dis que j'allais poster une nouveau topic.
Donc j'ai ce fichier excel, qui manipule des strings, avec ou sans retours chariot dedans, mais toujours un retours en fin de chaîne de caractère (typiquement pourrais être "TOTO\n" comme "TATA\nTOTO\n"). Sauf que ce dernier retours est sacrèment laid...

J'ai beau tester mes cases une à une, afin de m'assure que mon Right(Range.value) = Chr(10), ce qui me revoit bien 1, mais je n'arrive pas à le supprimer... J'ai beau faire un Left(Range.value,Len(Range.value)-1), ce dernier est encore la.

J'avoue que j'aimerais bien en comprendre la cause :)
Merci d'avance!
A voir également:

1 réponse

Guinpin54 Messages postés 13 Date d'inscription mercredi 16 septembre 2015 Statut Membre Dernière intervention 23 septembre 2016
21 oct. 2015 à 16:13
Oubliez ce que j'ai dit, j'ai fait une grossière erreur dans mon code... je passe le sujet en résolu! Désolé
0
Chris 94 Messages postés 50978 Date d'inscription mardi 8 janvier 2008 Statut Modérateur Dernière intervention 17 février 2023 7 323
21 oct. 2015 à 16:15
Bonjour,

Pas de mal...

Peux-tu décrire l'erreur faite, STP ? Cela pourrait aider des passants qui la rencontrerait.
0
Guinpin54 Messages postés 13 Date d'inscription mercredi 16 septembre 2015 Statut Membre Dernière intervention 23 septembre 2016
22 oct. 2015 à 13:47
Bonjour Chris,

Une simple erreur de réécriture de variable... Donc un simple :

if Right(Range,1) = Chr(10) Then
Range = Left(Range,Len(Range)-Len(Chr(10)))
End If

fonctionne bien.
0
Chris 94 Messages postés 50978 Date d'inscription mardi 8 janvier 2008 Statut Modérateur Dernière intervention 17 février 2023 7 323 > Guinpin54 Messages postés 13 Date d'inscription mercredi 16 septembre 2015 Statut Membre Dernière intervention 23 septembre 2016
22 oct. 2015 à 14:44
Merci :-))
0