gonery的专栏

根据excel表数据打印封面、目录，用于简单的数据结构（单表数据）

[EXCEL][VBA][MSSQL][档案数字化]通用录入系统

资源下载：https://download.youkuaiyun.com/download/gonery/20605736主界面：代码：sheet1Option ExplicitPrivate Sub delete_dh() Dim cSQL As String Call cnn_MDB cSQL = "Insert Into yw_aj_bak Select * From yw_aj Where dh='" & Me.txt_search.

界面

先看看界面首页数据库已售数据库信息录入功能介绍： 根据录入的商品信息，查询是否过期。盘存后点击过期日期，将已售罄商品信息保存到已售数据库中并删除数据库中信息。代码：ThisWorkbookPrivate Sub Workbook_BeforeClose(Cancel As Boolean) Call clear_Click ActiveWorkbook.SaveEnd SubUserForm1Private Su...

FileList.ini文件内容[FileList]1=filename-000.jpg 封面12=filename-00A.jpg 目录13=filename-00B.jpg 目录2......5=filename-001.jpg 正文16=filename-002.jpg 正文2......10=filename-006.jpg 备考表1'Option Compare Database'工具－> 引用 勾选 Microsoft Scripting Runtime