Невозможно развернуть таблицу, если новые значения копируются и вставляются из другой таблицы в vba - PullRequest
0 голосов
/ 25 февраля 2019

Я пытаюсь скопировать значения из одной таблицы (table1) и вставить ее в другую таблицу (table2) с помощью макроса vba.

Пример: данные «Sheet1» фильтруются по заголовку «type» с «пробелами»"и полученные значения копируются, за исключением заголовков, и вставляются под таблицей 2 (рядом с последней строкой) в листе 2

Проблема здесь в том, что макрос работает нормально, но таблица 2, в которую вставляются значения, не расширяется при вставке.

Я попытался включить "включить строки и столбцы в таблицу" в параметр автоматической проверки, но таблица не расширяется.

Я пробовал следующее:

range("Check_for_Alias[[#Headers],[Type]]").Select 
Selection.AutoFilter 
ActiveSheet.ListObjects("Check_for_Alias").range.AutoFilter Field:=18, _
Criteria1:="=" range("Check_for_Alias[Type]").Offset(1, 0).Select 
range(Selection, Selection.End(xlDown)).Select 
range("Check_for_Alias[[Team]:[Type]]").Select 
range("Check_for_Alias[Type]").Offset(1, 0).Activate
Selection.Copy Sheets("Share_point").Select 
ActiveSheet.range("C7").End(xlDown).Offset(1, 0).Select
ActiveSheet.paste
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...