将命令应用到工作表中的每个表格。
代码示例:
Sub ApplyToEveryTable() Dim tbl As ListObject For Each tbl In ActiveSheet.ListObjects '在这里添加代码,需要对每个表格执行的操作 Next tbl End Sub
在代码示例中,使用了For Each循环来遍历工作表中的每个表格。将需要应用到每个表格的操作添加到循环中即可。
上一篇:Applycolortotextwithmaterialcolor
下一篇:applyCondition中的正则表达式匹配失败