下面是利用VBA遍历Excel sheet的例子，可以用于Excel的批量处理。Sub Insert_CodeString()Dim fs, ft As ObjectDim xlApp As Excel.ApplicationDim xlBook As Excel.WorkbookDim xlShe...
分类：
编程语言 时间：
2015-12-11 18:47:24
阅读次数：
257
下面是利用VBA导出文件的例子，可以导出Excel内容等其他可以使用VBA的地方。Sub export_file() Dim fs, ft As Object Dim txtname As String txtname = "export_file" Set fs = Cre...
分类：
编程语言 时间：
2015-12-11 18:32:18
阅读次数：
186
主要思想是先给单元格设置名称，再设置超链接代码如下：Sub creat_link()Dim Source As StringSource = "t1"Dim Target As StringTarget = "t2"Dim i As Integeri = 1Dim j As Integerj = 1...
分类：
编程语言 时间：
2015-12-11 18:20:47
阅读次数：
233
开发环境基于VSTO，具体配置：visual studio 2010，VB .Net，excel 2007，文档级别的定制程序。如题，我在ThisWorkbook.vb中添加了一个public函数来完成查找功能。 入参：待查找的sheet名称 返回：如果存在则返回worksheet对象，如果不存在....
分类：
其他好文 时间：
2015-12-09 01:50:54
阅读次数：
218
在BOM中记录中有物料编码，物料名称，物料规格等，而且依据BOM已经生成了相应的文件，如采购规格书，检验规格书等，这个时候需要获得这些文件的标题，并且生成一个列表，可以使用下面的VBA代码，具体代码如下：Function IsFileExists(ByVal strFileName As Strin...
分类：
其他好文 时间：
2015-12-04 18:19:24
阅读次数：
201
在BOM中记录中有物料编码，物料名称，物料规格等，而且依据BOM已经生成了一些的文件，如采购规格书，这个时候需要生成相应的检验规格书模板，可以使用下面的VBA代码，具体代码如下：Function IsFileExists(ByVal strFileName As String) As Boolean...
分类：
其他好文 时间：
2015-12-04 18:12:08
阅读次数：
139
各位朋友好！我是ryueifu，通过这篇博客，和大家探讨一下VSTO开发。我一直是从事OfficeVBA，VB6研究的，前几年就听说VSTO很强大，将会替代VBA，但是自己没什么C#基础，就一直没有转行。后来安装了VSTO2012后，先是做几个简单的WindowsForm，熟悉了C#语法规则，接着就学着创建Of..
分类：
编程语言 时间：
2015-12-03 15:47:56
阅读次数：
1072
VBA中大漠插件的调用[ V2.1133 ]-首先要在电脑中注册大漠插件，系统暂不支持windows 8 ；如想获得更好的体检请购买收费版本大漠插件；-代码如下；========================Private Declare Sub Sleep Lib "kernel32" (ByV...
分类：
编程语言 时间：
2015-11-27 16:55:54
阅读次数：
262
最近需要做一个一劳永逸的XML文档生成，给项目内部专用的，直接VBA方便了，才第一次用。现学现卖了。。。。抽时间还是系统的学习下这方面的知识吧输出到UTF-8编码的XML文档。并且换行符是Unix的\n换行符。 1 Sub WriteToXml() 2 3 Dim FilePath As ...
分类：
编程语言 时间：
2015-11-24 21:07:31
阅读次数：
396
1.录制新宏。2.停止录制3.删除宏内原有所有内容4.粘贴以下代码进去5.运行宏。6.OK！ PublicSubAllInternalPasswords()'Breaksworksheetandworkbookstructurepasswords.BobMcCormick'pr...
分类：
编程语言 时间：
2015-11-24 01:02:58
阅读次数：
289
