Серый форум — AHK: Поиск первой пустой ячейки

Re: AHK: Поиск первой пустой ячейки

null@example.com (inseption86) — Thu, 07 Jun 2018 16:25:13 +0000

teadrinker
Спасибо!

Re: AHK: Поиск первой пустой ячейки

null@example.com (teadrinker) — Thu, 07 Jun 2018 16:17:59 +0000

Так подставьте эту цифру в объект Cells:

XLSht := oExcel.ActiveSheet
oCells := XLSht.Cells

lastEmpty := oCells.(XLSht.Rows.Count, "A").End(xlUp := -4162).Row + 1
oCells.(lastEmpty, "A").Select

Re: AHK: Поиск первой пустой ячейки

null@example.com (inseption86) — Thu, 07 Jun 2018 16:06:26 +0000

teadrinker
Первая пустая ячейка!

Re: AHK: Поиск первой пустой ячейки

null@example.com (teadrinker) — Thu, 07 Jun 2018 16:04:14 +0000

Так у вас в переменной aa просто цифра, что должно выделяться?

Re: AHK: Поиск первой пустой ячейки

null@example.com (inseption86) — Thu, 07 Jun 2018 15:56:55 +0000

teadrinker Спасибо

Это работает:

aa := xl.ActiveSheet.Cells(xl.ActiveSheet.Rows.count, "A").end(xlup := -4162).row + 1
msgbox % aa

А почему то не выделяет:

aa := xl.ActiveSheet.Cells(xl.ActiveSheet.Rows.count, "A").end(xlup := -4162).row + 1
aa.select

Re: AHK: Поиск первой пустой ячейки

null@example.com (teadrinker) — Thu, 07 Jun 2018 15:21:15 +0000

Наверно, имеете в виду следующую после последней непустой? Если "узнать", это номер ряда, то так:

XLSht := oExcel.ActiveSheet
rng := XLSht.Cells(XLSht.Rows.count, "A")
MsgBox, % rng.end(xlup := -4162).row + 1

Re: AHK: Поиск первой пустой ячейки

null@example.com (inseption86) — Thu, 07 Jun 2018 14:43:37 +0000

Хочу узнать первую пустую ячейку в столбце https://ibb.co/nJaCv8 !

Re: AHK: Поиск первой пустой ячейки

null@example.com (teadrinker) — Thu, 07 Jun 2018 14:19:50 +0000

Непонятно, как связан Rows.Count и ваш вопрос. Как пустота ячейки зависит от количества рядов? Пустой может быть и самая первая ячейка. Уточните, что именно вы хотите узнать, а лучше покажите скриншот.

AHK: Поиск первой пустой ячейки

null@example.com (inseption86) — Thu, 07 Jun 2018 13:45:14 +0000

Добрый день! Никак не получается найти первую пустую ячейку столбца?

xl.ActiveSheet.UsedRange.Rows.Count +1

- это не подходит

xl.Cells(xl.Rows.Count, *).End(xlUp := -4162).Offset(*, *)

- это не подходит

end := xl.Cells(2, 6).End(xlDown := -4121).Select

. Как к этому значению добавить +1

Заранее спасибо!