High-Tech Santé Médecine Droit-Finances

Grippe A

Que dois-je faire ?

Rechercher : dans
Par :

Suppression d'une ligne sur deux/excel 2007

Dernière réponse le 17 jui 2009 à 22:40:21 7085pf, le 24 oct 2007 à 19:37:09 
 Signaler ce message aux modérateurs

Bonjour,
je souhaiterais savoir comment, sous excel 2007, faire pour supprimer une ligne sur deux (grosse quantité de données) sans utiliser de macros, car je n'y connais rien dans ce dommaine.
Je sais que c'est possible pour les versions antérieurs, mais je suis passé de la 1997 (c'était alors impossible, je pense) à 2007.
Merci pour votre aide.
7085pf

Configuration: Windows XP
Internet Explorer 7.0

Posez votre question Répondre

1

néné, le 24 oct 2007 à 20:12:24

Bonjour,
Sub supprimelignesur2()

Application.ScreenUpdating = False

For Each l In [a1:a500] 'ta plage
l.Select
ActiveCell.Offset(1, 0).Select
Selection.EntireRow.Delete
Next

Application.ScreenUpdating = True
Range("a1").Select
End Sub

ROBERT René
http://utilsfr.new.fr

   
Répondre à néné

2

7085pf, le 24 oct 2007 à 21:14:07

Bonjour,
désolé René, mais je ne vois pas comment cela m'aide.
Mais merci quand même.
7085pf.

   
Répondre à 7085pf

3

7085pf, le 24 oct 2007 à 22:20:55

Bonjour,
désolé, par manque de volonté, je n'ai pas cherché à comprendre.
Vous venez donc là de m'apporter la solution à mon problème, merci.
7085pf.

   
Répondre à 7085pf

4

néné, le 25 oct 2007 à 16:51:44

Bonjour

Tu es obliger de prendre une macro pour faire cela sinon il faut tout te taper à la main

enoie ton fichier ici , si tu veux

utilsfr@fr.fm

   
Répondre à néné

5

7085pf, le 25 oct 2007 à 16:55:00

Bonjour,
c'est bon, je vous remercie, j'ai trouvé chez microsoft une macro qui marche. C'st génial dans mon cas, quand je pense que je l'ai déja supprimé plus de 1 500 fois un eligne à la main...
Merci encore pour votre aide,
7085pf.

   
Répondre à 7085pf

6

littlefing, le 31 jui 2008 à 10:53:14

Bonjour,

j'essaye d'appliquer le code ci dessus.

En executant la macro il me supprime bien les doublons jusqu'à la 260 lignes..j'ai encore des doublons après.

Pourquoi ne va t'il pas plus loin?

auriez vous une idée?

   
Répondre à littlefing

7

Denis.L, le 31 jui 2008 à 11:28:39

Bonjour,

apparemment cela vient de la ligne:
"For Each l In [a1:a500] 'ta plage"
il faut mettre plus que 500

denis

   
Répondre à Denis.L

8

Denis.L, le 31 jui 2008 à 11:48:40
  • +3

Sans utiliser de macro j'aurai fait comme suit:

ajout de colonne a A
mettre 1 en A1
mettre 2 en A2
sélection de ces 2 cellules
poignée de recopie en appuyant sur Ctrl (pour forcer la recopie non incrémantée 1,2,1,2,,,,)
trier colonne A (croissant ou décroissant suivant si c'est les 1 ou les 2 à supprimer)
suppression des lignes (qui sont maintenant regroupées en tête)
suppression de la colonne A qui avait été rajoutée

peut être utilisé pour un nombre de lignes que l'on veut.
exemples:

1 ligne sur 4
4 lignes sur 10
etc..


Denis

   
Répondre à Denis.L

10

 top!!!, le 17 jui 2009 à 22:40:21

Merci denis, c'est très simple ete ça me sauve !

   
Répondre à top!!!

9

littlefing, le 31 jui 2008 à 15:46:28

Finalement j'ai utilisé la fonction filtre élaboré avec la fonction sans doublon.( je ne connaissais pas)

Mon but était de supprimer les doublons, cette fonction le fait très bien et sans macro.

Merci.

   
Répondre à littlefing
Posez votre question Répondre
Ils ont besoin de votre aide