vb excel
火焰山亮剑
这个作者很懒,什么都没留下…
展开
-
用VB合并同目录的多个Excel文件 1000个文件30秒搞定
Private Sub Command4_Click() CommonDialog1.DialogTitle = “Open files” 'CommonDialog1.Filter = “xls files(.xls)|.xls” CommonDialog1.Filter = “xls 文件.xls)|.xls|高版本文件(.xlsx)|.xlsx|所有文件(.)|.*” CommonDialo...原创 2020-05-01 19:36:38 · 1525 阅读 · 0 评论 -
导入EXCEL数据更新access数据库里的信息
'Public fn As String '保存Access文件名 'Public fn1 As String '保存Excel文件名 'Public fncount As Integer '保存Access数据库表的字段教 'Public fn1count As Integer '保存ExceI数据库表的字段数 Dim excel_aq As New ADODB.Recordset Dim s...原创 2020-03-07 12:35:21 · 1212 阅读 · 0 评论