行者

慢慢走,不要停
随笔 - 15, 文章 - 0, 评论 - 0, 阅读 - 3328
  博客园  :: 新随笔  :: 管理
< 2025年2月 >
26 27 28 29 30 31 1
2 3 4 5 6 7 8
9 10 11 12 13 14 15
16 17 18 19 20 21 22
23 24 25 26 27 28 1
2 3 4 5 6 7 8

12 2023 档案

摘要:下载Alist https://github.com/alist-org/alist/releases 运行Alist, cmd Alist serve 二、下载Alist helper https://github.com/Xmarmalade/alisthelper/releases 选择Ali 阅读全文

posted @ 2023-12-29 17:15 angury 阅读(555) 评论(0) 推荐(0) 编辑

摘要:Public TrackChanges As Boolean Sub ToggleCellHistory() TrackChanges = Not TrackChanges If TrackChanges Then MsgBox "单元格历史记录功能已开启。" Else MsgBox "单元格历史记 阅读全文

posted @ 2023-12-14 22:52 angury 阅读(159) 评论(0) 推荐(0) 编辑

摘要:Sub ToggleWorksheetProtection() Dim ws As Worksheet Set ws = ActiveSheet ' 检查工作表是否受到保护 If ws.ProtectContents = True Then ' 如果工作表已受保护,则解除保护 ' 这里需要提供之前设 阅读全文

posted @ 2023-12-14 22:51 angury 阅读(16) 评论(0) 推荐(0) 编辑

摘要:Sub ToggleDocumentProtection() Dim doc As Document Set doc = ActiveDocument ' 检查文档是否受到保护 If doc.ProtectionType = wdNoProtection Then ' 如果文档未受保护,则加上只读保 阅读全文

posted @ 2023-12-14 22:50 angury 阅读(28) 评论(0) 推荐(0) 编辑

点击右上角即可分享
微信分享提示