使用VBA清除excel表内所有公式

Sub RemoveFormulas()Dim ws As WorksheetDim cell As Range' 循环遍历所有工作表For Each ws In ThisWorkbook.Worksheets' 禁用屏幕刷新和事件处理Application.ScreenUpdating = FalseApplication.EnableEvents = False' 使用数值替换公式ws.UsedRange.Value = ws.UsedRange.Value' 恢复屏幕刷新和事件处理Application.ScreenUpdating = TrueApplication.EnableEvents = TrueNext ws
End Sub


本文来自互联网用户投稿,文章观点仅代表作者本人,不代表本站立场,不承担相关法律责任。如若转载,请注明出处。 如若内容造成侵权/违法违规/事实不符,请点击【内容举报】进行投诉反馈!

相关文章

立即
投稿

微信公众账号

微信扫一扫加关注

返回
顶部