pip install openpyxl pandas

import openpyxlfrom openpyxl.workbook.protection import WorkbookProtectionfrom openpyxl.worksheet.protection import SheetProtectionclass ExcelProtectionManager:    """Excel权限管理器"""    def __init__(self):        self.workbook = None    def load_workbook(self, file_path):        """加载工作簿"""        try:            self.workbook = openpyxl.load_workbook(file_path)            print(f"成功加载工作簿: {file_path}")            return True        except Exception as e:            print(f"加载失败: {str(e)}")            return False    def protect_sheet(self, sheet_name, password, **options):        """保护单个工作表"""        try:            sheet = self.workbook[sheet_name]            # 设置保护参数            protection_options = {                'sheet': True,                'password': password,                'autoFilter': options.get('autoFilter', True),                'deleteColumns': options.get('deleteColumns', False),                'deleteRows': options.get('deleteRows', False),                'formatCells': options.get('formatCells', True),                'insertColumns': options.get('insertColumns', False),                'insertRows': options.get('insertRows', False),                'selectLockedCells': options.get('selectLockedCells', True),                'selectUnlockedCells': options.get('selectUnlockedCells', True)            }            # 应用保护设置            sheet.protection = SheetProtection(**protection_options)            print(f"工作表 '{sheet_name}' 保护设置完成")            return True        except KeyError:            print(f"工作表 '{sheet_name}' 不存在")            return False        except Exception as e:            print(f"保护设置失败: {str(e)}")            return False# 使用示例def basic_protection_demo():    """基础保护演示"""    manager = ExcelProtectionManager()    if manager.load_workbook('财务报告.xlsx'):        # 设置保护参数        options = {            'deleteRows': False,  # 禁止删除行            'formatCells': True,  # 允许格式化单元格            'insertRows': False   # 禁止插入行        }        manager.protect_sheet('Sheet1', 'SecurePass123', **options)        manager.workbook.save('保护后的财务报告.xlsx')if __name__ == "__main__":    basic_protection_demo()

class BatchProtectionManager(ExcelProtectionManager):    """批量权限管理器"""    def __init__(self):        super().__init__()        self.protection_log = []    def batch_protect_workbooks(self, folder_path, password, file_pattern="*.xlsx"):        """批量保护文件夹内所有工作簿"""        import os        import glob        try:            # 获取文件列表            pattern = os.path.join(folder_path, file_pattern)            files = glob.glob(pattern)            if not files:                print("未找到匹配的Excel文件")                return False            success_count = 0            for file_path in files:                try:                    if self.process_single_workbook(file_path, password):                        success_count += 1                        self.protection_log.append({                            'file': os.path.basename(file_path),                            'status': '保护成功',                            'timestamp': self.get_current_time()                        })                    else:                        self.protection_log.append({                            'file': os.path.basename(file_path),                            'status': '保护失败',                            'timestamp': self.get_current_time()                        })                except Exception as e:                    print(f"处理文件 {file_path} 时出错: {str(e)}")                    continue            print(f"批量保护完成: {success_count}/{len(files)} 个文件成功")            self.generate_protection_report()            return True        except Exception as e:            print(f"批量保护操作失败: {str(e)}")            return False    def process_single_workbook(self, file_path, password):        """处理单个工作簿"""        if not self.load_workbook(file_path):            return False        # 保护所有工作表        for sheet_name in self.workbook.sheetnames:            if not self.protect_sheet(sheet_name, password):                return False        # 保存文件        output_path = file_path.replace('.xlsx', '_protected.xlsx')        self.workbook.save(output_path)        return True    def smart_protection_with_ranges(self, sheet_name, password, editable_ranges):        """智能保护：设置可编辑区域"""        try:            sheet = self.workbook[sheet_name]            # 首先锁定所有单元格            for row in sheet.iter_rows():                for cell in row:                    cell.protection = openpyxl.styles.Protection(locked=True)            # 解锁可编辑区域            for range_str in editable_ranges:                cells = sheet[range_str]                if isinstance(cells, tuple):                    for cell in cells:                        cell.protection = openpyxl.styles.Protection(locked=False)                else:                    cells.protection = openpyxl.styles.Protection(locked=False)            # 应用工作表保护            return self.protect_sheet(sheet_name, password)        except Exception as e:            print(f"智能保护设置失败: {str(e)}")            return False# 使用示例def advanced_protection_demo():    """高级保护演示"""    manager = BatchProtectionManager()    # 批量保护文件夹内所有Excel文件    manager.batch_protect_workbooks(        folder_path='月度报告/',        password='MonthlySecure2024'    )    # 智能保护示例    manager.load_workbook('销售数据.xlsx')    editable_ranges = ['B2:D10', 'F2:F20']  # 可编辑区域    manager.smart_protection_with_ranges('Sheet1', 'SalesPass123', editable_ranges)    manager.workbook.save('智能保护的销售数据.xlsx')if __name__ == "__main__":    advanced_protection_demo()

