xlrd ---- python library to read .xls file Excel 解析工具

Fri, 27 May 2022 00:00:00 +0000

合并单元格读取

1
2
3
4
5
6
7
8
9


import xlrd

file = 'demo.xls'

work_book = xlrd.open_workbook(file, formatting_info=True)
work_sheet = work_book.sheet_by_index(0)

print(sheet.merged_cells)
# List[Tuple(row_start, row_end, col_start, col_end)]

注意： index 是半开半闭区间 [row_start, row_end)

参考： API Reference — xlrd 2.0.1 documentation

Vba Excel

Wed, 09 Aug 2017 00:00:00 +0000

禁止拷贝文件方法

http://www.360doc.com/showweb/0/0/762370756.aspx

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19


 Private Sub Worksheet_SelectionChange(ByVal Target As Range)
　　Dim MyDiskCode
　　Set MyDiskCode = GetObject("Winmgmts:").InstancesOf("Win32_DiskDrive")
　　For Each mo In MyDiskCode
　　　Sheet1.Cells(999, 256).Value = mo.Model
　　Next
　　End Sub


 Private Sub Workbook_Open()
　　Dim MyDiskCode
　　Set MyDiskCode = GetObject("Winmgmts:").InstancesOf("Win32_DiskDrive")
　　For Each mo In MyDiskCode
　　MyNewCode = mo.Model
　　Next
　　If (MyNewCode <> Trim(Sheet1.Cells(999, 256).Value)) Then
　　　ThisWorkbook.Close
　　End If
　　End Sub

excel 工作表保护

可以选定单元格属性为，不锁定，
保护工作表功能，不允许，用户选定，锁定单元格，这样用户，就不能通过普通方法，修改单元格
而我们却可以，使用 VBA 后台编写程序，修改它。

Warning 实践证明，下述方法可行,但是，vba 会产生漏洞，因为通过 vba， Select 语句选定单元格，如果不，重新选定为，用户，可访问区域，而是，锁定区域(用户禁止访问区域)，那么，用户将获得，禁止区域的访问权限！！！ ===> 因此，使用 vba 后，要 Select 成，用户允许访问区域。

Excel on Sawyer Zheng's Blog

xlrd ---- python library to read .xls file Excel 解析工具

合并单元格读取

Vba Excel

禁止拷贝文件方法

excel 工作表保护