0
我试图运行下面的代码,但保持运行时错误,尽管代码与MSDN页面匹配。当我删除XlListObjectHasHeaders参数时,代码运行得很好。XlListObjectHasHeaders导致运行时错误'448':找不到名称参数excel VBA
Dim c1 As Range
Set c1 = ActiveSheet.QueryTables(1).ResultRange
ActiveSheet.ListObjects.Add(SourceType:=xlSrcRange, Source:=c1, TableStyleName:="TableStyleLight1", XlListObjectHasHeaders:=1).Name = "Test"