VBA
小飞鱼通达二开
知识范围主要涉及SCJP 、MCP、CCNA、通达OA二次开发、OA系统及微信系统的系统集成与整合。对通达OA二次开发进行深入研究与探索,主要研究信息化软件系统的整合与开发工作。
展开
-
VBA 从一个Excel文件复制一行数据到另一个Excel文件
临时用到VBA,做一个需求:把不在同一个文件中的数据复制到一个文件中。 新建过程,如下:Sub 复制行() Dim mybook As Workbook Set mybook = Workbooks("2011明细表.xls") Dim target As Workbook Set target = Workbooks("详单.xls")原创 2011-12-22 10:56:44 · 80120 阅读 · 1 评论 -
VBA 查找特定值并选中整行
找到符合条件的数据并选中整行,以便进行下一步操作。Sub find() Dim mybook As Workbook Set mybook = Workbooks("2011明细表.xls") Set findValue = Worksheets("Sheet1").Columns("B").find(what:="永洲") Workshee原创 2011-12-22 11:14:50 · 16426 阅读 · 2 评论 -
Excel函数处理文档超链接及相关问题解决
一同事提出的问题:有几千篇Word文档存放在一个目录里,现在需要建立一个文档目录,其中目录中包括文档标题,并能链接到对应的文件上。这些文件之前因为是在OA系统上下载下来的附件,所以目录基本有个雏形,就是文档标题已有,现在的问题是word文档文件名和目录标题不完全一致,文件名前面还包括一串数字,应该是文档在系统中对应的流水号,如果文件名与标题不同就不能直接使用excel的拖拽功能,一个一个的链接原创 2012-07-18 11:04:48 · 1978 阅读 · 0 评论 -
VBA的力量 快速获取多个表格中的数据后导入到数据库(图文)
一个Excel表,每隔几天有一个汇率数据单独在一个sheet上,一共有好多张。现在需要把其中的汇率数据导入到数据库里。现在的思路就是:把每一个sheet中汇率单元格数据和sheet名取到然后复制到一张新的sheet里,循环一直把所有的sheet循环一遍就可。在VBA环境执行成功。原创 2013-11-11 11:38:03 · 8617 阅读 · 0 评论 -
VBA 把电信的电话费用表转换成部门电话费用明细表(图文)
今天同事要做一个这样的工作,就是把电信发来的费用表,转换成按部门划分的电话费用表,100多部电话,如果一个个去核对,真还是需要些时间的。问题来了,有更好的方法么,我们来看一下。电信公司给的费用明细是这个样子的,单个号码与费用合计并不在一起。先通过Excel的筛选功能,去掉号码的空格行,这样把号码和费用放的近一点,因为中间的数据行数不是固定的,这样至少只差一行,就好办多了。由原创 2014-11-12 15:18:40 · 2415 阅读 · 2 评论 -
VBA快速转换数据格式,将CBOT结算价历史数据导入数据库(图文)
最近处理的CBOT程序中,有一个CBOT的历史数据需要导入到数据库里,可是表的格式比较特别。由于表格数据比较特殊,采用了一下手工辅助处理的方法,期待你有更好的方法。原创 2014-08-18 16:56:05 · 2023 阅读 · 0 评论