Серый форум — AHK: чтение и редактирование уже открытого документа Excel

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

null@example.com (CyberGudini) — Thu, 28 Oct 2021 18:46:21 +0000

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

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

null@example.com (inseption86) — Thu, 28 Oct 2021 18:08:47 +0000

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

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

null@example.com (teadrinker) — Tue, 26 Oct 2021 21:18:31 +0000

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

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

null@example.com (CyberGudini) — Tue, 26 Oct 2021 21:11:54 +0000

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


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)