Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
Sub авава()
With ActiveSheet.ListObjects("Table1")
.Resize (.Range.Resize(11, 3))
End With
Для ресайза умной таблицы надо указать конкретный Range. Конкретный Range определяем от Range самой умной таблицы, ресайзнутый на заданное количество строк и столбцов.
Resize может только возвращать измененный размер указанной области(Range), если применено к Range. Но данное свойство никак не может быть самостоятельным - т.е. оно не изменяет исходные параметры начального Range. А вот для умной таблицы это уже метод и может быть самостоятельным, но параметры там не кол-во строк и столбцов, а конкретная ссылка на диапазон. Пытливый, уже дал ответ как сделать правильно.