在我们使用mysql数据库时，有时我们的程序与数据库不在同一机器上，这时我们需要远程访问数据库。缺省状态下，mysql的用户没有远程访问的权限。下面介绍两种方法，解决这一问题。...1、改表法 可能是你的帐号不允许从远程登陆，只能在localhost。...这个时候只要在localhost的那台电脑，登入mysql后，更改 "mysql" 数据库里的 "user" 表里的 "host" 项，从"localhost"改称"%" mysql -u root -...-u root //这样应该可以进入MySQL服务器 mysql>GRANT ALL PRIVILEGES ON *.* TO 'root'@'%'WITH GRANT OPTION //赋予任何主机访问数据的权限
在前面介绍的一些操作数据库的代码中，可以看到，主要的操作逻辑基本上是打开数据库-操作-关闭数据库，很多时候改变的仅仅是操作，所以，把这些封装到一个类里面，以后调用自己写的类就会更方便。...因为ADO这个东西不仅仅只有Excel VBA可以调用，只要能调用COM组件的语言都是可以使用的，所以ADO实现的方法和属性都是通用性的，对于使用Excel VBA的人来说，有些时候为了方便在Excel...添加这个引用的目的是为了使用前期绑定，方便输代码，因为使用了VBAProject来管理代码，以后其他文件需要操作数据库都添加引用这个文件即可，不会再需要添加引用ADO。...实现OpenDB 打开数据库就是调用ADO的Open方法，在打开的时候，主要是需要写好Provider字符串，前面基本上是使用Excel来做测试的，但是数据库有很多种，不同的数据库Provider字符串是不一样的...ElseIf VBA.InStr(str, "Standard Jet DB") Then GetExtByBin = "mdb" ElseIf VBA.InStr(str, "
我们在使用mysql数据库时，有时我们的程序与数据库不在同一机器上，这时我们需要远程访问数据库。 缺省状态下，mysql的默认用户没有远程访问的权限。 下面给大家介绍两种方法，解决这一问题。...1.1 方案1：改表法 由于账号默认没有远程访问权限，所以首先登录本地电脑的MySQL，更改mysql数据库里中user表里的host项。 非生产环境中，使用以上方式可以迅速解决问题。...但如果是实际的生产环境，肯定还是需要重新创建一个用户，然后根据需要分配访问ip和权限（授权法）。 1.2 方案2：授权法 1.1.1 权限表 下面我们先来了解一下user表。...这两个指令实质是通过操作user(连接权限和全局权限)、db(数据库级权限)、tables_priv(数据表级权限)、columns_priv(数据列级权限)四个权限表来分配权限的。...他们是要用GRANT来删除的，如： 以上所述是大雄给大家介绍的MySQL数据库远程访问的权限如何打开的方法，希望对大家有所帮助
在一维表转二维表里介绍了使用字典来转换表格的方法，可以看到使用字典的方法代码量还是有一点多的，有点复杂。...让我们看看使用ADO怎么来实现这个功能： Sub ADOTransformData() Dim AdoConn As Object Set AdoConn = VBA.CreateObject...("ADODB.Connection") '打开数据库 AdoConn.Open "Provider =Microsoft.ACE.OLEDB.12.0;Data Source...ThisWorkbook.FullName & ";Extended Properties=""Excel 12.0;HDR=YES"";" Dim rst As Object Set rst = VBA.CreateObject...这个代码使用很简单，但是需要注意的是transform 这个语句不是所有的数据库驱动程序都能够支持的，像SQLite数据库就不能够支持。
在操作数据库的过程中，很多时候会需要得到一些数据库的信息，这个时候就可以使用OpenSchema，在CADO里面增加一个最基础的获取表的名称的函数： Function GetTablesName(ret...rst = AdoConn.OpenSchema(adSchemaTables) Dim k As Long Do Until rst.EOF '过滤掉系统的一些表...Err.Description GetTablesName = RetCode.RetErr End Function 上面的方法是通过循环读取Recordset的信息，再判断TABLE_TYPE，最后得到需要的表名...这个函数可以很好的获取Access数据库的表名、Excel表格的Sheet名等，但sqlite数据库似乎不能够获取到，这可能是驱动程序的原因。...不过sqlite数据库可以使用其他方式来读取所需要的信息，并不一定要使用OpenSchema。 至于其他的数据库类型，因为个人较少使用，所以也没有去测试。
在Excel中使用vba来创建透视表可以用这样的语句： ActiveWorkbook.PivotCaches.Add(xlDatabase, "数据源单元格地址").CreatePivotTable...xlDatabase 1 Microsoft Excel 列表或数据库。 xlExternal 2 其他应用程序中的数据。...Excel本身并不是一个真正的数据库，在vba中使用ado更多的是操作外部的数据库，有时候是直接提取数据查看就可以，有时候还需要对数据进行一些汇总、计数等操作。...如果将数据源读取到透视表，再使用透视表的功能进行处理就可以简化sql语句的编写，也不需要再重新读取数据。...Excel数据生成的使用上没有区别，透视表的数据源是会保存在Excel文件中的，打开文件的时候不会有Sheet展示出来：
在Custom UI Editor中保存该文件，首次在Excel中打开时，会出现关于Initialize和HideAlignmentGroup过程的错误消息提示，因为这两个过程仍然没有在标准的VBA模块中找到...如果活动工作表不是标准工作表，就隐藏该组，否则该组可见。 注意，当打开工作簿时，创建ribbon对象。编辑VBA代码可能销毁这个新创建的对象。...试图使与销毁对象相关的控件无效是不可能的，唯一的办法是重新创建ribbon对象重新打开该工作簿。 当激活图表工作表时，“开始”选项卡中的“对齐方式”组被隐藏，如下图所示： ?...'由于Excel 2007没有InvalidateControlMso方法, '使用下面的语句使Ribbon无效: 'myRibbon.Invalidate End Sub 当激活不同的工作表时...虽然所有的内置选项卡都被隐藏，但仍然可以通过快捷键组合、上下文菜单和上下文选项卡访问内置控件。
首先进入数据库级别的【安全性】-【登录名】-【新建登录名】 ? （图1：新建登录名） 2. 在【常规】选项卡中，如下图所示，创建登陆名，并设置默认的数据库 ?...在【用户映射】选项卡中，如下图所示，勾选需要设置的数据库，并设置【架构】，点击【确认】按钮，完成创建用户的操作 ? （图3：选择对应数据库） 4. ...现在我们就可以对TestLog数据库中的User表进行权限的设置了，【表】-【 属性】 ? （图4：选择对应表） 5. ...（图5：设置访问表的用户） 6. ...现在就使用TestUser用户登陆数据库了，登陆后如下图所示，现在只能看到一个表了 ? （图7：效果）
报错： 解决：在语句开头指定SET NOCOUNT ON 就是这么神cao奇dan。 -END-
当打开工作簿时， 1.1 激活特定的工作表（名为Sample）。 1.2 开始的3行被冻洁。 1.3一个特定的行（行50）向上滚动并成为解冻窗格的顶部行。...如果激活的工作表是标准工作表，那么Custom选项卡是可见的。 4....右击工作表选项卡，选择插入来添加一个图表工作表。 3. 重命名工作表为Sample、Sheet1和Sheet2。 4. 激活工作表Sheet1，选择一个单元格区域，在“名称”框中输入“Sheet1!...MyRange”来命名为一个工作表级的名称。 5. 关闭该工作簿，然后在Custom UIEditor中打开该工作簿。 6....在Excel中打开该文件。对于错误消息单击“确定”。 11. 按Alt+F11激活VBE。 12.
分别重命名工作表为Data、Analysis和Reports。 3. 关闭该工作簿，然后在Custom UIEditor中打开。 4....在Excel中打开该文件。对于弹出的错误消息，单击“确定”。 9. 按Alt+F11激活VBE。 10....然而，如果用户在设置勾选该复选框后，通过单击工作表标签激活其他工作表，那么动态菜单被无效，与菜单相关的任何数据（包括复选框的勾选条件）将被销毁。...当重新激活工作表Data时，通过调用GetMenuContent过程会重新创建菜单，而复选框会重置为其默认值（即，取消勾选条件）。...如果要在用户关闭并重新打开该文件之后保留该复选框的状态，那么可能要在隐藏的工作表或者在Windows注册表中存储其状态。
文章背景：上文（参见文末的参考资料[1]）提到，通过Application.OnTime定时执行工作簿中的VBA代码，但是它并不是一个可靠的解决方案。...本文通过Windows任务计划程序，每天早上8点自动打开指定路径的工作簿，然后激活工作表test。...Activate End Sub 这样，当打开工作簿时，程序会自动激活名称为test的工作表。...测试任务：在一切设置完成后，您可以手动运行该任务以测试是否可以成功打开指定的工作簿并激活工作表"test"。...参考资料： [1] VBA: 通过Application.OnTime定时执行程序 [2] 讯飞星火认知大模型 [3] 怎么在每天的某个时刻自动打开特定excel工作簿(https://www.officeapi.cn
设置属性，更改Excel的工作界面 application的子对象 workbook对象 引用workbook对象 访问workbook对象属性 创建工作簿——add 用open方法打开工作簿 activate...激活工作簿 保存工作簿 close——关闭工作簿 worksheet对象 add方法新建工作表 设置name属性，更改工作表的标签名称 用delete方法删除工作表 激活工作表的两种方法 用copy方法复制工作表...使用move移动工作表 设置visible属性，隐藏或者显示工作表 访问count属性，获得工作簿中工作表的数目 range对象 用range属性引用单元格 用cell属性引用单元格 引用整行单元格...方法和属性的区别是属性返回对象包含的内容或者具有的特点，如子对象、颜色、大小等；方法是对对象的一种操作，如选中，激活等 VBA中的运算符 算数运算符 运算符 作用 示例 + 求两个数的和 5+9=14...open 打开工作簿时发生 sheetavtivate 激活任意工作表时发生 sheetBeforeDoubleClick 在双击任意工作表之前发生 sheetBeforeRightClick 在右击任意工作表之前发生
---- 主要内容和特点 《ExcelVBA编程入门范例》主要是以一些基础而简短的VBA实例来对ExcelVBA中的常用对象及其属性和方法进行讲解，包括应用程序对象、窗口、工作簿、工作表、单元格和单元格区域...激活VBE编辑器 一般可以使用以下三种方式来打开VBE编辑器： ■ 使用工作表菜单“工具——宏——Visual Basic编辑器”命令，如图00-01所示； ■ 在Visual Basic工具栏上，...VBE编辑器 此外，您也可以使用下面三种方式打开VBE编辑器： ■ 在任一工作表标签上单击鼠标右键，在弹出的菜单中选择“查看代码”，则可进入VBE编辑器访问该工作表的代码模块，如图00-03...所示； ■ 在工作簿窗口左上角的Excel图标上单击鼠标右键，在弹出的菜单中选择“查看代码”，则可进入VBE编辑器访问活动工作簿的ThisWorkbook代码模块，如图00-04所示；...图00-03：右击工作表标签弹出菜单并选择“查看代码”打开VBE编辑器 图00-04：右击Excel图标弹出菜单并选择“查看代码”打开VBE编辑器 图00-05：在宏对话框中单击
大家好，上节介绍过部分工作簿对象的常用方法-创建和打开，本节将继续介绍工作簿对象的激活、保存和关闭方法。...当需要改变excel文件的活动状态时，可以使用workbooks集合的activate方法来激活一个工作簿。 workbooks（“工作簿名称”).activate 方法较简单，这里不做演示。...Workbooks("vba.xlsm").Close 是关闭了单个工作簿vba.xlsm，而workbooks.close则是关闭所有打开的工作簿。...在关闭工作簿时，如果excel表有修改且没有保存，那么系统会在关闭前弹窗提示是否需要保存。如果不希望出现弹窗，可以通过设置close方法的参数来修改。 下面看下close方法的完整格式。...与之前介绍工作表activesheet属性类似。 thisworkbook是对程序所在的工作簿的引用。而activeworkbook则是当前活动的工作簿的引用。
本文演示的例子是，在Excel中使用VBA打开新的Word文档，复制Excel图表并粘贴到这个文档中。同时，介绍了一种你不熟悉Word VBA的情形下怎样获取相关的代码并在Excel中使用的方法。..., DocumentType:=0 Windows("在Excel中使用VBA自动化Word.docx").Activate End Sub 接着，回到Excel，打开VBE，单击菜单“工具——引用”...在Word VBA中使用Documents.Add开始，在Excel VBA中修改为WordApp.Documents.Add，并且在VBA代码中通常不需要选择并激活对象，因此，修改后的代码如下： Sub...打开应用程序时，通常是在后台打开，因此，要使Word文档可见，添加了下面的代码： WordApp.Visible = True 当然，在Excel中，也可以使用宏录制器录制代码，本示例中是复制工作表中的图表...Word并创建新文档，然后将Excel工作表中的图表复制到该文档中的代码完成。
Excel VBA操作MySQL之十一——有关表的操作讲解如何使用Excel VBA对MySQL数据库中的表格进行操作，例如重命名、删除等。...Excel VBA操作MySQL之十三——生成数据透视表展示如何使用Excel VBA生成MySQL数据库中的数据透视表。..."USER=" & userName & ";" & _ "PASSWORD=" & password & ";" ' 打开数据库连接...将示例中的服务器地址、数据库名称、用户名和密码替换为自己的MySQL数据库信息。然后，你可以在打开连接之后执行各种数据库操作了。..."USER=" & rootUser & ";" & _ "PASSWORD=" & rootPassword & ";" ' 打开数据库连接
Workbooks("vba.xlsm").Worksheets.Count表示统计vba.xlsm工作簿对象的普通工作表的数量，在引用工作簿对象时，表示方法为：Workbooks("vba.xlsm"...2、Workbooks(index索引号） 在工作簿对象引用时，index索引号是工作簿的在任务栏的从左至右的顺序（也是工作簿依次打开的顺序。）...电脑打开了三个工作簿，从左至右分别是vba，工作簿1，示例表。通过循环来获得三个工作表的名称。...（顺序与工作簿打开的顺序一致。） （注意三个表的后缀是不同的，所以前面说的使用名称引用工作簿时候，需要注意工作簿类型的后缀。）...即该工作簿当前是被激活的状态，使用activeworkbook来表示。 在workbook工作簿对象层级上为application主程序对象，在代码中可以选择性省略。
当然一个折衷的方式是，在Excel文件中新建一个工作表并隐藏它来实现配置数据跟着工作薄一起带走。...这种方式有一缺点是，在用户工作薄里进行数据操作，用户很容易破坏到这些数据，就算深度隐藏工作表，仍然会轻松地用VBA方法重新将其显示出来，特别对一些敏感配置信息的保存非常不利。...且此对象不止于在VSTO内使用，在VBA上也同样有此对象可供计用。...使用方式大概是先Add一个CustomXMLPart，然后使用LoadXML方法即可把xml内容加载到此对象中，下次访问时，只需访问其XML属性，即可将xml内容取出（文本格式）。...核心代码分享 绑定事件，根据需要，绑定打开、关闭文件，或激活、失去激活状态事件 Common.ExcelApp.WorkbookOpen += ExcelApp_WorkbookOpenLoadXMLPart
在Excel里，能发生的事件很多： 打开、关闭工作簿 新建工作簿 新建工作表 激活工作表 选择单元格 单元格改写 ………… 这些都是事件，其实就是平时手动操作Excel的一些动作。...在Excel VBA里提供了接口，在发生这些事件之前或者之后，让使用者可以设置一段运行的程序。 比如双击打开工作簿，可以设置运行一段程序： ?...上面就是一个工作簿打开事件，运行一段程序： Private Sub Workbook_Open() MsgBox "工作簿打开了" End Sub 这种格式是固定的，必须按照这种模式，Excel...VBA才能识别它为一个事件，所以为了避免使用者手动输入而造成的错误，Excel VBA提供了下拉选项让使用者直接选择。...Excel文件一旦创建，就已经创建好了几个特殊的模块：ThisWorkbook、Sheet1（有几个工作表就会有几个Sheet#模块）。
领取专属 10元无门槛券
手把手带您无忧上云
云服务器
ICP备案
腾讯会议
云直播
对象存储
