Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Macro error when file is shared
I have a macro that works fine when the file is not shared, but when it is
shared I get "Run-time error '1004': AdvancedFilter method of Range class failed". Can you not run macros in a shared file ? My macro is show below: Sub processdrg() ' ' processdrg Macro ' Macro recorded 8/24/2005 by EDreshfield ' ' Keyboard Shortcut: Ctrl+d ' Range("drgcode").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range( _ "drg"), Unique:=True Application.Goto Reference:="drgextract" Range("drgextract").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToLeft)).Select Selection.Sort Key1:=Range("drgextract"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom End Sub Am I simply missing something obvious ? Thanks ! |
#2
|
|||
|
|||
About shared workbooks:
http://www.officearticles.com/excel/...soft_excel.htm ************ Anne Troy www.OfficeArticles.com "Eric @ SEASH, Evansville" wrote in message ... I have a macro that works fine when the file is not shared, but when it is shared I get "Run-time error '1004': AdvancedFilter method of Range class failed". Can you not run macros in a shared file ? My macro is show below: Sub processdrg() ' ' processdrg Macro ' Macro recorded 8/24/2005 by EDreshfield ' ' Keyboard Shortcut: Ctrl+d ' Range("drgcode").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range( _ "drg"), Unique:=True Application.Goto Reference:="drgextract" Range("drgextract").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToLeft)).Select Selection.Sort Key1:=Range("drgextract"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom End Sub Am I simply missing something obvious ? Thanks ! |
#3
|
|||
|
|||
You can run macros in a shared workbook, but you can't us an Advanced
Filter. For more information on shared workbooks, look in Excel's Help, under the topic 'Features that are unavailable in shared workbooks' Eric wrote: I have a macro that works fine when the file is not shared, but when it is shared I get "Run-time error '1004': AdvancedFilter method of Range class failed". Can you not run macros in a shared file ? My macro is show below: Sub processdrg() ' ' processdrg Macro ' Macro recorded 8/24/2005 by EDreshfield ' ' Keyboard Shortcut: Ctrl+d ' Range("drgcode").AdvancedFilter Action:=xlFilterCopy, CopyToRange:=Range( _ "drg"), Unique:=True Application.Goto Reference:="drgextract" Range("drgextract").Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlDown)).Select Range(Selection, Selection.End(xlToLeft)).Select Selection.Sort Key1:=Range("drgextract"), Order1:=xlAscending, Header:=xlGuess, _ OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom End Sub Am I simply missing something obvious ? Thanks ! -- Debra Dalgleish Excel FAQ, Tips & Book List http://www.contextures.com/tiptech.html |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
save original data after macro is run again | New Users to Excel | |||
Shared Excel file | Excel Discussion (Misc queries) | |||
shared file | Excel Worksheet Functions | |||
Weekly Transaction Processing | Excel Worksheet Functions | |||
creat a macro to look for a file | Excel Discussion (Misc queries) |