写个vba清除当前表格内容
Sub ClearTable() Dim tbl As ListObject Set tbl = ActiveSheet.ListObjects(1) '假设当前表格是第一个列表对象 tbl.DataBodyRange.ClearContents '清除表格内容 End Sub

原文地址: http://www.cveoy.top/t/topic/cc4R 著作权归作者所有。请勿转载和采集!
安全问答是一个知识全球问答,包含丰富的问答知识
Sub ClearTable() Dim tbl As ListObject Set tbl = ActiveSheet.ListObjects(1) '假设当前表格是第一个列表对象 tbl.DataBodyRange.ClearContents '清除表格内容 End Sub
原文地址: http://www.cveoy.top/t/topic/cc4R 著作权归作者所有。请勿转载和采集!