Logo GNT
Actualités Tests & Guides Bons Plans
Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11
Entraide Applications Microsoft Office Excel Ne traiter que les lignes filtrées visibles

Ne traiter que les lignes filtrées visibles

3 réponses
Avatar
René Delcourt
Bonjour,
Je croyais être sauvé avec ce code mais des lignes invisibles sont aussi
traitées!!!

For Each c In
ThisWorkbook.Sheets("TCD").Range("C6:c1000").SpecialCells(xlCellTypeVisible)

Y a t-il une erreur?
--
René Delcourt
Signaler un problème avec ce contenu

3 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
Daniel.C
Peux-tu mettre un classeur exemple sur www.cjoint.com ?
Daniel
"René Delcourt" a écrit dans le message de news:

Bonjour,
Je croyais être sauvé avec ce code mais des lignes invisibles sont aussi
traitées!!!

For Each c In
ThisWorkbook.Sheets("TCD").Range("C6:c1000").SpecialCells(xlCellTypeVisible)

Y a t-il une erreur?
--
René Delcourt


Avatar
JRM
Bonsoir René,
Pour traiter une plage filtrée utilise l'expression
.Range("_FilterDatabase")
Exemple pour copier une plage filtrée :
Set MaPlage = ThisWorkbook.Sheets("TCD").Range("_FilterDatabase")
MaPlage.Copy Worksheets(3)

Est-ce que ça fonctionne ?
Cordialement,
JRM
Bonjour,
Je croyais être sauvé avec ce code mais des lignes invisibles sont aussi
traitées!!!

For Each c In
ThisWorkbook.Sheets("TCD").Range("C6:c1000").SpecialCells(xlCellTypeVisible)

Y a t-il une erreur?


Avatar
Jac
Bonjour René,

avec ceci, ça devrait marcher au quart de tour. Pas besoin de boucle :

[C6].CurrentRegion.SpecialCells(xlCellTypeVisible).Select

On en reparle quand tu veux.

Jac

Bonjour,
Je croyais être sauvé avec ce code mais des lignes invisibles sont aussi
traitées!!!

For Each c In
ThisWorkbook.Sheets("TCD").Range("C6:c1000").SpecialCells(xlCellTypeVisible)

Y a t-il une erreur?