??
原理：
Excel文档里面的图片都是Shape对象，遍历ActiveSheet的Shapes集合；将对应的Shape对象，设置到临时变量中；在当前的Sheet里面添加ChartObject对象，并用前面取到的Shape的宽和高设置ChartObject对象的区域大小；调用Shape对象的Copy方法，将其拷贝到剪切板；激活前面创建的ChartObject对象，使用其对应的Activa...
分类：
编程语言 时间：
2014-11-13 22:33:07
阅读次数：
208
今天同事要做一个这样的工作，就是把电信发来的费用表，转换成按部门划分的电话费用表，100多部电话，如果一个个去核对，真还是需要些时间的。问题来了，有更好的方法么，我们来看一下。
电信公司给的费用明细是这个样子的，单个号码与费用合计并不在一起。
先通过Excel的筛选功能，去掉号码的空格行，这样把号码和费用放的近一点，因为中间的数据行数不是固定的，这样至少只差一行，就好办多了。
由...
分类：
移动开发 时间：
2014-11-12 16:39:05
阅读次数：
223
Option Explicit' ▽▽▽▽▽▽▽▽▽▽▽▽▽▽▽▽▽▽' Excel对象' △△△△△△△△△△△△△△△△△△' OpenPublic Function FileOpen_ByExcel(ByVal FileName As String, ByRef Target As Workb...
分类：
编程语言 时间：
2014-11-11 10:35:25
阅读次数：
167
过程是执行一个或多个给定任务的集合。分成：子程序和函数。1.子程序[Private|Public|Friend] [Static] Sub name [(arglist)][staements][Exit sub][statements]End SubFriend 表示Sub在整个工程可见，但对象实...
分类：
编程语言 时间：
2014-11-09 15:06:46
阅读次数：
201
I had the exact same problem in Outlook 2010 64 bit.It seems to occur if you had something that was previously signed in an earlier version of Outlook...
分类：
编程语言 时间：
2014-11-08 23:24:26
阅读次数：
325
1. On Error GoTo line line 参数可以是任何标签或行号，且该line必须在该过程中；2. On Error Resume Next 当程序运行时发生错误时，转到错误语句下一行执行3. On Error Goto 0 禁止错误程序处理
分类：
编程语言 时间：
2014-11-08 19:34:23
阅读次数：
189
1、判断Excel文件是否已打开以及自动打开文件Function openWorkbook(ByVal fileName, ByVal filePath) On Error Resume Next If Len(Workbooks(fileName).Name) "" i...
分类：
编程语言 时间：
2014-11-05 14:43:55
阅读次数：
316
End(3)=End(xlup)，那End(1), End(2), End(4)分别等于什么？还有别的End(数字)吗？其中1代表：xlToLeft其中2代表：xlToRight其中3代表：xlup其中4代表：xldown 简记 左右上下，1，2，3，4EnumXlDirectionxlDown=-...
分类：
编程语言 时间：
2014-11-04 00:07:16
阅读次数：
390
读罢《EXCEL专业开发》，最大的震撼就是著者对VBA技术的追求以及对Excel艺术品般的设计。受到此书著者的启发，也打算把自己在日常开发中一些经验总结出来，一来作为自己的知识储备，二来也能在网络上分享。 Excel公式、函数以及自身单元格的格式化为UI的设计提供了极大的便利性，这方面的内容在《Ex...
分类：
编程语言 时间：
2014-10-30 16:58:25
阅读次数：
246
