Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Макрос копирующий ячейки с одного листа в первую пустую строку другого листа
 
Добрый день!
помогите пожалуйста доработать макрос. собственно задача указана в теме.
записала через макрорекордер (получившийся код см ниже): ячейки из определенного диапазона листа1 по нажатию кнопки копируются на лист2, но надо доделать так, чтобы ячейки копировались не в одну и ту же строку (перезаписывая предыдущую запись), а в следующую пустую строку.
во вложении мой файл (код в модуле2). Самостоятельно разобраться не получилось, очень надеюсь на помощь.

надеюсь, все правильно описала.
Код
Sub copy_to_reestr()
    Range("F6:I6").Select
    Selection.Copy
    Sheets("Sheet3").Select
    Range("B3").Select
    Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
        :=False, Transpose:=False
    Sheets("Sheet1").Select
End Sub
 
Код
Sub copy_to_reestr()
    Range("F6:I6").Copy
    With Sheets("Sheet3")
        .Range("B" & .Cells(.Rows.Count, "B").End(xlUp).Row + 1).PasteSpecial Paste:=xlPasteValues
    End With
End Sub
Согласие есть продукт при полном непротивлении сторон.
 
Sanja,работает, спасибо большое!  :)  
Страницы: 1
Читают тему (гостей: 1)