Sub Setup_ListObject() Do_stuff_with_ListObject (the_list) ' ** runtimeerror highlights "type mismatch"Private Sub Do_stuff_with_ListObject(ByRef a_list As ListObject
如何一次简单地将数组中的值写入整个ListObject列(仅限数据行,不包括标题)?我找到了一个解决方案,但我不认为它是漂亮的: ' needs: ActiveSheet with ListObject "Tabelle1",Sub WriteLoColumnTest() Set lo = ActiveSheet.L
我想从函数返回一个ListObject,但它似乎隐式地将其转换为字符串。我很困惑。有人能指出我做错了什么吗?Sub TestMyFunction() Set MyTable = RangeToTable MyTable.Unlist
Private Function RangeToTable() As ListObject