Страницы: 1
RSS
Запись макрокодером фильтрации не работает
 
Добрый день, подскажите пожалуйста. В файле ставлю на запись макрос, устанавливаю фильтры, делаю нужные сортировки, останавливаю запись макроса. Но он записывается с ошибками синтаксиса и соответственно не запускается, вот такой получается код:
Код
Sub Макрос3()
'
' Макрос3 Макрос
'

'
    Rows("1:1").Select
    .
    Name.DisplayRightToLeft("ВИЗУАЛЬНЫЙ ПРИМЕР")....DupeUnique
    Name.DisplayRightToLeft("ВИЗУАЛЬНЫЙ ПРИМЕР")....ActiveSheet  := Range("Q1"), _
        Type := xlSortOnValues, SortOn := xlAscending,  := xlSortNormal
    With Name.DisplayRightToLeft("ВИЗУАЛЬНЫЙ ПРИМЕР")..
        . = xlYes
        . = FALSE
        . = xlTopToBottom
        . = xlPinYin
        .
    End With
End Sub

Это происходит только на одном компьютере, на остальных все работает. Подскажите пожалуйста, с чем это может быть связано?
Страницы: 1
Наверх