Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Surpression d'une série de ligne

Surpression d'une série de ligne

2 réponses
Avatar
Vilallongue
Je souhaite supprimer 50 ligne automatiquement =E0 partir=20
l'index de la premi=E8re ligne contenu dans la variable=20
ligne.

J'ai cr=E9=E9 la procedure suivante mais VBA la refuse:
Worksheets("DATA").Rows(ligne, ligne + 50).Select
Selection.delete Shift:=3DxlUp

Merci de votre aide
Signaler un problème avec ce contenu

2 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
Julien
For i = ligne To ligne + 50
Worksheets("DATA").Rows(ligne).Delete
Next i



"Vilallongue" a écrit dans le message de
news:18e3e01c41bca$4861a8c0$
Je souhaite supprimer 50 ligne automatiquement à partir
l'index de la première ligne contenu dans la variable
ligne.

J'ai créé la procedure suivante mais VBA la refuse:
Worksheets("DATA").Rows(ligne, ligne + 50).Select
Selection.delete Shift:=xlUp

Merci de votre aide
Avatar
Pascal Engelmajer
salut,
Worksheets("DATA").range(Worksheets("DATA").Rows(ligne),
Worksheets("DATA").Rows(ligne + 50)).delete shift:=xlUp
'Worksheets("DATA") au cas ou il y a un doute sur la feuille active sinon
Worksheets("DATA").select
range(Rows(ligne), Rows(ligne + 50)).delete shift:=xlUp
--
Amicalement.
Pascal
"il n'y a pas de vent favorable pour celui qui ne sait pas ou il va."
Sénèque.
http://www.ilyapa.net/excel
"Vilallongue" a écrit dans le message de news:
18e3e01c41bca$4861a8c0$
Je souhaite supprimer 50 ligne automatiquement à partir
l'index de la première ligne contenu dans la variable
ligne.

J'ai créé la procedure suivante mais VBA la refuse:
Worksheets("DATA").Rows(ligne, ligne + 50).Select
Selection.delete Shift:=xlUp

Merci de votre aide