excel 如何替换单元格引用工作簿名称，比如sheet1中有单元格=sheet2!B2，如何用VB全部替换为=sheet3!B2。

Sub mysub() For Each cell In UsedRange cell.Formula = Replace(cell.Formula, "Sheet2", "Sheet3") NextEnd Sub