1

Тема: AHK: Excel com. FormatConditions

Добрый вечер! Что я делаю не так? Условное форматирование работает, но только отображаются уникальные, а не повторяющиеся значения.

double := Xl.Range("A:A")
double.FormatConditions.Delete
double.FormatConditions.AddUniqueValues
double.FormatConditions(1).DupeUnique = xlDuplicate
double.FormatConditions(1).Interior.Color := 9846525

2

Re: AHK: Excel com. FormatConditions

Присваивание выполняется через ":=".

double.FormatConditions(1).DupeUnique := xlDuplicate

3

Re: AHK: Excel com. FormatConditions

Malcev И так я тоже побывал, но error на этой строке "Несовпадение типов

4

Re: AHK: Excel com. FormatConditions

В вашем коде нигде нет присвоения значения переменной xlDuplicate, чему она равна?

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Skype dmitry_fiveg

5

Re: AHK: Excel com. FormatConditions

teadrinker Я так понял, что xlDuplicate это функция

Через макрос все работает

Sub sdsd()
Range("A:A").Select
 Selection.FormatConditions.AddUniqueValues
    Selection.FormatConditions(Selection.FormatConditions.Count).SetFirstPriority
    Selection.FormatConditions(1).DupeUnique = xlDuplicate
    With Selection.FormatConditions(1).Font
        .Color = -16383844
       End With

End Sub

6

Re: AHK: Excel com. FormatConditions

xlDuplicate — это константа, нужно найти и подставить её значение. В макросах скорее всего это происходит автоматически по названию, в AHK, естественно, нет.

Разработка AHK-скриптов:
e-mail dfiveg@mail.ru
Skype dmitry_fiveg

7

Re: AHK: Excel com. FormatConditions

inseption86, поставьте пропущенные заглавные буквы и точки в сообщениях:
http://forum.script-coding.com/viewtopi … 33#p120033;
http://forum.script-coding.com/viewtopi … 90#p124790;
http://forum.script-coding.com/viewtopi … 93#p124793;
http://forum.script-coding.com/viewtopi … 16#p125216;
http://forum.script-coding.com/viewtopi … 45#p125345;
http://forum.script-coding.com/viewtopi … 48#p125348;
http://forum.script-coding.com/viewtopi … 33#p120033.

8

Re: AHK: Excel com. FormatConditions

Всем спасибо за внимание

double.FormatConditions(1).DupeUnique := xlDuplicate:= 1