Всем привет. Есть вопрос, как при нажатие кнопки, добавить в Excel умную таблицу? Я записал макрос, добавил в кнопку, а он ругается так: "Метод Select из класса Range завершен неверно" но всё равно добавляет таблицу... Ощибка в этой строчке Range("Таблица1[[#All],[Таблица1]]").Select
Код |
---|
Range("A1:A2").Select
ActiveSheet.ListObjects.Add(xlSrcRange, Range("$A$1:$A$2"), , xlYes).Name = _
"Òàáëèöà1"
Range("Òàáëèöà1[[#All],[Ñòîëáåö1]]").Select
ActiveSheet.ListObjects("Òàáëèöà1").TableStyle = "TableStyleLight2"
|