Как скопировать данные из определенных ячеек?
На самом деле я копирую столбец с других листов на лист1.мне удалось скопировать 1 лист.но я хочу начать копирование данных из ячейки, где копирование закончилось раньше.
Один
------------------
1 Больничное Учреждение
------------------
2 Общая Палата
------------------
3 Полуотдельной Палате
------------------
4 Полуотдельной Палате
------------------
5 Плата За Посещение Врача
---------------------
6 Плата За Посещение Врача
---------------------
7 Расходы Престарелых
---------------------
8 Зарядов Престарелых
----------------------
9 Требуется Депозит (Для Входа)
---------------------
10
--------------------
я скопировал данные в 9-ю строку,теперь я хочу начать копировать данные из 10-й строки с других листов с помощью vba
как я могу это сделать?
Что я уже пробовал:
я пробую этот код
Public Sub m() n = ThisWorkbook.Worksheets.Count For i = 2 To n ThisWorkbook.Worksheets(i).Select ThisWorkbook.Worksheets(i).Columns(2).Copy Destination:=ThisWorkbook.Worksheets("sheet1").Columns(1) lastRow = ThisWorkbook.Worksheets("sheet1").Cells(Rows.Count,"A").End(xlUp).Row Next End Sub