Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
[ Закрыто ] Один нюанс в решение проблемы
 
Доброго времени суток, помогите с решением маленького вопроса, нужно протянуть данные в столбце (AG)  по длине соседнего столбца (AE)
Использую код:
Range("AG2").Select
Selection.Copy
ActiveCell.Offset(0, -2).Range("A1").Select
Selection.End(xlDown).Select
ActiveCell.Offset(0, 2).Range("A1").Select
Range(Selection, Selection.End(xlUp)).Select
ActiveSheet.Paste

Но есть одна проблема в таблице есть заголовок и он копирует столбец до самой шапки (до ячейки AG1 а должен до AG2) можно ли как нибудь из xlUp вычесть единицу чтобы он скопировал, все кроме заголовка таблицы.
То есть при запуске макроса он меняет в заголовке с "УТГ" на "Оса", а должно остаться "УТГ".
 
Нюанс в том, что с правилами форума не ознакомились
Страницы: 1
Читают тему (гостей: 1)
Наверх