question sur cellule, hauteur énorme !!!

[Sylvie64]

Bonjour,

J'ai un fichier (se n'est pas moi qui les fait) avec des points d'interrogation (voir en PJ) quand je clique dans la cellule et bien elle prends une hauteur pas possible !!!

J'ai fais rechercher/remplacer mais pas moyen de les sélectionner !!! j'ai l'impression que les ? sont fantômes !!!🙁

Pouvez vous me dire comment les supprimer ?

Merci

Sylvie

 

[Tibo]

Re : question sur cellule, hauteur énorme !!!

Bonjour,

Ton problème est lié à la présence d'un caractère de retour à la ligne (caractère non visible).

Sélectionne les cellules concernées, puis Edition - Remplacer - Rechercher : taper Alt 010 - Remplacer par : rien - et enfin, Remplacer tout

Tout devrait rentrer dans l'ordre

Je te laisse essayer

@+

 

[Sylvie64]

Re : question sur cellule, hauteur énorme !!!

Bonjour Tibo,

J'ai fais comme tu as dit mais rien ne se passe !!!
Merci

 

[jeanpierre]

Re : question sur cellule, hauteur énorme !!!

Bonjour Sylvie64, Tibo,

Un simple copier du format, avec le pinceau et sur une cellule normale suffit à résoudre ton problème, du moins sur le fichier que tu as joint.

Ex. Copie de F8 (avec le pinceau et appliqué à F9, F10 et .....

Bonne journée.

Jean-Pierre

 

[Sylvie64]

Re : question sur cellule, hauteur énorme !!!

Bonjour Jean Pierre,

Merci pour la réponse mais le souci est qu'il y a toujours les petits carré avec les points d'interrogation !!
Que je n'arrive pas à enlever avec Alt 010

 

[JNP]

Re : question sur cellule, hauteur énorme !!!

Bonjour le fil 🙂,
Sylvie, as-tu bien maintenu le Alt pendant que tu frappais 010 🙄?
A + 😎

 

[JNP]

Re : question sur cellule, hauteur énorme !!!

Re 🙂,
Sinon, maintenant que tu es une spécialiste en VBA 😛

Sub Nettoyage()
Dim Cellule As Range
For Each Cellule In Selection
Recommence:
Cellule = Replace(Replace(Cellule, " " & Chr(10), " "), Chr(10), " ")
If Cellule.Value Like "*" & Chr(10) & "*" Then GoTo Recommence
Next
End Sub

Tu sélectionnes ce que tu veux et tu lances la macro (l'avantage est qu'elle tient compte de si tu as espace + retour ou retour seul).
Bon courage 😎

 

[Tibo]

Re : question sur cellule, hauteur énorme !!!

re,

Il semble y avoir également du caractère 13 que je ne parviens pas à supprimer via le menu Remplacer

Une formule :

=SUBSTITUE(SUBSTITUE(F5;CAR(13);"");CAR(10);"")

semble fonctionner

Pas compris pourquoi ça ne fonctionne pas via le menu Insertion - Remplacer

@+

 

[JNP]

Re : question sur cellule, hauteur énorme !!!

Re 🙂,

Il semble y avoir également du caractère 13 que je ne parviens pas à supprimer via le menu Remplacer

Bizarre, la macro fonctionne sans Chr(13) et nettoye tout. Mais il est vrai aussi que j'ai du rajouter une boucle, car au premier passage, elle m'en laissait...
A + 😎

 

[jeanpierre]

Re : question sur cellule, hauteur énorme !!!

Re, Bonjour Jean-Noël,

Chez-moi, Excel 2000, le Chr(10), de la macro, ne fonctionne pas, j'ai dû le remplacer par Chr(13) et là c'est bon.

Bonne journée.

Jean-Pierre

 

[Sylvie64]

Re : question sur cellule, hauteur énorme !!!

Excellent !!! merci à tous
Bonne journée
Sylvie