Следующий однострочный код отлично работает на компьютере с Win 7 - Excel 2016 (32 бита)
tPropSheet.Range("A2.B" & LastRowinSheet(tPropSheet) - 1).FillDown
Дополнительная информация: - Вызывает эту функцию:
Function LastRowinSheet(tSheet As Worksheet) As Long
LastRowinSheet = tSheet.Cells.Find("*", [A1], , , xlByRows, xlPrevious).Row
End Function
Однако то же самое строка tPropSheet.Range("A2.B" & LastRowinSheet(tPropSheet) - 1).FillDown завершается с ошибкой в Win 10 - Excel 365 (32 бита)
Я получаю
время выполнения 1004: сбой метода «Диапазон» объекта «_Worksheet» при использовании ячеек
Любая помощь будет оценена.