Macro help Closed

Question

Hello, 

i use a macro for filering my data into another 

and macro code is 


Sub Extract1()
'
' Extract1 Macro
' extract
'
' Keyboard Shortcut: Ctrl+Shift+R
'
    Rows("61:116").Select
    Selection.Delete Shift:=xlUp
    Range("A61").Select
    Sheets("Data").Range("A1:Q600").AdvancedFilter Action:=xlFilterCopy, _
        CriteriaRange:=Sheets("Data").Range("S1:S2"), CopyToRange:=Range("A61"), _
        Unique:=False
    Rows("59:114").Select
    Selection.EntireRow.Hidden = True
    Range("A4").Select
End Sub



but when workbook is shared it throws some sort of error
Run-time error '1004':

AdvancedFilter method of Range class failed

Ambucias · Answer

Greetings, 

Bare in mind that before any answer given on the forum, you should know that there are volunteers who give their time trying to solve user problems. 

Therefore, it is specifically requested from Kioskea forum users to show their respect. For this, the use of polite expressions is a minimum. 
https://ccm.net/apps-sites/internet-archeology/ccm/10131-terms-of-use-for-ccm-respect-for-others/#politesse 

To say please, thank you, appreciate, grateful, etc... is common courtesy when you want something, especially help! 

So re-write and repost your message respecting the politeness charter 

We trust that you understand. 

Moderator

Macro help

1 response

Similar discussions

Subscribe To Our Newsletter!