Sub parcoursItemsVisibles()
For Each c In Range("A2",
[A65000].End(xlUp)).SpecialCells(xlCellTypeVisible)
MsgBox c.Value & " " & c.Address
Next c
End Sub
JB
On 23 fév, 19:14, "StargateFanFromWork" <NoS...@NoJunk.com> wrote:
> Is there something that works on visible, filtered cells like
> "ActiveCell.Offset(1, 0).Select" works on visible, unfiltered ones?
>
> What I mean is the have cursor movement happening to what is visible yet
> that works when the cells are not filtered?
>
> Here's hoping. I thought everything was working right and tight till I saw
> that these types of things aren't working on my filtered sheet? <g>
>
> Thanks.
|