excel - 如果从 vba 中的另一个表复制和粘贴新值，则无法展开表

Question

我正在尝试从一个表（table1）复制值并使用 vba 宏将其粘贴到另一个表（table2）上。

例如：Sheet1“数据”由带有“空白”的标题“类型”过滤，结果值被复制除了标题并粘贴在 sheet2 中的 table2 下方（最后一行旁边）

这里的问题是宏工作正常，但是粘贴值的 table2 在粘贴时不会扩展。

我尝试在自动检查选项中启用“在表中包含行和列”仍然表没有扩展。

我尝试了以下方法：

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

标签： excelvba