编译错误编译错误是因为过程中的VBA代码书写错误产生的，写错关键字、语句结构不配对等都会引起编译错误，如：
当试图执行存在编译错误的VBA过程时，VBA会拒绝执行，并显示一个对话框提示出错原因，如图 9-1 所示。 运行时错误如果过程在执行时试图完成一个不可能完成的操作，如除以 0、打开一个不存在的文件、删除正在打开的文件等都会发生运行时错误。
VBA不会执行存在运行时
这两天弄机房收费系统的时候，用到了vb与office数据之间的交互，也就是我们将vb中的MSFlexGrid控件中的数据导出为Excel，这就是 vb与office数据之间的交互的大体步骤如下。 使用office对象的方法 &nbs
转载
2024-07-10 11:39:16
90阅读
Bug有时候破坏的你的兴致，阻挠了保持到现在的渴望。可是，自己又非常明白，它是一种激励，是注定要被你踩在脚下的垫脚石！python2.7中最头疼的可能莫过于编码问题了，尤其还是在window环境下，有时候总是出现莫名其妙的问题，有时候明明昨天还好好的，今天却突然。。。遇到这种问题真的是一肚子的火。。。fuck！首先，在我们编写python代码的时候就要注意一些编码的规范。1.源码文件用#-*-co
由乱码引起的VBA错误
1、有位日本同事，拿了一个Excel 2003给我，说是点击就出现下面的错误。我也拿到自己的电脑上试，我用的是Excel 2010，还是一样的错误。
2、打开Excel帮助，尝试解决方法，①用64位的office打开也不行.②把Excel转换成高版本也不行.
3、用Alt+F11打开VBA，但又不知道密码，
原创
2012-01-09 09:45:17
7495阅读
点赞
# 使用VBA导出MySQL数据并解决乱码问题
在使用VBA与MySQL数据库进行交互时，常常会遇到数据导出时出现乱码的问题。本文将详细讲解如何通过VBA从MySQL中导出数据并解决乱码问题。以下是整个流程的步骤概述：
| 步骤 | 描述 |
|------|------|
| 1 | 设置MySQL数据库连接 |
| 2 | 执行SQL查询语句 |
| 3 | 处理查询结果
## VBA导出MySQL数据库乱码解决方法
### 整体流程
首先，我们来看一下整个导出MySQL数据库乱码的流程。在VBA中，我们需要通过ADODB连接MySQL数据库，并执行SQL语句将数据导出到Excel中。下面是具体的步骤表格：
| 步骤 | 操作 |
| ------ | ------ |
| 1 | 创建ADODB连接 |
| 2 | 执行SQL查询 |
| 3 | 将查询结果
原创
2024-04-10 05:03:04
126阅读
近来由于项目的需要，需要看一下Windows上的编码转换情况，本打算自己写个小程序来测以下，结果google了半天也没有发现好的例子，只是有WideCharToMultiByte, MultiByteToWideChar的API，鉴于已经 n 年没有写Windows的程序了(怎么编译都忘了)，而且时间也不充足，所以还是想偷懒找个现成的工具。于是首先想到了功能极为强大的 UltraEdit,
转载
2024-09-28 10:48:08
140阅读
对FileSystemObject一直略有耳闻，VBA爱好者常常简称为FSO对象。在Scripting类库中有三个可以直接使用NEW关键字实例化的类，第一个就是常用的字典，第三个是FSO。一、FSO对象引用的方法: 前期绑定：先要引用类库文件scrrun.dll，写代码的时候有智能提示。如果程序发给别人用，就要用后期绑定方式。Dim fso As New 后期绑定：不需要引用类
转载
2024-03-25 18:02:18
540阅读
Function GetChar(strChar As String, varType As Variant) '取值函数
Dim objRegExp As Object
Dim objMatch As Object
Dim strPattern As String
Dim arr
&
原创
2024-04-25 21:25:43
486阅读
gold_star方法一：'列数转字母Function CNtoW(ByVal num As Long) As String CNtoW = Replace(Cells(1, num).Address(Fa...
转载
2019-12-17 20:54:00
2255阅读
2评论
1、乱码截图在输入法上，当输入法设为英文的时候，复制下来的东西考到记事本上，汉字就成了乱码，因为汉字是两个字符，英文是1个，反之同理。2、解决方法：在vba里将输入法设置成日文，然后再复制（汉字同理）成功了，有没有觉得很有意思。...
原创
2019-05-24 17:28:25
358阅读
！好家大，嗨我也蹭一下诺兰最新电影《信条》的热度，皮一子就是好开心呀！上一篇文章《按A-Z首字母查询（一）》我们已经将查询的标签控件对应
原创
2023-05-05 10:39:56
293阅读
HI，大家好！之前我给大家分享过一个示例，如下图：这个示例我们可以看到可以按字
原创
2023-05-05 10:39:41
394阅读
在《Python的编码与解码初探》中，对Python的编码知识稍做了一点研究，本文再深入一些，将字符编码以及不同进制的关系梳理一下。1. ASCII和Unicode编码先来看看ASCII和Unicode编码的一个例子：字母A用ASCII编码是十进制的65，二进制的01000001；字符0用ASCII编码是十进制的48，二进制的00110000，注意字符'0'和整数0是不同的；汉字中已经超出了ASC
转载
2023-08-30 08:03:20
111阅读
VBA 类模块学习1 问题背景2 创建自己的对象3 属性过程4 创建集合4.1 `Collection` 对象创建集合4.2 在类模块中创建集合5 封装 本文中，大部分内容源于书籍《Excel 2007 VBA 参考大全》，ISBN：9787115311696。感谢原书第一作者及译者。 工作表模块、图表工作表模块、工作簿模块和用户窗体模块都是类模块。不过，这些模块都是特定类型的类
转载
2024-02-16 20:18:09
155阅读
Replace(Cells(1,1).address(False,False),"1","")Step1.获取Cell所在的列（英文字母）和行Cells(1,1).address(False,False)->A1Cells(1,1).Address(True,True)->$A$1Cells(1,1).Address(True,False)-&g
原创
2018-04-19 10:09:02
4581阅读
点赞
Sub 宏1() ' ' 宏1 宏 ' ' Range("E3:E33").Select Selection.Copy tyear = 2010 tmonth = 1 For startIndex = 3 To 2701 Step 31 '2436 Range("E" & startIndex).Se...
转载
2018-03-22 03:26:00
643阅读
2评论
大家好，我是东哥。经常给大家推荐好用的数据分析工具，也收到了铁子们的各种好评。这次也不例外，我要再推荐一个，而且是个爆款神器。Excel和Jupyter Notebok都是我每天必用的工具，而且两个工具经常协同工作，一直以来工作效率也还算不错。但说实在，毕竟是两个工具，使用的时候肯定会有一些切换的成本。最近，在逛GitHub突然发现了一款神器「PyXLL-Jupyter」，它可以完美将Jupyte
转载
2024-08-09 17:46:52
187阅读
VB控件和对象：ScriptControl 控件3. ScriptControl 控件 Microsoft Script Control 控件可以创建运行任何 ActiveX(R) scripting 引擎，例如 Microsoft(R) Visual Basic (R) Scripting Edition 或Microsoft(R) JScript(TM) 的
转载
2023-08-21 17:25:01
782阅读
range().resize(x,y) 方法语法Range(i,j).resize(行数,列数) resize(x,y) 表示的区域，x是行，往下。Y是列，往右。重新定位出来的区域 resize() 得出的是一个区域范围！！！因为X 是表示行数，必须大于0因为Y是表示列数，必须大于0resize(x,y)可以为负数吗？比如 resize(-1
转载
2024-06-09 08:57:37
788阅读