class WorkbookLevelProtection(BatchProtectionManager):    """工作簿级保护管理器"""    def protect_workbook_structure(self, password):        """保护工作簿结构"""        try:            if not self.workbook:                raise ValueError("未加载工作簿")            # 设置工作簿保护            self.workbook.security = WorkbookProtection()            self.workbook.security.workbookPassword = password            self.workbook.security.lockStructure = True            print("工作簿结构保护已设置")            return True        except Exception as e:            print(f"工作簿结构保护失败: {str(e)}")            return False    def hide_sensitive_sheets(self, sheet_names, visibility='veryHidden'):        """隐藏敏感工作表"""        try:            for sheet_name in sheet_names:                if sheet_name in self.workbook.sheetnames:                    sheet = self.workbook[sheet_name]                    sheet.sheet_state = visibility                    print(f"工作表 '{sheet_name}' 已设置为{visibility}状态")            return True        except Exception as e:            print(f"工作表隐藏失败: {str(e)}")            return False    def set_custom_protection_options(self, sheet_name, password, **kwargs):        """设置自定义保护选项"""        try:            sheet = self.workbook[sheet_name]            # 丰富的保护选项配置            custom_options = {                'algorithmName': kwargs.get('algorithmName', 'SHA-512'),                'spinCount': kwargs.get('spinCount', 100000),                'saltValue': kwargs.get('saltValue', None),                'hashValue': kwargs.get('hashValue', None)            }            # 应用高级保护设置            sheet.protection.set_parameters(**custom_options)            sheet.protection.password = password            print("自定义保护选项设置完成")            return True        except Exception as e:            print(f"自定义保护设置失败: {str(e)}")            return False# 使用示例def workbook_protection_demo():    """工作簿保护演示"""    protector = WorkbookLevelProtection()    protector.load_workbook('敏感数据.xlsx')    # 保护工作簿结构    protector.protect_workbook_structure('StructurePass123')    # 隐藏敏感工作表    sensitive_sheets = ['原始数据', '计算过程', '测试数据']    protector.hide_sensitive_sheets(sensitive_sheets)    # 设置高级保护    advanced_options = {        'algorithmName': 'SHA-512',        'spinCount': 500000    }    protector.set_custom_protection_options('汇总表', 'AdvancedPass123', **advanced_options)    protector.workbook.save('高级保护的数据.xlsx')if __name__ == "__main__":    workbook_protection_demo()

Sub BasicSheetProtection()    ' 基础工作表保护    On Error GoTo ErrorHandler    Application.ScreenUpdating = False    Application.DisplayAlerts = False    Dim ws As Worksheet    Dim password As String    password = "BasicSecure123"  ' 设置密码    ' 保护所有工作表    For Each ws In ThisWorkbook.Worksheets        ws.Protect Password:=password, _                   AllowFormattingCells:=True, _                   AllowInsertingRows:=False, _                   AllowDeletingRows:=False, _                   AllowSorting:=True, _                   AllowFiltering:=True    Next ws    Application.ScreenUpdating = True    Application.DisplayAlerts = True    MsgBox "工作表保护完成!", vbInformation    Exit SubErrorHandler:    Application.ScreenUpdating = True    Application.DisplayAlerts = True    MsgBox "错误 " & Err.Number & ": " & Err.Description, vbCriticalEnd Sub

Class AdvancedProtectionManager    ' 高级权限管理器    Private protectionLog As Collection    Private passwordPolicy As Object    Public Sub Initialize()        Set protectionLog = New Collection        Set passwordPolicy = CreateObject("Scripting.Dictionary")        ' 初始化密码策略        passwordPolicy.Add "minLength", 8        passwordPolicy.Add "requireUpper", True        passwordPolicy.Add "requireLower", True        passwordPolicy.Add "requireNumbers", True    End Sub    Public Function BatchProtectWorkbooks(folderPath As String, masterPassword As String) As Boolean        ' 批量保护工作簿        On Error GoTo ErrorHandler        If Not ValidatePassword(masterPassword) Then            MsgBox "密码不符合安全策略", vbExclamation            BatchProtectWorkbooks = False            Exit Function        End If        Dim fileSystem As Object        Dim folder As Object        Dim file As Object        Set fileSystem = CreateObject("Scripting.FileSystemObject")        Set folder = fileSystem.GetFolder(folderPath)        Dim processedCount As Integer        processedCount = 0        For Each file In folder.Files            If LCase(fileSystem.GetExtensionName(file.Name)) = "xlsx" Then                If ProcessWorkbook(file.Path, masterPassword) Then                    processedCount = processedCount + 1                    LogProtectionAction file.Name, "保护成功"                Else                    LogProtectionAction file.Name, "保护失败"                End If            End If        Next file        MsgBox "批量保护完成! 已处理 " & processedCount & " 个文件", vbInformation        BatchProtectWorkbooks = True        Exit Function    ErrorHandler:        LogProtectionAction "SYSTEM", "错误: " & Err.Description        BatchProtectWorkbooks = False    End Function    Private Function ProcessWorkbook(filePath As String, password As String) As Boolean        ' 处理单个工作簿        On Error GoTo ErrorHandler        Dim wb As Workbook        Set wb = Workbooks.Open(filePath)        Dim ws As Worksheet        For Each ws In wb.Worksheets            ' 应用智能保护设置            ApplySmartProtection ws, password        Next ws        ' 保存并关闭        wb.Save        wb.Close        ProcessWorkbook = True        Exit Function    ErrorHandler:        If Not wb Is Nothing Then wb.Close False        ProcessWorkbook = False    End FunctionEnd Class

