Серый форум — AHK: редактирование файла excel не открывая его

Re: AHK: редактирование файла excel не открывая его

null@example.com (CyberGudini) — Thu, 28 Oct 2021 17:45:01 +0000

inseption86, teadrinker спасибо Вам! Работает как часы!

book := xl.workbooks.Open(path)

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

Re: AHK: редактирование файла excel не открывая его

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

teadrinker
Проще, спс.

Re: AHK: редактирование файла excel не открывая его

null@example.com (teadrinker) — Thu, 28 Oct 2021 17:03:56 +0000

inseption86 пишет:

path := % A_Desktop "\1.xlsx"

Зачем здесь знак процента?

inseption86 пишет:

book.save
book.close(false)

А не проще

book.close(true)

Re: AHK: редактирование файла excel не открывая его

null@example.com (inseption86) — Thu, 28 Oct 2021 16:28:15 +0000

CyberGudini


xl := ComObjCreate("Excel.Application")
path := A_Desktop "\1.xlsx"
book := xl.workbooks.Open(path)
book.worksheets(1).Range("A2").Value := "56"

book.close(true)
xl.quit
ExitApp

Re: AHK: редактирование файла excel не открывая его

null@example.com (teadrinker) — Thu, 28 Oct 2021 15:41:24 +0000

Наверно сохранить изменения надо и закрыть oWorkbook, иначе она у вас так открытой и останется.
Workbook.Close method

Re: AHK: редактирование файла excel не открывая его

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

teadrinker Извините. Исправил.
teadrinker Подскажите пожалуйста как решить проблему.

Re: AHK: редактирование файла excel не открывая его

null@example.com (teadrinker) — Thu, 28 Oct 2021 14:31:14 +0000

CyberGudini, напоминаю о необходимости ставить точки в конце предложений. Исправьтесь и не грешите больше.

AHK: редактирование файла excel не открывая его

null@example.com (CyberGudini) — Thu, 28 Oct 2021 14:06:41 +0000

Я могу прочитать закрытый документ:


FilePath := "D:\123.xlsx"	; specify your path here
oWorkbook := ComObjGet(FilePath)
CellF6Value := oWorkbook.Worksheets("Лист1").Range("A2").Value

MsgBox, % CellF6Value

Но вот когда пытаюсь его изменять ничего не происходит:


FilePath := "D:\123.xlsx"	; specify your path here
oWorkbook := ComObjGet(FilePath)
oWorkbook.Worksheets("Лист1").Range("A2").Value := "56"

Почему? И как исправить? Подскажите пожалуйста.