Как скопировать определенное количество строк?

[sepembra]

Здравствуйте. Есть формат txt, и exel. Вообще впринципе могу в любой формат конвертировать документ.
Смысл: в документе база емейлов 42000 одним столбцом.
Задача: скопировать определенное количество строк/столбцов, например с 1 по 1500, далее 1501 по 3000, и т.д. То есть партиями по 1500 штук. Как это сделать?




https://i.imgur.com/ByYNiqV.png


https://i.imgur.com/8lhmsc9.png

[a_axe]

sepembra, например - воспользоваться кодом VBA наподобие приведенного ниже.

Предполагается использование Excel, данные должны располагаться в столбец.
Код проверяет, сколько ячеек столбца выделено, если это число не равно 1500 - выделяет 1500 ячеек, считая от активной ячейки (ячейка белого цвета в выделенном диапазоне) вниз.
Если уже выделено 1500 ячеек - смещает выделение на 1500 ниже.
После чего копирует выделенные ячейки - вставлять данные нужно самому, так как нет понимания, что вы делаете с данными дальше.

Public Sub rows_copy()
If Selection.Rows.Count <> 1500 Then
ActiveCell.Resize(1500, 1).Select
Else
Selection.Offset(1500, 0).Select
End If
Selection.Copy
End Sub
Полагаю, скрины с фактическими адресами реальных людей не должны выкладываться в неограниченный доступ исходя из законодательства о защите персональных данных. Лучше уберите.