Che_69 (Автор тем)

Открытие файла через блокнот, файл с расширением ".acsauto"

Пользователь

Сообщений: 10 Регистрация: 29.10.2013

14.02.2014 13:32:23

Доброго времени суток.

Подскажите, пожалуйста, код макроса для открытия файла через блокнот.
Файл с расширением ".acsauto" - это скрип одной из программ.
Если его просто открыть, то он начнет исполняться.
А мне необходимо внести в него изменения с помощью макроса.

Перейти

Определение диапазона по цвету видимых ячеек / VBA

Che_69

Пользователь

Сообщений: 10 Регистрация: 29.10.2013

16.01.2014 15:01:39

Доброго времени суток. Имеется огромная таблица с постоянно обновляющимися данными. Подскажите, пожалуйста, как выделить диапазон по определенному цвету видимых ячеек? Вообще необходимо, чтобы макрос устанавливал фильтр и после этого вставлял формулы в видимые ячейки оливкового цвета.

Код

Sub СверкаПродаж()
'
' СверкаПродаж Макрос
'
' Сочетание клавиш: Ctrl+l
'
    ActiveWindow.Panes(1).Activate
    ActiveSheet.UsedRange.AutoFilter Field:=21, Criteria1:="Пройден" ' Установка фильтра
    Range("AX3:BI3").Copy ' Копирование формул из фиксированного диапазона
    Range("AX4:BI113188").Select ' Диапазон для вставки формул, который должен определяться 
' по цвету ячеек
    Selection.SpecialCells(xlCellTypeVisible).Select ' Выделение видимых ячеек
    Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
        SkipBlanks:=False, Transpose:=False ' Вставка формул
End Sub

Перейти

Расширение возможностей функции ПОИСКПОЗ

Che_69

Пользователь

Сообщений: 10 Регистрация: 29.10.2013

29.10.2013 14:51:49

Проблема заключается в том, что функция ПОИСКПОЗ выдает результат по первому совпадению, а необходимо чтобы выдавал и по последующим тоже. Задача заполнить таблицу ТОП номерами телефонов. Необходим макрос, наподобие ВПР2, только для ПОИСКПОЗ. Помогите, пожалуйста))

Перейти