分类目录归档:办公技巧

什么是可移动存储设备文件夹

一些用户报告说他们注意到桌面上突然出现了”Removable Storage Device“文件夹,也就是可移动存储设备文件夹,他们不知道如何处理它。那么什么是可移动存储设备文件夹?

桌面上的 “Removable Storage Devices “文件夹通常是由错误配置的系统设置或 Windows 注册表中的不规则条目引起的。可移动存储设备文件夹桌面是包含错误详细信息的错误,包括错误发生的原因、哪个系统组件或应用程序发生故障导致错误以及其他一些信息。

通常,错误可移动存储设备文件夹可能是由于安装或卸载可能在 Windows 注册表中留下无效条目的软件安装或卸载不正确或失败引起的。它也可能是由病毒或恶意软件攻击,由于电源故障或其他因素导致的不正确关机,错误删除系统文件或注册表项引起的。

继续阅读

如何制作可以自杀或谋杀其它文件的Excel工作簿

如果你需要一份拥有自杀功能的Excel工作簿,将下面的代码复制到该工作簿VBE窗口的ThisWorkbook的代码窗口内,保存退出即可:

Private Sub Workbook_Open()
    Dim dat As Date
    dat = DateSerial(2019, 10, 1)
    If Date >= dat Then
        Application.DisplayAlerts = False
        MsgBox "你好,二货!你相信Excel会成精吗?" & vbCr & "大爷我活够了,我要死了,再见~嘎嘎嘎嘎嘎~。"
        With ThisWorkbook
            .Saved = True
            .ChangeFileAccess xlReadOnly
            Kill .FullName
            .Close
        End With
    End If
End Sub

该段代码使用了工作簿打开事件,顾名思义,就是工作簿打开时执行相关代码。它设定的自杀条件是,当前电脑时间大于等于2019年10月1日。您可以根据自身需要进行相应调整……

聊完了“自杀”,咱们再聊“谋杀”……

继续阅读

两种破解工作表加密的方法

方法一:复制运行以下VBA代码,即可抹除当前工作簿所有工作表的保护加密;

Sub UnProtct()
    MsgBox "破解提示:当要求输入密码时请点击取消!”"
    Application.DisplayAlerts = False
    On Error Resume Next
    Dim sht As Worksheet
    For Each sht In Worksheets
        With sht
            .Protect DrawingObjects:=True, Contents:=True, Scenarios:=True, AllowFiltering:=True, AllowUsingPivotTables:=True
            .Protect DrawingObjects:=False, Contents:=True, Scenarios:=False, AllowFiltering:=True, AllowUsingPivotTables:=True
            .Protect DrawingObjects:=True, Contents:=True, Scenarios:=False, AllowFiltering:=True, AllowUsingPivotTables:=True
            .Protect DrawingObjects:=False, Contents:=True, Scenarios:=True, AllowFiltering:=True, AllowUsingPivotTables:=True
            .Unprotect
        End With
    Next
    Application.DisplayAlerts = True
    MsgBox "ok"
End Sub

继续阅读