Précédent   Forum des professionnels en informatique > Logiciels > Microsoft Office > Excel > Macros et VBA Excel
Macros et VBA Excel Vos questions relatives aux macros Excel, à l'utilisation de VBA et à l'automatisation de vos classeurs Excel.
Partagez cette discussion sur d'autres réseaux sociaux : Viadeo Twitter Google Facebook Digg Delicious MySpace Yahoo
Réponse Proposer ce sujet en actualité
 
Outils de la discussion
Publicité
'
Vieux 24/01/2012, 21h28   #1
Invité de passage
 
Anne
Inscription : décembre 2011
Messages : 8
Détails du profil
Informations personnelles :
Nom : Anne

Informations forums :
Inscription : décembre 2011
Messages : 8
Points : 2
Points : 2
Par défaut Supprimer les retours automatiques à la ligne

Bonjour,
Je lis le contenu d'une cellule d'une feuille xls en utilisant
Code :
content = Cells(i,j).Value
La cellule lue est formatée avec un retour à la ligne automatique
Dans ma macro vba je veux comparer "content" à une chaîne de caractères prédéfinie. J'ai essayé sans succès de supprimer le retour à la ligne/retour chariot en écrivant
Code :
1
2
3
4
 content= Replace(content, vbCr, "")
 content= Replace(content, vbCrLf, "")
 content= Replace(content, Chr(10), "")
 content= Replace(content, Chr(13), "")
Aucune ne fonctionne, et je ne trouve pas d'autre piste sur le web.
Vous avez une idée?
secotine est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/01/2012, 21h58   #2
Expert Confirmé Sénior
 
Avatar de jfontaine
 
Homme Jérôme FONTAINE
Contrôleur de Gestion
Inscription : juin 2006
Messages : 3 920
Détails du profil
Informations personnelles :
Nom : Homme Jérôme FONTAINE
Âge : 38
Localisation : France, Sarthe (Pays de la Loire)

Informations professionnelles :
Activité : Contrôleur de Gestion

Informations forums :
Inscription : juin 2006
Messages : 3 920
Points : 7 237
Points : 7 237
Bonjour,

Le retour à la ligne automatique n'est pas un caractère ou un code ASCII mais une propriété de la cellule.

Code :
 Cells(i,j).WrapText= False
__________________
Jérôme

Citation:
"Ils ne savaient pas que c'était impossible, alors ils l'ont fait" - Marc Twain
Si la réponse répond à votre besoin, votre vote nous encouragera.
Dans le cas ou la réponse mérite, à vos yeux, un , nous faire partager la raison de ce vote, pourrait nous permettre de nous améliorer.
jfontaine est actuellement connecté   Envoyer un message privé Réponse avec citation 30
Vieux 24/01/2012, 22h13   #3
Invité de passage
 
Anne
Inscription : décembre 2011
Messages : 8
Détails du profil
Informations personnelles :
Nom : Anne

Informations forums :
Inscription : décembre 2011
Messages : 8
Points : 2
Points : 2
Merci pour votre réactivité
Cependant, je ne peux pas changer le contenu des cellules. Il faudrait que je puisse travailler sur la chaîne de caractère que je récupère.
secotine est déconnecté   Envoyer un message privé Réponse avec citation 00
Vieux 24/01/2012, 22h20   #4
Invité de passage
 
Anne
Inscription : décembre 2011
Messages : 8
Détails du profil
Informations personnelles :
Nom : Anne

Informations forums :
Inscription : décembre 2011
Messages : 8
Points : 2
Points : 2
En fait cette réponse me satisfait:
Il faut d'abord déactiver le autowrap, puis supprimer les lignes (Chr(10)) puis repasser à True l'option Cells(i,j).WrapText

Merci !
secotine est déconnecté   Envoyer un message privé Réponse avec citation 00
Réponse Proposer ce sujet en actualité Cette discussion est résolue.
Outils de la discussion



Fuseau horaire GMT +2. Il est actuellement 23h55.


 
 
 
 
Partenaires

Hébergement Web