1 Тема от CyberGudini

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

Тема: AHK: чтение и редактирование уже открытого документа Excel

Я нашел код, который может лишь открыть пока еще неоткрытый документ и позволяет читать и редактировать его:


Path := "D:\Тест\jou.xlsx"
ex := ComObjCreate("Excel.Application")
ex.Workbooks.Open(Path)
ex.visible := True

ex:= ComObjActive("Excel.Application")
MyVar := ex.Range("C4").Value
MsgBox, %MyVar%
ex.Range("C5").Value := "55555"
MyVar := ex.Range("C5").Value
MsgBox, %MyVar%

Однако, если я запускаю код при уже открытом документе, он открывает его копию в режиме [только для чтения]. И с каждым новым запуском он открывает копии и так до бесконечности.

А как сделать, чтобы он не открывал, а например читал и изменял уже открытый документ?
вместо 

ex.Workbooks.Open(Path)

сделать Что-то вроде: 

ex.Workbooks.Read(Path)

2 Ответ от teadrinker

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

Re: AHK: чтение и редактирование уже открытого документа Excel

Смотрите пример отсюда.

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

3 Ответ от inseption86

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

Re: AHK: чтение и редактирование уже открытого документа Excel

CyberGudini



book_name := "1.xlsx"

try
{   xl := ComObjActive("Excel.Application") 
	book := xl.Workbooks(book_name)

	MyVar := book.worksheets(1).Range("C4").Value
	MsgBox % MyVar
	book.worksheets(1).Range("C5").Value := "55555"
	MyVar := book.worksheets(1).Range("C5").Value
	MsgBox  % MyVar

	book.close(true)
	xl.quit
}
catch
	MsgBox, 262192, , % "Книга """ book_name """ не найдена!!"
ExitApp

4 Ответ от CyberGudini (изменено: CyberGudini, 2021-10-28 22:47:39)

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

Re: AHK: чтение и редактирование уже открытого документа Excel

inseption86 аа, тут я кое-как уже разобрался что да как. Благо случайно нашел на ютубе видео подходящее, хоть и на английском. Да и teadrinker показал другой вариант решения. Но все равно спасибо!