1 Тема от inseption86

  • inseption86
  • Участник
  • Неактивен

Тема: 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 Ответ от Malcev

  • Malcev
  • Разработчик
  • Неактивен

Re: AHK: Excel com. FormatConditions

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

double.FormatConditions(1).DupeUnique := xlDuplicate

3 Ответ от inseption86 (изменено: ypppu, 2018-05-30 18:20:03)

  • inseption86
  • Участник
  • Неактивен

Re: AHK: Excel com. FormatConditions

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

4 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: AHK: Excel com. FormatConditions

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

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

5 Ответ от inseption86 (изменено: ypppu, 2018-05-30 18:19:53)

  • inseption86
  • Участник
  • Неактивен

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 Ответ от teadrinker

  • teadrinker
  • Администратор
  • Неактивен

Re: AHK: Excel com. FormatConditions

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

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

7 Ответ от ypppu

  • ypppu
  • Разработчик
  • Неактивен

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.

Правила  Поиск  Русский язык  Слова-паразиты
AHK: [ENG] [RUS]

8 Ответ от inseption86 (изменено: inseption86, 2022-08-24 04:58:19)

  • inseption86
  • Участник
  • Неактивен

Re: AHK: Excel com. FormatConditions

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

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