Серый форум — AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (Malcev) — Mon, 24 Dec 2018 10:45:36 +0000

svoboden, вы немного неправильно подписываетесь на события.

#Persistent
XL := ComObjActive("Excel.Application")
Sheet := XL.ActiveSheet
ComObjConnect(Sheet, Worksheet)

class Worksheet {
   Calculate(sheet) {
   If (Sheet.Cells.Range("J5").Value = "один")
     MsgBox Событие
   }
}

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (yl3d) — Sat, 22 Dec 2018 12:49:45 +0000

inseption86, а куда именно эту строчку добавлять в коде ?

Добавил строчку в код - вот так.
И скрипт вообще перестал реагировать на изменения в ячейке экселя.


#Persistent
global i := 0
XL := ComObjActive("Excel.Application")
Sheet := XL.Workbooks("1.xls").Worksheets("Лист1")
ComObjConnect(Sheet, Calculate)

   Calculate(cell) {
   	   XL := ComObjActive("Excel.Application")
     If (XL.Workbooks("1.xls").Worksheets("Лист1").Cells(1 ,1).Value = "один") and (i = 0)
   msgbox Событие
    i := 1
    If (XL.Workbooks("1.xls").Worksheets("Лист1").Cells(1 ,1).Value = "два")
      i := 0
   }

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (inseption86) — Sat, 22 Dec 2018 12:12:17 +0000

yl3d

xl.Workbooks("1.xlsx").Worksheets("Лист1").Cells(1 ,1).select

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (yl3d) — Sat, 22 Dec 2018 11:36:42 +0000

svoboden, вот этот вариант работает.

Подскажите такую вещь.

Как прописать полный путь ячейки (с учетом листа и книги) ?
Книга называется 1.xls, а лист - "Лист1"

(сейчас стоит Sheet := XL.ActiveSheet , то есть активный лист, а книга вообще не указана)
Просто нужно чтобы скрипт как-то находил нужную книгу и лист в ней.

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (svoboden) — Sat, 22 Dec 2018 06:54:29 +0000

#Persistent
global i := 0
XL := ComObjActive("Excel.Application")
Sheet := XL.ActiveSheet
ComObjConnect(Sheet, Calculate)

   Calculate(cell) {
   	   XL := ComObjActive("Excel.Application")
     If (XL.Range("J5").Value = "один") and (i = 0)
   msgbox Событие
    i := 1
    If (XL.Range("J5").Value = "два")
      i := 0
   }

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (yl3d) — Fri, 21 Dec 2018 08:55:09 +0000

svoboden, ну я скрипт из третьего сообщения кое-как запустил.

Этот скрипт - работает, но неправильно.
Сообщение - должно запускаться только при условии, что в ячейке было какое-то другое слово, а потом оно сменилось на слово "один".
Вот это и есть изменение значения в ячейке.

А у вас скрипт запускается даже тогда, когда в ячейке изначально было значение "один", а после пересчета листа - появляется то же самое значение "один". И скрипт опять срабатывает - выдавая сообщение. Хотя значение - не изменилось.

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (svoboden) — Thu, 20 Dec 2018 23:10:33 +0000

Ну, не знаю, вот, например:

#Persistent
XL := ComObjActive("Excel.Application")
Sheet := XL.ActiveSheet
ComObjConnect(Sheet, Worksheet_Events)

class Worksheet_Events {
   Change(cell, sheet) {
      If (cell.address = "$J$5") and (Sheet.Cells.Range("J5").Value = "один")
       msgbox событие
   }
}

И что, тс будет сам менять формулу на слово "один".
Я так понимаю, формула - это результат каких-то вычислений.

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (Malcev) — Thu, 20 Dec 2018 22:16:55 +0000

У меня эксел не стоит, но мне кажется это неправильным.
Ну и отлавливать, мне кажется, надо событие change.

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (svoboden) — Thu, 20 Dec 2018 22:02:03 +0000

У меня только так работает.

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (Malcev) — Thu, 20 Dec 2018 21:57:19 +0000

svoboden, а зачем вы при отлавливании события заново подключаетесь к экселю?

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (Malcev) — Thu, 20 Dec 2018 13:06:05 +0000

Это ошибка не ahk, не vba, а com.

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (yl3d) — Thu, 20 Dec 2018 13:04:06 +0000

Malcev я вроде бы спрашивал про autohotkey, а не про VBA

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (Malcev) — Thu, 20 Dec 2018 11:32:29 +0000

https://support.microsoft.com/en-us/hel … pplication

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (yl3d) — Thu, 20 Dec 2018 08:22:37 +0000

svoboden, подскажите - почему же появляется такое сообщение об ошибке при работе вашего скрипта ?
Выдает эту ошибку - на всех видах экселя.

Re: AHK: Как скриптом AHK отреагировать на изменение значения ячейки Excel

null@example.com (yl3d) — Thu, 20 Dec 2018 08:21:05 +0000

svoboden, при чем тут Calculate ?
Calculate - это событие для макросов экселя.
А я говорю при реакцию на ИЗМЕНЕНИЕ ячейки.
Calculate - реагирует не на изменение ячейки, а на ПЕРЕСЧЕТ листа.

Это значит - сообщение будет выдаваться постоянно при любом пересчете листа, а не в том случае, когда меняется значение ячейки.