> Tous les forums > Forum Bureautique
 supprimer lignes videsSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
maryloo2005
  Posté le 03/09/2008 @ 09:42 
Aller en bas de la page 
Astucienne

Bonjour,

Excel 2003 : Est-il possible de supprimer les lignes vides (automatiquement) dans une base de données immense ?

Merci

Publicité
Bérylion
 Posté le 03/09/2008 à 10:52 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

salut
j'ai pas testé mais un simple truc du genre :
for each r in activesheet.usedrange.rows
if application.worksheetfunction.counta(range(r.row & ":" & r.row)) = 0 then r.delete
next
devrait faire la maille
maryloo2005
 Posté le 03/09/2008 à 10:56 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucienne

Merci pour la réaction aussi rapide !

Par contre, je ne suis pas du tout pro dans les macros !!

Est-ce que je peux recopier tel quel ou faut-il adapter un nom à ma feuille ??? activesheet veut dire feuille active, je pense donc ça marche dans n'importe quelle feuille ?

N'existe-t-il pas de solution sans passer par une macro ?

Merci pour ton soutien en tous cas ! Mary

Bérylion
 Posté le 03/09/2008 à 12:17 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

re-
bon, j'ai testé c'est pas au point. à la place faut utiliser ceci :
Sub maryloo2005() Do
i = i + 1
If Application.WorksheetFunction.CountA(Range(i & ":" & i)) = 0 Then Rows(i).Delete: i = i - 1
Loop Until i = ActiveSheet.UsedRange.Rows.Count
End Sub
la macro est à coller dans un module standard si tu sais pas faire : - tu cliques sur outils/macro->nouvelle macro... : en nom de macro tu écris "maryloo2005" (par exemple) - tu cliques sur le bouton qui apparait alors : "arrêter l'enregistrement" - tu cliques sur outils/macro->macros... - tu sélectionnes "maryloo2005" et tu cliques sur modifier - tu supprimes tout ce qu'il y a entre "sub maryloo2005" et "end sub" et à la place tu colles le bout de code la haut - tu cliques sur la croix de fermeture de visual basic editor - tu sélectionnes ta feuille de calcul qui contient ta BDD (fais un essai sur une copie ) - tu cliques sur outils/macro->macros... - tu sélectionnes "maryloo2005" et tu cliques sur exécuter la solution sans macro c'est le filtre automatique (mais tu supprimes rien, tu masques les lignes vides) Bonne chance.

Modifié par Bérylion le 03/09/2008 12:18
maryloo2005
 Posté le 03/09/2008 à 13:56 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucienne

Merci Bérylion ! Ca a super bien marché. Problème résolu !

Et en + tu as répondu très rapidement. Bravo. Mary

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
57,10 €Boîtier PC Corsair Carbide Series 275R Airflow avec fenêtre à 57,10 €
Valable jusqu'au 26 Mai

Amazon propose actuellement le boîtier PC moyen tour avec fenêtre Corsair Carbide Series 275R à 54,59 €. On le trouve ailleurs à partir de 84 €. Le Corsair 275R Airflow est un boîtier ATX moyen-tour qui allie design moderne et flux d’air maximal grâce à un panneau avant lamellé et à une fenêtre en verre trempé. Trois ventilateurs de 120 mm inclus permettent un refroidissement efficace. Le boîtier peut accueillir jusqu’à six ventilateurs ou plusieurs radiateurs mesurant jusqu’à 360 mm. Installez jusqu’à deux disques durs 3,5” et quatre disques SSD 2,5” tandis que la disposition Direct Airflow Path garantit une circulation de l’air sans obstacle vers vos composants. Une fois l’assemblage terminé, le 275R Airflow vous permet de garder votre système propre et ordonné grâce à l’acheminement intuitif et simple des câbles et aux trois filtres à poussière amovibles.

La livraison est gratuite. 


> Voir l'offre
599 €Portable 17,3 pouces HP (FHD IPS, Ryzen 5 5500U, 16Go/512Go, Windows 11) à 599 €
Valable jusqu'au 26 Mai

Leclerc fait une belle promotion sur l'ordinateur portable HP Pavilion 17-cp0298nf qui passe à 599 € au lieu de 699 €. Une bonne affaire ! Ce portable possède un écran 17.3 pouces HD Full HD IPS (1920x1080), un processeur AMD Ryzen 5 5500U (6 coeurs), un SSD NVMe de 512 Go et un chip graphique Vega 7. Le tout tourne sous Windows 11.

De quoi faire de la bureautique, surfer sur Internet, du multimédia et des petits jeux en toute tranquillité.


> Voir l'offre
9,89 €Câble Ethernet RJ45 Ugreen Cat 7 10 Gbps 5 m à 9,89 €
Valable jusqu'au 28 Mai

Amazon fait une promotion sur le câble Ethernet RJ45 Ugreen Cat 7 10 Gbps 600 Mhz d'une longueur de 5 m à 9,89 € au lieu de 15 € grâce à un coupon à activer sur la page du produit.


> Voir l'offre

Sujets relatifs
Supprimer les lignes vides dans Excel
Excel supprimer lignes vides???
supprimer des lignes vides sous excel 2003
Supprimer lignes d'un Tableau à l'impression
supprimer les cellules vides
supprimer des lignes dans fichier excel 2003
Peut on supprimer les vides dans un fichier PDF ?
Compter les lignes non vides (Excel 2010)
Supprimer lignes en gras
masquer lignes vides
Plus de sujets relatifs à supprimer lignes vides
 > Tous les forums > Forum Bureautique