Форум вопросов и ответов

Форум вопросов и ответов (https://www.otvetnemail.ru/)
-   Третий архив вопросов и ответов (https://www.otvetnemail.ru/tretij-arhiv-voprosov-i-otvetov-814/)
-   -   документация по AdvancedFilter и ошибка 448 (https://www.otvetnemail.ru/tretij-arhiv-voprosov-i-otvetov-814/dokumentaciya-po-advancedfilter-i-oshibka-448-a-307201/)

Guest 29.09.2011 23:47

документация по AdvancedFilter и ошибка 448
 
Есть простенький макрос для Excel. В оо на строке AdvancedFilter выходит ошибка 448: указанный аргумент не найден. Кто скажет, где собака зарылась?Плохо, нет документации по AdvancedFilter. Текст макроса привожу:Rem Attribute VBA_ModuleType=VBAModuleOption VBASupport 1Sub Поиск()Dim a Sheets("Лист2").Select Application.CutCopyMode = False Columns("A:D").AdvancedFilter Action:=xlFilterCopy, CriteriaRange:=Range( _ "E1:E2"), CopyToRange:=Columns("F:I"), Unique:=False Range("F2:I2").Select Selection.Copy Sheets("2008").Select For a = 3 To 65000 If Лист4.Cells(a, 2) = "" Then Range("A" & a).Select Exit For End If Next ActiveSheet.PasteEnd Sub


Часовой пояс GMT, время: 10:33.


© www.otvetnemail.ru - Форум вопросов и ответов.