随笔分类 -  VBA

摘要:源代码 Sub Macro1() ' ' Breaks worksheet and workbook structure passwords. Jason S ' probably originator of base code algorithm modified for coverage ' o 阅读全文
posted @ 2020-07-18 17:36 办公魔盒 阅读(615) 评论(0) 推荐(0)
摘要:源代码 Public CNN As ADODB.Connection Sub 连接数据库() Dim DataSource As String DataSource = Chr(34) & "(DESCRIPTION=(ADDRESS_LIST=(ADDRESS=(PROTOCOL=TCP)(HOS 阅读全文
posted @ 2020-07-18 17:35 办公魔盒 阅读(1291) 评论(0) 推荐(0)
摘要:源代码 Private Const BITS_TO_A_BYTE = 8 Private Const BYTES_TO_A_WORD = 4 Private Const BITS_TO_A_WORD = 32 Private m_lOnBits(30) Private m_l2Power(30) P 阅读全文
posted @ 2020-07-18 17:34 办公魔盒 阅读(754) 评论(0) 推荐(0)
摘要:本类模块是用于excel的VBA链接MYSQL的帮助类 在使用该类模块前请先安装mysql 8.0 数据库驱动 MySQL 8.0: Connector/ODBC 类模块代码 Dim strcn As String Dim cn As New ADODB.Connection '构造函数 Priva 阅读全文
posted @ 2020-07-18 16:31 办公魔盒 阅读(216) 评论(0) 推荐(0)