xls转xlsx另存为用法三

xls转xlsx另存为用法三

xls转xlsx另存为用法一

xls转xlsx另存为用法一

xls快捷读xml三方法

xls读xml 内涵三种方法，读取方式不是很灵活，仅供参考

VBS脚本自删除样例

VBS脚本自删除样例，自己删除自己，开即可重启，自主选择是否保存，否则则自动删除脚本自身

sql大数据查询

大数据查询，多数据快速查询，匹配两种数据sqlilte,mysql等多个数据大数据查询，多数据快速查询，匹配两种数据sqlilte,mysql等多个数据

VBA 操作文件综合

VBA处理文件的高质量速度问题，文件处理，重命名等

python与XLS

python控制自动生成excel且包含样式超链接以及与数据库关联

python 读写 Excel 学习总结

python 读写 Excel 学习总结

文件另存为_导出为xls和xlsx格式可任选

'------------------------------------- '窗口环境初始化设置 '------------------------------------- Private Sub Workbook_Open() Rem 加快计算速度 Call Mod_Environment Rem 打开窗口默认最大化显示 Application.WindowState = xlMaximized Sheets("Config Data").Activate Rem 解保护 ActiveSheet.Unprotect Password:="huawei" Rem 设置列宽 Sheets("Config Data").Columns("J:BB").Select Selection.ColumnWidth = 15 Rem 单元格取消保护 Rows("10:65535").Select Selection.Locked = False Selection.NumberFormatLocal = "@" Rows("9").Select Selection.NumberFormatLocal = "G/通用格式" Rem 窗口冻结 workbookname = ThisWorkbook.Name FileType = Right(workbookname, Len(workbookname) - InStrRev(workbookname, ".")) Select Case FileType Case "xlsm" ActiveWindow.SplitRow = 9 Case "xls" ActiveWindow.SplitRow = 3 End Select ActiveWindow.FreezePanes = True Rem 保护 ActiveSheet.Protect Password:="huawei", Contents:=True, Scenarios:=True Rem 默认窗口位置 Range("B4").Select ActiveWindow.ScrollRow = 1 ActiveWindow.ScrollColumn = 1 Sheets("Config Data").ScrollArea = "A1:BB65535" Rem 恢复Excel环境 Call Rec_Environment End Sub

vba 中代码实现另存为，支持2007及2003格式

vba 中代码实现另存为，支持2007及2003格式