cfnr.net
当前位置:首页 >> 新手求教,ExCEl录制了一个筛选的宏,之后需要将sh... >>

新手求教,ExCEl录制了一个筛选的宏,之后需要将sh...

你只要对单元格重新读取,重新写入 一般都只有值了 比如A1 是公式 你只要 执行 range("a1")=range("a1") 或 cells(1,1)=cells(1,1) 都只剩下值 了把

Sub xxxx() '将本代码复制到工作表的VBE窗口,然后点击运行即可! Dim sh As Worksheet Dim istr As String istr = InputBox("请输入工作表保护密码:") For Each sh In Worksheets sh.Unprotect istr sh.Protect '重新保护工作表,但是密码设置...

sub test() set sh=worksheets.add(after:=worksheets(worksheets.count)) sh.name=format(date,"m-d") end sub 试下

理论上不难,但你的图片看不清,

网站首页 | 网站地图
All rights reserved Powered by www.cfnr.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com