Что нового

Перенести скрипт из VBA в Autoit

Tiberium6

Новичок
Сообщения
51
Репутация
0
Здравствуйте, есть такой скрипт на VBA ищет пустое поле в столбце "A"
Код:
Sub test()
    Set RR = Range("A1")
    r = RR.EntireColumn.End(xlDown).Row + 1
    MsgBox "Имя пустой ячейки " & r
End Sub

как его написать в Autoit ?
сделал вот так, но не работает.
Код:
#include <Excel.au3>

Local $oExcel = _Excel_Open()
Local $sWorkbook = @ScriptDir & "\1.xls"
Local $oWorkbook = _Excel_BookOpen($oExcel, $sWorkbook)

Global Const  $xlDown = "1"

$r = $oExcel.Range("A1").EntireColumn.End($xlDown).Row + 1
MsgBox (0,"",$r)

_Excel_Close ($oExcel,true,true)
 
Автор
T

Tiberium6

Новичок
Сообщения
51
Репутация
0
Вопрос решил сам, должно быть так Global Const $xlDown = "4", тогда все работает
 

Garrett

Модератор
Локальный модератор
Сообщения
3,999
Репутация
967
Tiberium6

Предупреждение За нарушение общих правил (пункт В.2):
Старайтесь избегать “Over quoting” (преувеличенное цитирование) - цитируйте только необходимую часть сообщения, которая наилучшим образом подчеркнёт суть цитируемого.


С уважением, ваш Глобальный модератор.
 
Верх