Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Macro ou fonction pour enlever les espaces libre.

Macro ou fonction pour enlever les espaces libre.

3 réponses
Avatar
Guylaine
Bonjour =E0 vous

Une autre question:
Voici un exemple de mon tableau.

A B C
2800 2801 2802
1
2 517302795
3 517302795
4 517303068
5 511000242 511000242 511000242 =09
=09
=09
J'aimerais enlever tout les espaces libre. Pour avoir un=20
rapport comme celui-ci.=20

A B C
2800 2801 2802
1 517302795 517302795 517303068 =20
2 511000242 511000242 511000242
3=20
4 =20
5 =09


Merci =E0 l'avance. =09
=09
=09
=09
=09
=09
=09
=09
=09
=09
=09
=09
=09
=09
=09
=09
=09
Signaler un problème avec ce contenu

3 réponses

Supprimer
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire

Veuillez sélectionner un problème

Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Avatar
Philippe.R
Bonsoir Guylaine,
Tu devrais essayer avec un filtre automatique, en affichant successivement les non vides de la 1ère
colonne puis de la deuxième..... et en copiant à chaque fois vers un autre emplacement.
Tu peux ensuite automatiser en t'aidant de l'enregistreur de macros.
--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"Guylaine" a écrit dans le message de
news:679501c377cb$972533d0$
Bonjour à vous

Une autre question:
Voici un exemple de mon tableau.

A B C
2800 2801 2802
1
2 517302795
3 517302795
4 517303068
5 511000242 511000242 511000242


J'aimerais enlever tout les espaces libre. Pour avoir un
rapport comme celui-ci.

A B C
2800 2801 2802
1 517302795 517302795 517303068
2 511000242 511000242 511000242
3
4
5


Merci à l'avance.
Avatar
michdenis
Bonsoir Guylaine,

A ) Copie la procédure qui suit dans un module Standard.

B ) Sélectionne seulement la plage de cellules où tu voudrais voir disparaître des cellules vides !

C ) Exécute la macro.

'-------------------------
Sub EnleverEspace()

Selection.SpecialCells(xlCellTypeBlanks).Delete (xlUp)

End Sub
'-------------------------


Salutations!



"Guylaine" a écrit dans le message de news:679501c377cb$972533d0$
Bonjour à vous

Une autre question:
Voici un exemple de mon tableau.

A B C
2800 2801 2802
1
2 517302795
3 517302795
4 517303068
5 511000242 511000242 511000242


J'aimerais enlever tout les espaces libre. Pour avoir un
rapport comme celui-ci.

A B C
2800 2801 2802
1 517302795 517302795 517303068
2 511000242 511000242 511000242
3
4
5


Merci à l'avance.
Avatar
Guylaine
Merci beaucoup, s'est très rapide.

Bonne soirée !

-----Message d'origine-----
Bonsoir Guylaine,

A ) Copie la procédure qui suit dans un module Standard.

B ) Sélectionne seulement la plage de cellules où tu
voudrais voir disparaître des cellules vides !


C ) Exécute la macro.

'-------------------------
Sub EnleverEspace()

Selection.SpecialCells(xlCellTypeBlanks).Delete (xlUp)

End Sub
'-------------------------


Salutations!



"Guylaine" a écrit dans le message
de news:679501c377cb$972533d0$

Bonjour à vous

Une autre question:
Voici un exemple de mon tableau.

A B C
2800 2801 2802
1
2 517302795
3 517302795
4 517303068
5 511000242 511000242 511000242


J'aimerais enlever tout les espaces libre. Pour avoir un
rapport comme celui-ci.

A B C
2800 2801 2802
1 517302795 517302795 517303068
2 511000242 511000242 511000242
3
4
5


Merci à l'avance.



















.