Je voudrais savoir comment on fait pour passer à la ligne suivante, quand on
as effectuer un filtre. Car si le filtre à fait sauté 2 ligne ou plus, mon
code va qu'à la ligne suivante même si elle est masqué. la ligne 9 contient
le filtre.
voici une partie du programme:
etc....
range("a9").select
selection.autofilter field:=6, criterial:="ch"
activecell.offset(1,0).select
etc......
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
Caetera
"sb" a écrit dans le message de news: 4b34f06d$0$922$
Je voudrais savoir comment on fait pour passer à la ligne suivante, quand on as effectuer un filtre. Car si le filtre à fait sauté 2 ligne ou plus, mon code va qu'à la ligne suivante même si elle est masqué. la ligne 9 contient le filtre.
******************* For Each c In Range("A2:A20").SpecialCells(xlCellTypeVisible) MsgBox c.Address Next c
Etc
"sb" <s.boinard@wanadoo.fr> a écrit dans le message de news:
4b34f06d$0$922$ba4acef3@news.orange.fr...
Je voudrais savoir comment on fait pour passer à la ligne suivante, quand on
as effectuer un filtre. Car si le filtre à fait sauté 2 ligne ou plus, mon
code va qu'à la ligne suivante même si elle est masqué. la ligne 9 contient
le filtre.
*******************
For Each c In Range("A2:A20").SpecialCells(xlCellTypeVisible)
MsgBox c.Address
Next c
"sb" a écrit dans le message de news: 4b34f06d$0$922$
Je voudrais savoir comment on fait pour passer à la ligne suivante, quand on as effectuer un filtre. Car si le filtre à fait sauté 2 ligne ou plus, mon code va qu'à la ligne suivante même si elle est masqué. la ligne 9 contient le filtre.
******************* For Each c In Range("A2:A20").SpecialCells(xlCellTypeVisible) MsgBox c.Address Next c