首先需要引用Microsoft的DLL,打开references管理器勾上Microsoft XML接下来便可以使用MSXML DOM(如果不清楚MSXML的,科普)创建文档对象、节点、节点列表Dim xmlDom As MSXML2.DOMDocument Dim xmlNode As MSXML2.IXMLDOMNode Dim xmlNodeList As MSXML2.IXMLDOMNod
转载 5月前
41阅读
VBA 生成文件方法:使用 ADODB.Stream 生成文件,通过控制文件的后缀,应该是什么文件都可以生成。Dim WriteStream2 As Object '定义一个对象 Set WriteStream2 = CreateObject("ADODB.Stream") '创建一个 ADODB.Stream 对象 With WriteStream2 .Type = 2
VBA 类模块学习1  问题背景2  创建自己的对象3  属性过程4  创建集合4.1  `Collection` 对象创建集合4.2   在类模块中创建集合5  封装 本文中,大部分内容源于书籍《Excel 2007 VBA 参考大全》,ISBN:9787115311696。感谢原书第一作者及译者。 工作表模块、图表工作表模块、工作簿模块和用户窗体模块都是类模块。不过,这些模块都是特定类型的类
转载 7月前
70阅读
2.1.8  Function过程,也就是我们经常提到的函数过程。对于函数,我给出了一个更为确切的定义,这个定义我在各个平台上均有发表和阐述,我给出的定义如下:如果对于唯一性输入值value,输出(或者return)的值也具有唯一性(这种输入或者输出的值没有个数的限制),那么具有这种变化关系的输入和输出关系,就称为输出是输入的函数.而Function函数过程就是特别强调的这种输入和输出的
大家好,我是东哥。经常给大家推荐好用的数据分析工具,也收到了铁子们的各种好评。这次也不例外,我要再推荐一个,而且是个爆款神器。Excel和Jupyter Notebok都是我每天必用的工具,而且两个工具经常协同工作,一直以来工作效率也还算不错。但说实在,毕竟是两个工具,使用的时候肯定会有一些切换的成本。最近,在逛GitHub突然发现了一款神器「PyXLL-Jupyter」,它可以完美将Jupyte
Sub 宏1() ' ' 宏1 宏 ' ' Range("E3:E33").Select Selection.Copy tyear = 2010 tmonth = 1 For startIndex = 3 To 2701 Step 31 '2436 Range("E" & startIndex).Se...
VBA
转载 2018-03-22 03:26:00
614阅读
2评论
 range().resize(x,y) 方法语法Range(i,j).resize(行数,列数)   resize(x,y) 表示的区域,x是行,往下。Y是列,往右。重新定位出来的区域 resize() 得出的是一个区域范围!!!因为X 是表示行数,必须大于0因为Y是表示列数,必须大于0resize(x,y)可以为负数吗?比如 resize(-1
转载 3月前
334阅读
VB控件和对象:ScriptControl 控件3. ScriptControl 控件    Microsoft Script Control 控件可以创建运行任何 ActiveX(R) scripting 引擎,例如 Microsoft(R) Visual Basic (R) Scripting Edition 或Microsoft(R) JScript(TM) 的
转载 2023-08-21 17:25:01
678阅读
1. 在工具栏中将"开发工具"菜单调出来,点击VBA script或者快捷键ALT+F11, 打开编程窗口 1. 下拉列表:选中要处理的单元格 数据 数据验证(数据有效性) 序列 输入示例:1,2,3 1. function和sub最大区别在两点 1.function可以返回值,sub则不可以返回值
转载 2017-05-24 08:47:00
821阅读
2评论
ThisWorkbook 返回一个 Workbook 对象,该对象代表当前宏代码运行的工作簿 Screenupdating Application的一个属性,是Boolean 数据类型,意思是屏幕窗口刷新是否打开,Application.Screenupdating=False,意思是屏幕窗口刷新关闭,可以加快程序运行,加在程序开头;Application.Screenupdating=True,意思是屏幕窗口刷新打开,加在程序结尾。以上两句应在程序调试好之后再添加。 VBA程序一般需要在开头结尾加上Screenupdating控制语句,以加快程序运行 Calculation Applica.
转载 2010-04-09 10:13:00
672阅读
2评论
在编写代码时,常需要依据指定内容在指定区域查找符合条件的单元格,这时就需要用查找的方法。在工作表中,可以执行【编辑】/【查找】命令查找指定的单元格,同样也可以利用在公式中使用Match 等函数对单元格进行查找。工具/原料 Excel 2013一、Find查找 1单元格范围.Fing. (查找内容,查找开始位置,搜‘索范围,单元格区配γ 搜索方式,搜索类别,区分大小写,区分全/半
转载 6月前
390阅读
如果需要制作如图1所示的产品目录,因为所需图片的尺寸通常并非完全一致,所以除了插入图片,还需要调整图片的尺寸以适应"图片"列单元格的大小。使用VBA可以快速完成这一系列繁杂的操作,示例代码如下。Sub InsertPictures() Dim lngRow As Long Dim objShape As Shape Dim objTargetCell As Range
VBA术语这些术语将在很多的模块中使用,因此理解其中的每一个术语都很重要。模块模块是编写代码的区域。如下图中,这是一个新的工作簿,因此没有任何模块。要插入模块,请导航到插入 -> 模块。当插入模块之后,就会有一个名称为“模块1”的模块被创建了。插入模块完成之后,就可以在模块中编写VBA代码,代码写在一个过程(Sub)中。 一个过程/子过程是一系列的VBA语句,指示要做什么工作。程序/过程程序
目录使用 Do...Loop 语句直到条件为 True 时重复语句直到条件变成 True 才重复语句从循环内退出 Do...Loop 语句使用 For...Next 语句使用 For Each...Next 语句对某范围的单元格做循环在完成前退出 For Each...Next 循环使用 Do...Loop 语句可以使用 Do...Loop 语句去运行语句的块,而它所用掉的时间是不确定的。当条件为
在做人事系统过程中,发现网上关于Javascript与VBA交互的知识比较匮乏,为此我把自己对这方面的研究和大家分享下,希望能填补大家对这片知识的空白。 先向大家介绍一些简单应用,比如JS创建Word文档、在Word中打印文字、添加表格,填充表格、合并表格var wdapp = new ActiveXObject("Word.Application"); //引用word wdapp.visibl
转载 2023-06-09 19:48:10
305阅读
辨析Empty,Null和Nothing在VBA中变量一般都是强类型的,即总声明成Integer,Long,Single,Double,String或Date等类型,这些强类型的值毋需考虑Empty、Null和Nothing。有时我们需要定义一种能包含所有类型的变量,这种类型就是Variant,它是一种特殊的数据类型,可以包含数值、字符串或日期数据,还包含自定义类型、对象(Object)和特殊数值
一、文件格式要使用VBA,excel文件必须保存为启用宏的工作簿,即xlsm格式。 二、启动VBA编辑器打开工作簿后,要启动VBA编辑器,有两种方法,一是在工作表的名字上面点击右键,选择“查看代码”,另一种就是快捷键Alt+F11 三、工程资源管理器简介VBA编辑器右边的树形目录就是工程资源管理器,如下图,列示了一个工程(VBAProject)及其下面的各个对象。一个工作簿就是
参考:http://msdn.microsoft.com/zh-cn/library/ktwtk9ff%28v=VS.80%29.aspx件→ KeyPress事件的语法如下:KeyANSI只是个参数,所以可以改成任何喜欢的名字,每键入一个值的时候,都会触发KeyANSI,通过设置,可以实现限制默写值的键入。 → KeyDown事件    按下触发 → KeyUp事件
一 数组 array1.1 什么是数组?具体的例子以这个语句为例子arr1=array(1, 2, 3)左边:变量名=数组名 右边:数组,集合,多个元素集合,多个数据集合,右边的单个内容,1,2,3 是数组的元素/下标变量每个元素存储时,会标记1个(看不见的 )index 索引 下标 1.2 什么是数组,抽象的定义:数组也是变量,是一种可存储多个数据的特殊变量VBA或其他语言里
 '1、工作簿(Workbooks) ' Workbooks(N)第N个工作簿 ' Workbooks ("工作簿名") ' ActiveWorkbook 活动工作簿 ' ThisWorkBook '代码所在工作簿 '2、工作表(Worksheets) 'Sheets(N) 第N个工作表 'Sheets("工作表名") 'Sh
  • 1
  • 2
  • 3
  • 4
  • 5