Supression ligne sur plusieurs feuille simultanément
Résolu/Fermé
camcam1404
Messages postés
64
Date d'inscription
mardi 13 décembre 2016
Statut
Membre
Dernière intervention
9 septembre 2019
-
Modifié par pijaku le 27/01/2017 à 10:51
camcam1404 Messages postés 64 Date d'inscription mardi 13 décembre 2016 Statut Membre Dernière intervention 9 septembre 2019 - 31 janv. 2017 à 14:03
camcam1404 Messages postés 64 Date d'inscription mardi 13 décembre 2016 Statut Membre Dernière intervention 9 septembre 2019 - 31 janv. 2017 à 14:03
A voir également:
- Supression ligne sur plusieurs feuille simultanément
- Comment ne pas apparaître en ligne sur whatsapp - Guide
- Aller à la ligne excel - Guide
- En ligne sur instagram alors que non - Forum Instagram
- En ligne sur messenger alors que non ✓ - Forum Facebook Messenger
- Apparaitre hors ligne instagram - Guide
2 réponses
f894009
Messages postés
16904
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
18 mars 2023
1 678
Modifié par f894009 le 27/01/2017 à 10:06
Modifié par f894009 le 27/01/2017 à 10:06
Bonjour,
Supression ligne sur plusieurs feuille simultanément
Non
Suppression lignes sur plusieurs feuilles, feuille apres feuille
Juste un point manquant devant
Supression ligne sur plusieurs feuille simultanément
Non
Suppression lignes sur plusieurs feuilles, feuille apres feuille
Juste un point manquant devant
Rows(i).Delete
Sub deletews_camcam1404()
Dim i As Integer
Dim Editeur As String
Dim Wsh As Worksheet
Editeur = InputBox("Enter the serie number that you want to delete?", "Welcome")
'la valeur saisie est transmise à la variable Editeur
For Each Wsh In Worksheets(Array(1, 2))
With Wsh
NL = .Range("D" & .Rows.Count).End(xlUp).Row
For i = NL To 2 Step -1
If .Range("D" & i).Value = Editeur Then
.Rows(i).Delete
End If
Next i
End With
Next Wsh
End Sub
camcam1404
Messages postés
64
Date d'inscription
mardi 13 décembre 2016
Statut
Membre
Dernière intervention
9 septembre 2019
31 janv. 2017 à 13:30
31 janv. 2017 à 13:30
Ca marche!
Merci!
Mais enfaite pourquoi un point est nécessaire ?
Merci!
Mais enfaite pourquoi un point est nécessaire ?
f894009
Messages postés
16904
Date d'inscription
dimanche 25 novembre 2007
Statut
Membre
Dernière intervention
18 mars 2023
1 678
31 janv. 2017 à 14:02
31 janv. 2017 à 14:02
Re,
Mais enfaite pourquoi un point est nécessaire ?
Tout simplement, vous faites un With Wsh donc tout objet range ou autre se referent a ce With doit avoir un point devant sinon c'est sur la feuille active que s'applique l'objet
Mais enfaite pourquoi un point est nécessaire ?
Tout simplement, vous faites un With Wsh donc tout objet range ou autre se referent a ce With doit avoir un point devant sinon c'est sur la feuille active que s'applique l'objet
camcam1404
Messages postés
64
Date d'inscription
mardi 13 décembre 2016
Statut
Membre
Dernière intervention
9 septembre 2019
31 janv. 2017 à 14:03
31 janv. 2017 à 14:03
Très bien ! Merci encore