Here we will look at three ways to gather data from an excel file. And best part is you dont even have to have excel open to grab data.
CODE:
f9::
FilePath = X:\Desktop\ppl.xlsx"
oWorkbook := ComObjCreate("Excel.Application")
oWorkbook.Workbooks.open(FilePath,, readonly := true)
oWorkbook.Visible := 0
clientsname := oWorkbook.Worksheets("test doc").Range("A3").Value
StringRight, clientsname, clientsname, 5
clientsphone := oWorkbook.Worksheets("test doc").Range("B3").Value
clientsstate := oWorkbook.Worksheets("test doc").Range("C3").Value
clientsfax := oWorkbook.Worksheets("test doc").Range("D3").Value
Xl.Quit()
finalinfo=
(
load completed
Clients name is %clientsname%
Clients phone is %clientsphone%
Clients state is %clientsstate%
Clients fax is %clientsfax%
)
msgbox, %finalinfo%
return
f10::
vararr=0
{
xcl := ComObjActive("Excel.Application")
reminderList := []
loop
{
bodyText := xcl.Range("A" . A_Index + 1).value
vararr++
varsavedname%vararr%=%bodyText%
if (bodyText = "")
break
}
Msgbox, Load completed row 4 info is %varsavedname3% ---- Final row is %vararr%
}
Return
f11::
{
vararr=0
xcl := ComObjActive("Excel.Application")
reminderList := []
loop
{
bodyText := xcl.Range("A" . A_Index + 1).value
vararr++
varsavedname%vararr%=%bodyText%
if (bodyText = "12345 Thom")
break
}
oWorkbook := ComObjCreate("Excel.Application")
oWorkbook.Workbooks.open(FilePath,, readonly := true)
oWorkbook.Visible := 0
Xl.Quit()
vararr++
Msgbox, Thom found at line %vararr%
}
Return
Смотрите видео AutoHotKey Excel - Grabbing data from excel with AHK онлайн, длительностью часов минут секунд в хорошем качестве, которое загружено на канал TAB Nation - Automation 08 Декабрь 2020. Делитесь ссылкой на видео в социальных сетях, чтобы ваши подписчики и друзья так же посмотрели это видео. Данный видеоклип посмотрели 12,437 раз и оно понравилось 203 посетителям.