#vba #excel
#vba #excel
Вопрос:
Я имею дело с изменяющимся файлом, и я хотел бы скопировать последние 10 строк определенного столбца, а затем вставить его в другой рабочий лист, исходный рабочий лист обновляется в течение дня.
Комментарии:
1. И вопрос в том ….?
2. Вложенные листы newst() («старые»). Выберите диапазон columna = «G2» (столбец). Активируйте ActiveCell.End(xlDown). Активируйте для выбора I = от 1 до 10. Смещение (-10 I, 0). Скопируйте листы («новые»). Диапазон («A2»).Смещение (I, 0).Вставляет специальные xlPasteValues
Ответ №1:
Const COLUMN_INDEX = 1 ' Desired column
Sub CopyValues()
Dim LastRow = [A65536].End(xlUp).Row ' Find the last row index
Dim I
For I = LastRow - 10 To LastRow
'Do something with Cells(I, COLUMN_INDEX).Value
Next I
End Sub