Поиск  Пользователи  Правила 
Закрыть
Логин:
Пароль:
Забыли свой пароль?
Регистрация
Войти
 
Страницы: 1
RSS
Копирование умной таблицы с данными и формулами из закрытой книги
 
Добрый вечер, уважаемые форумчане! Всех с наступающими праздниками! Прошу в очередной раз Вашей помощи. Перерыл весь форум, нашел два варианта, но в каждом какой-нибудь минус. В приложенном примере два макроса. Первый (Sub Copy()), копирует все, что есть на листе, но меняет имя таблицы. Второй (Sub Copy1()), копирует таблицу, но не переносит формулы (в данном примере из первого столбца). Нужно перенести данные из умной таблицы в закрытой книге в умную таблицу рабочей книги. Вроде понятно описал.
 
Цитата
Alexey74 написал:
но меняет имя таблицы
Что мешает переименовать? Допишите
Код
ThisWorkbook.Sheets("Логистика").ListObjects(1).Name = "Логистика_tb"
 
Казанский,Большое спасибо. Еще раз с наступающими!
Страницы: 1
Читают тему (гостей: 1)
Наверх