Supprimer uniquement retours chariot de fin de chaîne

Résolu/Fermé

Guinpin54 Messages postés 15 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:

Supprimer uniquement retours chariot de fin de chaîne
Impossible de supprimer une page word - Guide
Supprimer compte instagram - Guide
Impossible de supprimer un fichier - Guide
Chaine tnt gratuite sur mobile - Guide
Plus de chaine tv - Guide

1 réponse

Réponse 1 / 1

Guinpin54 Messages postés 15 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é

Chris 94 Messages postés 50978 Date d'inscription mardi 8 janvier 2008 Statut Modérateur Dernière intervention 17 février 2023 7 341
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.

Guinpin54 Messages postés 15 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.

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

Merci :-))

Discussions similaires

EXCEL : Supprimer des lignes vides à la fin