Страницы: 1
RSS
Преобразовать таблицу в диапазон (VBA)
 
Доброго времени суток!
Есть строка кода:
Код
    .ListObjects.Add(xlSrcRange, .Range("A1:B" & LastCol - 1), , xlYes).TableStyle = "TableStyleLight19"

которая из диапазона .Range("A1:B" & LastCol - 1) делает таблицу и применяет к ней стиль.
Как программно преобразовать данный диапазон обратно в "диапазон" с сохранением стиля. Вручную получается, но макрорекордер ничего не записывает.
Спасибо!
Согласие есть продукт при полном непротивлении сторон
 
Кому интересно решилось так:
Код
With .ListObjects.Add(xlSrcRange, .Range("A1:B" & LastCol - 1), , xlYes)
    .TableStyle = "TableStyleLight19"
    .Unlist
End With

Спасибо
Согласие есть продукт при полном непротивлении сторон
Страницы: 1
Наверх