Добавление в архив VBA - Microsoft Office Excel

wonderxand · 11.06.2016, 22:54

Добрый вечер!
Помогите пожалуйста, как в Excel VBA, те, кого удалили с 1 листа за две двойки по экзаменам, добавлялись в архив 3 листа?
Всю голову уже сломал(
Пожалуйста помогите!!!
Файл прилагаю*

Aleksandr H. · 12.06.2016, 13:25

1. в проверку k2 >= 2 вставь

Код:

Range("A" & i - 1 & ":G" & i - 1).Copy
            Sheets("Лист3").Cells(Sheets("Лист3").Range("A65000").End(xlUp).Row + 1, 1).PasteSpecial

2. не обнуляешь k2 после проверки каждого студента
3. полезная статья

wonderxand · 12.06.2016, 14:25

Спасибо огромное! Теперь справился!

11.06.2016, 22:54	#1
wonderxand Регистрация: 08.06.2016 Сообщений: 4	Добавление в архив VBA Добрый вечер! Помогите пожалуйста, как в Excel VBA, те, кого удалили с 1 листа за две двойки по экзаменам, добавлялись в архив 3 листа? Всю голову уже сломал( Пожалуйста помогите!!! Файл прилагаю* Последний раз редактировалось wonderxand; 12.06.2016 в 14:47.

12.06.2016, 13:25	#2
Aleksandr H. 2 the Nation Glory Старожил Регистрация: 27.05.2014 Сообщений: 3,289	1. в проверку k2 >= 2 вставь Код: `Range("A" & i - 1 & ":G" & i - 1).Copy Sheets("Лист3").Cells(Sheets("Лист3").Range("A65000").End(xlUp).Row + 1, 1).PasteSpecial` 2. не обнуляешь k2 после проверки каждого студента 3. полезная статья Кто умер, но не забыт, тот бессмертен. Лао-Цзы.

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
архив	komra2	C# (си шарп)	10	13.01.2016 11:12
VBA Добавление слова и форматирование ячейки.	Sadir	Microsoft Office Excel	2	18.06.2012 14:34
Добавление столбца(не VBA)	Серёга0629	Microsoft Office Excel	13	11.08.2011 16:19
Архив	xakkkkker	Общие вопросы Delphi	1	09.03.2010 21:10
Архив	PAVEL315	Общие вопросы Delphi	8	20.04.2008 19:14

12.06.2016, 14:25	#3
wonderxand Регистрация: 08.06.2016 Сообщений: 4	Спасибо огромное! Теперь справился!