VBA：EXCEL跨工作簿遍历工作表的方法

For Each sh In Worksheets '数组 If Not sh.Name Like '*' & '表' & '*' Then '如果工作表名称不包含“表” sh.Select Call 设置A1格式 End If Next 如何修改使之能够在A工作簿中，遍历B工作簿中的工作表。如果有其他方法也非常感谢。