Hi,
Would anyone be able to tell me why the following is not working?
ActiveSheet.Range("$A$1:$L$408").AutoFilter Field:=1, Criteria1:="="
Range("A1:A2000").Select
Selection.SpecialCells(xlCellTypeVisible).Select
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
TIA
What is supposed to happen?
Please change the thread description.... think of it as what you would type in a search to find this problem as a future user with the same issue.
Additionally take a look at the forum rules, especially #3 about using code tags.
Please help by:
Marking threads as closed once your issue is resolved. How? The Thread Tools at the top
Any reputation (*) points appreciated. Not just by me, but by all those helping, so if you found someone's input useful, please take a second to click the * at the bottom left to let them know
There are 10 kinds of people in this world... those who understand binary, and those who don't.
There are currently 1 users browsing this thread. (0 members and 1 guests)
Posting Permissions
LinkBack URL
About LinkBacks
Register To Reply
,
Bookmarks