Sub ProtectWithWindowsIntegration()    ' 与Windows权限集成    On Error GoTo ErrorHandler    Dim userName As String    userName = Environ("USERNAME")    ' 获取用户域信息    Dim userDomain As String    userDomain = Environ("USERDOMAIN")    ' 基于用户角色设置不同权限    Select Case userName        Case "AdminUser", "DomainAdmin"            ApplyAdminProtectionSettings        Case "FinanceUser"            ApplyFinanceProtectionSettings        Case Else            ApplyStandardProtectionSettings    End Select    ' 创建审计日志    CreateAuditLog userName, userDomain    Exit SubErrorHandler:    MsgBox "权限集成失败: " & Err.Description, vbCriticalEnd SubSub ApplyAdminProtectionSettings()    ' 管理员保护设置    Dim ws As Worksheet    For Each ws In ThisWorkbook.Worksheets        ws.Protect Password:="AdminSecure123", _                   UserInterfaceOnly:=True, _                   AllowFormattingCells:=True, _                   AllowInsertingRows:=True    Next wsEnd SubSub ApplyFinanceProtectionSettings()    ' 财务用户保护设置    Dim ws As Worksheet    For Each ws In ThisWorkbook.Worksheets        ws.Protect Password:="FinanceSecure123", _                   AllowSorting:=True, _                   AllowFiltering:=True, _                   AllowFormattingCells:=False    Next wsEnd Sub

class FinancialProtectionSystem(WorkbookLevelProtection):    """财务权限管理系统"""    def __init__(self):        super().__init__()        self.role_permissions = self.load_role_permissions()        self.audit_trail = []    def load_role_permissions(self):        """加载角色权限配置"""        return {            'finance_admin': {                'can_edit': True,                'can_delete': True,                'can_add_sheets': True,                'ranges': ['A1:Z1000']            },            'department_manager': {                'can_edit': True,                'can_delete': False,                'can_add_sheets': False,                'ranges': ['A1:H100']            },            'read_only_user': {                'can_edit': False,                'can_delete': False,                'can_add_sheets': False,                'ranges': ['A1:Z1000']            }        }    def apply_role_based_protection(self, file_path, role_name, user_id):        """应用基于角色的保护"""        try:            if not self.load_workbook(file_path):                return False            if role_name not in self.role_permissions:                print(f"角色 '{role_name}' 未定义")                return False            permissions = self.role_permissions[role_name]            password = self.generate_role_password(role_name, user_id)            # 应用保护设置            for sheet_name in self.workbook.sheetnames:                self.apply_sheet_protection(sheet_name, permissions, password)            # 记录审计日志            self.log_audit_trail(file_path, role_name, user_id, 'APPLY')            # 保存文件            output_path = self.generate_output_path(file_path, role_name)            self.workbook.save(output_path)            return True        except Exception as e:            print(f"角色保护应用失败: {str(e)}")            self.log_audit_trail(file_path, role_name, user_id, 'ERROR')            return False    def apply_sheet_protection(self, sheet_name, permissions, password):        """应用工作表级保护"""        sheet = self.workbook[sheet_name]        # 首先解锁所有单元格        for row in sheet.iter_rows():            for cell in row:                cell.protection = openpyxl.styles.Protection(                    locked=not permissions['can_edit']                )        # 如果有可编辑范围，设置特定区域权限        if permissions['can_edit'] and permissions['ranges']:            for range_str in permissions['ranges']:                cells = sheet[range_str]                for cell in cells:                    cell.protection = openpyxl.styles.Protection(locked=False)        # 设置工作表保护        protection_options = {            'password': password,            'deleteRows': permissions['can_delete'],            'deleteColumns': permissions['can_delete'],            'insertRows': permissions['can_add_sheets'],            'insertColumns': permissions['can_add_sheets']        }        sheet.protection = SheetProtection(**protection_options)# 使用示例def financial_system_demo():    """财务系统演示"""    system = FinancialProtectionSystem()    # 应用角色权限    files_to_protect = [        '月度财务报告.xlsx',        '分公司汇总.xlsx',        '预算执行情况.xlsx'    ]    for file_path in files_to_protect:        system.apply_role_based_protection(            file_path=file_path,            role_name='department_manager',            user_id='USER123'        )    # 生成审计报告    system.generate_audit_report()    return systemif __name__ == "__main__":    financial_system_demo()