在 Workbook_SheetSelectionChange 里面加入以下代码
if Target.HasFormula then
Dim val as Variant
val = Target.DirectPrecedents.address
Range(val).copy
Else
Application.CutcopyMode = False
检查公式
猜你喜欢
转载自blog.csdn.net/qq_43392665/article/details/84851911
今日推荐
周排行