随笔分类 -  EXCEL VBA

1 2 下一页
导出Outlook里的全球通讯录到Excel
摘要：最近整理硬盘文件，发现一个Outlook里的全球通讯录到Excel的代码，但不知道这个文件是什么时候下的了，谨向原作者致敬。注意：1、这个代码是写在Excel的模块里的。2、通讯录中联系人个数多的话，可能时间有点长 阅读全文
posted @ 2011-02-16 11:23 RobinLao 阅读(2987) 评论(0) 推荐(0)
提取Excel、Word、PPT文件中的Flash文件的两种方法
摘要：方法一：VBA代码法新建一个文件，然后拷贝以下代码到VBA模块中，运行代码，选择含有Flash的Excel文件确定，即可获取swf文件。方法二：UE修改法1、打开这个含有Flash的Excel文件，进入设计模式，选中这个Flash后拷贝到桌面，获取一个片段文件2、用ULraEdit32(UE)打开这个片段文件，查找“465753”字段3、把“465753”字段之前的文字全部剪切，然后把文件另存为”X.swf”4、OK 阅读全文
posted @ 2011-02-10 19:58 RobinLao 阅读(674) 评论(0) 推荐(0)
介绍一个文本连接的自定义函数：contxt
摘要：Excel自带的CONCATENATE函数虽然能连接文本，但却不能连接内存数组，论效果还没&这个连接符方便，实在是Excel里的第一大鸡肋。所以今天就介绍给大家我一直在用的文本连接的自定义函数–contxt 。用法就如CONCATENATE函数差不多，以逗号,分隔，参数支持数组和单元格区域。原创作者为 chenjun （陈军），微软MVP，一个EH里传奇的人物，可惜我进EH的时... 阅读全文
posted @ 2010-11-10 10:19 RobinLao 阅读(1605) 评论(0) 推荐(0)
VBA用字典来替代函数的Vlookup
摘要：Excel里有Vlookup函数，查找匹配数据非常方便，在VBA里，也可以用worksheetfunction.vlookup方法来调用，今天我介绍一个另一种使用字典(dictionary)+数组的方法，速度也非常快。数据源图片：代码：源文件：dictionary 阅读全文
posted @ 2010-08-07 11:02 RobinLao 阅读(5899) 评论(0) 推荐(0)
VBA导入VFP的.dbf文件
摘要：Sub ImportVFPData() Dim i%, sql$ Dim cn, rst Set cn = CreateObject("adodb.connection") Set rst = CreateObject("adodb.recordset") Dim sql As String cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Extended Pr... 阅读全文
posted @ 2010-07-26 22:39 RobinLao 阅读(866) 评论(0) 推荐(0)
用VBA导出Excel里的图表为JPG文件
摘要：Sub ExportChart() Dim myChart As Chart Dim myFileName As String Set myChart = Sheet1.ChartObjects(1).Chart myFileName = "myChart.jpg" On Error Resume Next Kill ThisWorkbook.Path & "\" & myFile... 阅读全文
posted @ 2010-07-17 13:02 RobinLao 阅读(1320) 评论(0) 推荐(0)
用VBA来关闭其他程序
摘要：以关闭Winrar.exe为例，代码如下： 阅读全文
posted @ 2010-07-13 20:12 RobinLao 阅读(2198) 评论(0) 推荐(0)
VBA用shell命令来压缩文件
摘要：注：此代码只能压缩单个文件。压缩多个文件的需要传入一个压缩后的文件名，代码也差不多，不难，大家想想也就出来了。 阅读全文
posted @ 2010-06-06 23:00 RobinLao 阅读(846) 评论(0) 推荐(0)
在Excel里发Twitter
摘要：当然，发推前FQ那是必要滴。 阅读全文
posted @ 2010-05-07 23:46 RobinLao 阅读(406) 评论(0) 推荐(0)
Excel：一个连接文本的简单的方法
摘要：以前，连接文本用的是"CONCATENATE"函数或者“&”，不过在有许多单元格时候一个个点很麻烦，所以一般都我是自编一个VBA循环来连接。前些天，看到论坛上某人发现了一个函数的新用法，“PHONETIC”函数可以快速的连接，只需=PHONETIC(A1:C10)就可连接这个区域的所有文本数据，极大的省略了繁琐的步骤。不过可惜的是，这个函数不... 阅读全文
posted @ 2010-04-16 23:44 RobinLao 阅读(1182) 评论(0) 推荐(0)
VBA中的Msgbox
摘要：今天某论坛上看到有人问VBA里的Msgbox在C#里怎么没有了。刚学C#那会，我也迷惑了一阵，后来MSDN上一查，原来Msgbox在C#里改名字了：Messagebox.Show 。小知识，希望对从VBA到C#的初学者有用。 阅读全文
posted @ 2010-04-01 21:41 RobinLao 阅读(473) 评论(0) 推荐(0)
EXCEL里常用的几个正则表达式
摘要："^\d+$"　　//非负整数（正整数 + 0）"^[0-9]*[1-9][0-9]*$"　　//正整数"^((-\d+)|(0+))$"　　//非正整数（负整数 + 0）"^-[0-9]*[1-9][0-9]*$"　　//负整数"^-?\d+$"　　　　//整数"^\d+(\.\d+)?$"　　//非负浮点数（正浮点数 + 0）"^(([0-9]+\.[0-9]*[1-9][0-9]*)|([0... 阅读全文
posted @ 2010-03-13 23:42 RobinLao 阅读(9195) 评论(0) 推荐(0)
在EXCEL中列出OUTLOOK收件箱里所有的邮件
摘要：首先需引用你所用的OUTLOOK版本的库（2003为11.0，2007 12.0，2010 14.0） 阅读全文
posted @ 2010-03-11 23:56 RobinLao 阅读(865) 评论(0) 推荐(0)
禁止在EXCEL中CTRL+C的复制快捷键
摘要：Private Sub Workbook_Open() Application.OnKey "^{c}", ""End SubPrivate Sub Workbook_Deactivate() Application.OnKey "^{c}"End Sub 阅读全文
posted @ 2010-03-06 23:39 RobinLao 阅读(949) 评论(0) 推荐(0)
EXCEL从ACCESS中取值
摘要：ACCESS数据库界面EXCEL的窗体界面窗体中的代码：原文件可以去下面地址下载：http://u.115.com/file/f7df8e035b 阅读全文
posted @ 2010-03-03 22:01 RobinLao 阅读(1192) 评论(1) 推荐(1)
取单元格红色字体的VBA自定义函数
摘要：代码效果如下图： 阅读全文
posted @ 2010-03-02 22:20 RobinLao 阅读(1157) 评论(0) 推荐(0)
不打开另一个工作簿取它里面的工作表名
摘要：注意：1、没有真正意义上的不打开表，这个示例是用数据库引擎打开的，是一种隐式的打开方法。2、输出结果是按字母顺序排序的，而不是那个工作簿里面真正的表的顺序。 阅读全文
posted @ 2010-02-28 00:04 RobinLao 阅读(682) 评论(0) 推荐(0)
EXCEL表的自杀代码
摘要：[代码] 阅读全文
posted @ 2010-02-27 22:36 RobinLao 阅读(845) 评论(0) 推荐(0)
用VBA创建EXCEL表的桌面快捷方式
摘要：代码Code highlighting produced by Actipro CodeHighlighter (freeware)http://www.CodeHighlighter.com/-- 1 Sub CreatShortCut() 2 Dim WSHShell 3 Set WSHShell = CreateObject("WScript.Shell") 4 Dim MyShortcu... 阅读全文
posted @ 2010-02-26 20:42 RobinLao 阅读(643) 评论(0) 推荐(0)
隐藏EXCEL 2007的菜单栏
摘要：OFFICE 2007采用的Ribbon的概念，所以以前的commandbar().visible的方法在2007中是行不通的。VBA中的语句如下：[代码]VSTO中的代码如下[代码] 阅读全文
posted @ 2010-02-26 20:39 RobinLao 阅读(1048) 评论(0) 推荐(0)

1 2 下一页