Lignes vides

Le
Pascal
Bonjour,
Je ne comprends pas pourquoi ce code:
Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub
Ne me supprime pas toutes les lignes vides.
Il le fait de manière aléatoire, mais il me reste beaucoup de lignes vides.
J'ai essayé beaucoup de codes et auciun ne fonctionne réellement quelqu'un
aurait-il la solution.

Merci
Pascal





Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000754-5, 08/07/2007
Analyse le : 09/07/2007 09:40:35
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
AV
Le #4902341
Je ne comprends pas pourquoi ce code:
Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub
Ne me supprime pas toutes les lignes vides.


C'est que tes lignes ne sont pas vraiment vides (?) car, en l'état, ce code doit
faire ce que demandé

AV

Pascal
Le #4902331
C'est bien cela mais j'ai beau regarder il n'y a rien dedans, donc je
reformule ma question. Vide c'est quoi pour XL??


"AV"
Je ne comprends pas pourquoi ce code:
Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub
Ne me supprime pas toutes les lignes vides.


C'est que tes lignes ne sont pas vraiment vides (?) car, en l'état, ce
code doit faire ce que demandé

AV



---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000754-5, 08/07/2007
Analyse le : 09/07/2007 10:07:16
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com








---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000754-5, 08/07/2007
Analyse le : 09/07/2007 10:08:03
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com


AV
Le #4902311
C'est bien cela mais j'ai beau regarder il n'y a rien dedans, donc je
reformule ma question. Vide c'est quoi pour XL??


Ben comme pour tout le monde : qui ne contient rien !
Mets un extrait sur http://www.cjoint.com qu'on y jette un oeil

AV

Pascal
Le #4902301
Ici
http://www.cijoint.fr/cij80047174918937.xls

"AV"
C'est bien cela mais j'ai beau regarder il n'y a rien dedans, donc je
reformule ma question. Vide c'est quoi pour XL??


Ben comme pour tout le monde : qui ne contient rien !
Mets un extrait sur http://www.cjoint.com qu'on y jette un oeil

AV



---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000754-5, 08/07/2007
Analyse le : 09/07/2007 10:32:12
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com








---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000754-5, 08/07/2007
Analyse le : 09/07/2007 10:36:04
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com


AV
Le #4902291
Excel a la facheuse habitude de garder des traces de précédentes valeurs qui ont
été effacées !
D'où le danger, maintes fois signalé ici, de l'utilisation des "UsedRange" et
autres "SpecialCells(xlCellTypeLastCell)"

Pour ton cas, une seule petite ligne supplémentaire devrait suffire :

[A:A] = [A:A].Value
Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

AV
Pascal
Le #4902261
Merci Alain cela fonctionne

"AV" %239v%
Excel a la facheuse habitude de garder des traces de précédentes valeurs
qui ont été effacées !
D'où le danger, maintes fois signalé ici, de l'utilisation des "UsedRange"
et autres "SpecialCells(xlCellTypeLastCell)"

Pour ton cas, une seule petite ligne supplémentaire devrait suffire :

[A:A] = [A:A].Value
Columns("A:A").SpecialCells(xlCellTypeBlanks).EntireRow.Delete

AV



---
Antivirus avast! : message Entrant sain.
Base de donnees virale (VPS) : 000754-5, 08/07/2007
Analyse le : 09/07/2007 11:06:21
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com








---
Antivirus avast! : message Sortant sain.
Base de donnees virale (VPS) : 000754-5, 08/07/2007
Analyse le : 09/07/2007 11:20:14
avast! - copyright (c) 1988-2007 ALWIL Software.
http://www.avast.com

Publicité
Poster une réponse
Anonyme