最新文章列表

VBA根据某列值分割多Sheet

Sub 分割()     Dim arr, sht As Worksheet, temp As String, i As Long, k, t, rng1 As Range     Dim x, xx As String     Dim x1, x2, y As Integer         x = UCase(InputBox("", "请输入标题列" ...
qqt31 评论(0) 有1768人浏览 2015-09-30 08:23

6.2.2 在Excel VBA数据库中引用ADO对象

要在VBA编程中调用ADO对象,实现Excel与数据库的沟通,.需要在VB编辑器中设置【引用】。通常需要设置的几个选项为:Microsoft ADO Ext 2.x for DDL and Security ·Microsoft ActiveX Data Objects (Multi-dimensional) 2.x Library .Microsoft ActiveX Data Objects ...
cuiyadll 评论(0) 有1209人浏览 2015-07-23 11:04

Excel Vba 函数的一些简单使用

1.复制文件到指定文件夹 FileCopy path & Range("D" & j) & ".msg", newPath & Range("D" & j) & ".msg"  2.复制文件夹到指定文件夹 Dim fso As Object Se ...
zxlyecf2 评论(0) 有1073人浏览 2014-10-09 11:26

Excle Vba 一些调试相关

单步调试:F8 在中断模式下(ctrl+Break键),可以做: 1.执行    工具----选项----编辑器----勾选“自动显示数据提示” 则当用鼠标悬停在变量或表达式上时,会出现提示窗口,显示其名称和值! 2.在监视窗口查看某些表达式的值,方法是:先用鼠标拖黑以选中表达式,再执行   调试----添加监视,出现“添加监视”对话框。 3.在代码窗口中选中表达式----按shift ...
zxlyecf2 评论(0) 有616人浏览 2014-09-01 09:59

jacob操作office分享

   现在的项目中操作word文件比较多,word文件的加密解密,转换为各种格式,插入图片,添加水印、html转word等等各种东西,大家也都知道,java语言是不能直接操作word或者excel的,不像C#,可以调用VBA的类来直接操作office。    目前java也有一些操作office的开源框架,比如poi,这个没怎么研究过,我估摸着它是通过解析office的xml文档模型来操作off ...
men4661273 评论(2) 有46944人浏览 2014-07-29 16:54

VBA做的简易猜拳

Private Sub CommandButton1_Click() Label4.Caption = "石" Call run(1) End Sub Private Sub CommandButton2_Click() Label4.Caption = "剪み" Call run(2) End Sub Private Su ...
vba 
zkk515 评论(0) 有686人浏览 2014-06-04 19:18

VBA 如何计算一段代码运行需要的时间?

VBA 如何计算一段代码运行需要的时间? Private Sub Form_Load() Dim sngStart As Single sngStart = Timer '循环代码 Debug.Print "耗费时间: " & Timer - sngStart 更精准 Private Declare Function Get ...
vba 
zkk515 评论(0) 有1803人浏览 2014-05-22 14:37

自己写的用VBA进行两个sheet页中的数据对比

两个sheet页分别命名“Sheet700”,“Sheet800”。 判断"Sheet700”sheet中的数据是否在“Sheet800”中存在,不存在标蓝色。 存在的场合,“Sheet800”sheet中的数据和“Sheet700”的2~41行比较,不一样标注青色,并在最前面标注黄色。 Sub Macro3() Dim tem, tem1 As String Dim tex ...
vba 
zkk515 评论(0) 有3178人浏览 2014-05-22 14:30

Run SSIS in Access Macro

Make sure you select 'Microsoft DTS Runtime 1.0' in Tools --> Refereces...   'Sub to run a DTEXEC cmd to kick off an SSIS Package Dim strCmd As String strCmd = "dtexec /f "" ...
tjj006 评论(0) 有783人浏览 2014-02-14 14:34

【Excel2013教程】如何破解vba工程密码

人经常从网上下载别人的一些Excel学习vba编码,不过有些人为了避免别人盗用所以给代码加了密码,其实这个密码破解起来很假单,下面我就跟大家分享一下如何破解vba工程代码: 将你要破解的Excel文件关闭,切记一定要关闭呀!然后新建一个Excel文件 打开新建的这个Excel,按下alt+F11,打开vb界面,新建一个模块,如图所示 将代码复制到这个模块中,代码如下: Private Su ...
vba 
zkk515 评论(0) 有4763人浏览 2013-12-05 13:28

用VBA实现批量数据填充到word模板

场景  在办公类应用中,常常遇到以下场景: 将数据库数据取出,批量填充到预先画好的word模板,输出用于打印的word文档。   限制 ie浏览器,本机安装了word。   问:那么多可以选择的,jacob, iText, 国内大量的在线编辑控件,为什么非得用前端VBA呢?   归根溯源,由于word的私有格式,对于其文档的程序操作只能通过其所谓automation来进行,   ...
chen4w 评论(0) 有9083人浏览 2013-11-03 11:28

来吧!带你玩转 Excel VBA

来吧!带你玩转 Excel VBA(含CD光盘1张)(双色)(附带近500个VBA思考练习题,Exceltip.net出品) 罗刚君  杨嘉恺编著 ISBN 978-7-121-20627-6 2013
博文视点Broadview 评论(0) 有1944人浏览 2013-08-15 10:14

VBA遍历文件夹及子文件夹中所有文件

VBA中遍历文件方法很多,但很多方法又有局限,DIR的方法很难遍历子文件夹文件.FileSearch方法在office 2007中MS把Application对象FileSearch方法删除了.所有我们来用FileSystemObject对象实现遍历文件夹及子文件夹中所有文件. 代码如下:  Dim arrFiles() Dim countFiles% Public Sub ListAllF ...
xieyunbiao 评论(0) 有6872人浏览 2013-07-26 17:45

用VBA得到EXCEL表格中的行数和列数

每种方法中上面的是Excel的行数,下面的是Excel的列数。 方法1:  ActiveSheet.UsedRange.Rows.Count     ActiveSheet.UsedRange.Columns.Count       缺点:有时可能会比实际数大一些,原因是如果你把最后几行(列)数据清除后(非整行或整列删除),用这个命令仍返回未清除前的值。就是说现在虽然是空的,但是你曾经用过也算 ...
weixiao2013 评论(0) 有3477人浏览 2013-07-23 18:59

用WORD中的vba批量转换为PDF

转载自:licanli2082@126网易博客 对于只是简单运行的方法,步骤如下: 1. 让WORD2007、2010调出开发选项卡。调出的办法是,点击WORD左上角的圆圈形按钮,从下拉菜单中选择”选项“,然后点击左侧的常规选项卡,再从右边窗口中选中”显示开发工具“   2. 回到WORD主界面,选择”开发工具“面板栏,从这个面板的左边选择”宏“按钮 3. 在宏窗口中输入一个宏名字(任意 ...
xieyunbiao 评论(0) 有3236人浏览 2013-07-18 09:47

用VBA批量转换Excel工作簿为PDF

    本文转自www.excel123.cn 原文作者 Excel123     Excel 2010和Excel 2007可以将Excel工作簿另存为PDF格式文件,但手工的方法每次只能转换一个工作簿,要转换多个工作簿就显得有些繁琐。如果没有批量转换软件,在Excel 2010和Excel 2007中,利用VBA代码也可以轻松实现将Excel工作簿批量转换为PDF,方法如下:     1. ...
xieyunbiao 评论(0) 有3352人浏览 2013-07-18 09:46

在OUTLOOK里实现记时器

    前些日子工作的需要,要在outlook里写VBA实现定时检查邮件然后报警这样的功能。搞了好段时间才搞定,其中遇到的一个问题就是outlook里不支持VBA中ontime等函数的使用,用等待等函数又使得outlook一直被VBA宏占用,不能正常收发邮件了。     最后我还是通过借助Windows API 函数SetTimer和KillTimer实现了我要完成的功能。     代码如下: ...
xieyunbiao 评论(0) 有1237人浏览 2013-07-18 09:04

VBA进度条的制作

    用VBA做Excel的大量数据处理时,程序要运行很长时间,当VBA程序运行后台运行时Excel是不允许操作的,这样Excel长时间的被后台运行的VBA占用,会给用户一直MicroSoft Excel程序死掉了的感觉。这样让用户很是头疼,不知道怎么办了?如果强行杀掉MicroSoft Excel进程,又心疼没有保存的哪些保存的Excel操作;如果等待又不知道MicroSoft Excel是不 ...
xieyunbiao 评论(0) 有3065人浏览 2013-07-18 09:01

Excel vba 读取上证指数

Public Sub 抓上海指数全部() '删除上次结果sheet delectsh Dim ie, dmt, an, selectONE Set ie = CreateObject("InternetExplorer.Application") '创建一个IE对象 With ie .Vis ...
vba 
wentise 评论(0) 有3805人浏览 2013-02-07 03:26

第二讲:Excel 在测试中的应用

下面我们看下如何添加功能键。 如果看不到开发选项,请在文件--》开发者选项中勾选显示开发项就行。 直接选择button放置对应位置。   先来看第一个show/hide Test cases按钮用来显示或者隐藏详细案例 Sub ShowTestCases() Dim TestCases As Range Set TestCases = Range("RangeTestCa ...
测试的达 评论(0) 有1413人浏览 2013-02-01 12:11

最近博客热门TAG

Java(141747) C(73651) C++(68608) SQL(64571) C#(59609) XML(59133) .net(54785) 编程(39454) JSP(37542) 数据结构(36423) Eclipse(31254) PHP(29988) F#(26079) 算法(24867) 脚本(19840) J#(18922) JDBC(17888) ASP(17480) JDK(14881) JVM(14450)

博客人气排行榜

    博客电子书下载排行

      >>浏览更多下载

      相关资讯

      相关讨论

      Global site tag (gtag.js) - Google Analytics