Описание
Найдите следующую доступную пустую строку на рабочем листе. Этот макрос позволяет получить пробел в самом конце ваших данных (не между ними).
(function ()
{
// Getting the active sheet
var activeSheet = Api.ActiveSheet;
// Minimum row index
var indexRowMin = 0;
// Maximum row index
var indexRowMax = 1048576;
// Column 'A'
var indexCol = 0;
// Row index for empty cell search
var indexRow = indexRowMax;
for (; indexRow >= indexRowMin; --indexRow) {
// Getting the cell
var range = activeSheet.GetRangeByNumber(indexRow, indexCol);
// Checking the value
if (range.GetValue() && indexRow !== indexRowMax) {
range = activeSheet.GetRangeByNumber(indexRow + 1, indexCol);
range.Select();
break;
}
}
})();Используемые методы: GetActiveSheet, GetRangeByNumber, Select
Справочный код макроса Microsoft VBA
Этот макрос VBA использовался в качестве основы.
Sub example()
Range("A" & Rows.Count).End(xlUp).Offset(1).Select
End Sub