#include <Array.au3>
#include <Excel.au3>
#include <MsgBoxConstants.au3>
$oExcel = _Excel_Open()
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Ошибка", "Ошибка создания объекта Excell" & @CRLF & "@error = " & @error & ", @extended = " & @extended)
$oWorkbook = _Excel_BookOpen($oExcel, @ScriptDir & "\123.xlsx") ; открытие файла 123.xlsx в котором есть слово test
If @error Then
MsgBox($MB_SYSTEMMODAL, "Ошибка", "Ошибка открытия файла '" & @ScriptDir & "\123.xlsx'." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
_Excel_Close($oExcel)
Exit
EndIf
$Result = _Excel_RangeFind($oWorkbook, "test") ; поиск слова test
If @error Then Exit MsgBox($MB_SYSTEMMODAL, "Excel UDF: _Excel_RangeFind Example 4", "Error searching the range." & @CRLF & "@error = " & @error & ", @extended = " & @extended)
MsgBox($MB_SYSTEMMODAL, "Результат", "Результат" & @CRLF & "Данные успешно найдены")
_ArrayDisplay($aResult, "Результат", "", 0, "|", "Sheet|Name|Cell|Value|Formula|Comment")