VBA 与对象1.1 VBA 基础application 就是 VBA里的 Aapplication 就是 EXCEL程序,VBA寄生的这个宿主工具,估计也可能是WORK,PPT等EXCEL程序下,可能开启很多EXCEL工程(多个EXCEL表)1.2  Application 即 excel , excel 就是 VBA的最大对象集合EXCELwordPPT1.3 什么是
最近一直在研究VBA,写报表的工作。将所得的知识,经验总结一下,与大家分享。工具篇,VBA1.EXCEL一个最好用的功能就是录制宏,当一个函数拿不准要怎么写,用什么函数表示的时候,录制就帮了大忙了。2.VBA相对于录制的宏,可以更精确,更聪明,逻辑更清晰,执行也更有效。特别是它的循环和递归,直接解放了人的双手。3.VBA的基本操作(1)定位:基本单位:sheets(页),Rows(行),Colum
转载 2024-08-26 14:24:00
534阅读
数组是包含相同数据类型的一组变量的集合,对数组中的单个变量引用通过数组索引下标进行。在内存中表现为一个连续的内存块,必须用Global或Dim语句来定义。定义规则如下:Dim 数组名([lower to ]upper [, [lower to ]upper, ….]) as type ;Lower缺省值为0。二维数组是按行列排列,如XYZ(行,列)。除了以上固定数组外,VBA 还有一种功能强大的动
转载 2024-02-25 05:20:17
271阅读
本文基于以下文件http://pan.baidu.com/s/1nvJtsu9(部分)内容预览:1. 边框样式Sub cell_format() Dim sht As Worksheet Dim rng As Range Set sht = Worksheets("Parameter") Set rng = sht.Range("B2:C20")
转载 2024-03-24 14:45:24
427阅读
AutoCAD VBA对象的组合和拆散,很好用的操作,代码如下。 Sub AddUnNameGroup() Dim SelObjects As AcadSelectionSet Dim appendObjs() As AcadEntity Set SelObjects = GetSelSet Dim UnNameGroup As Aca...
CAD
转载 2011-03-22 21:11:00
283阅读
2评论
1 VBA和EXCEL使用符号常数有语法差别1.1 语法差别比如EXCEL里使用char(10)VBA中只能写成 chr(10)VBA的语法错误,VBE没有把第1个首字母大写就应该看出来    char(13) 是错误的 1.2  举例: chr(32) 类空格MsgBox "hello" & Chr(32) & "world" &
我们先来看看SetWindowPos函数的定义和参数:    使用API函数之前必须先在程序中声明如下: Private Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx A
转载 2024-04-19 07:40:30
426阅读
  文件中特定字符串的寻找与替换是一种极其常见的操作,在Win95中,可以很容易地使用"写字板"、"Word"等软件的"替换"功能在某个文件中完成寻找替换的工作,而如果要在多个文件中进行寻找替换,则需费一翻精力。针对这一问题,笔者用Visual Basic 5.0编制了一个小程序,使用它可以快速地完成在多个文件中查找与替换的任务。 正文:  众所周知,文本文件中特定字符串的寻找与替换是一
转载 2024-01-01 12:23:30
200阅读
1.创建Excel对象   eole=CREATEOBJECT(′Excel.application′)   2.添加新工作簿   eole.Workbooks.add   3.设置第3个工作表为激活工作表   eole.Worksheets(″sheet3″).Activate   4.打开指定工作簿   eole.Workbooks.Op
转载 2024-09-27 09:31:36
133阅读
我用的是Oracle 11g + Microsoft Office 2010 旗舰版  首先要添加引用类库:   Microsoft ActiveX Data Objects Recordset 6.0(或者2.8)Library   Microsoft Activex Data Objects 6.1(或者2.8) Library   链接Ora
原创 2013-04-23 21:28:09
2931阅读
# 实现"python 列表相同位置组合"的教程 ## 介绍 作为一名经验丰富的开发者,我将向你介绍如何在Python中实现列表的相同位置组合。这是一个常见的需求,尤其对于新手来说可能会有些困惑。在本文中,我将逐步引导你完成这个任务。 ### 流程图 ```mermaid flowchart TD A(开始) B(创建两个列表) C(组合列表) D(输出结果)
原创 2024-03-12 06:09:14
59阅读
# Android 组合view 时获取位置失效解决方法 ## 引言 作为一名经验丰富的开发者,我将帮助你解决在 Android 开发中组合 view 时获取位置失效的问题。在本文中,我会详细介绍整个解决问题的流程,并提供每一步需要做的具体操作和代码示例。 ## 解决流程 首先,让我们通过一个表格展示整个解决问题的流程: ```mermaid journey title 解决 A
原创 2024-03-14 03:48:10
24阅读
VBA 类模块学习1  问题背景2  创建自己的对象3  属性过程4  创建集合4.1  `Collection` 对象创建集合4.2   在类模块中创建集合5  封装 本文中,大部分内容源于书籍《Excel 2007 VBA 参考大全》,ISBN:9787115311696。感谢原书第一作者及译者。 工作表模块、图表工作表模块、工作簿模块和用户窗体模块都是类模块。不过,这些模块都是特定类型的类
转载 2024-02-16 20:18:09
155阅读
最近要做个项目,通过 Dim element1, element2Dim i As IntegerSet element1 = NothingSet element2 = Nothing    For i = 0&nb
原创 2008-06-02 18:07:00
1849阅读
理论犹似灯一盏,认清道路好向前。胸无成竹唯蛮干,盲人瞎马临深渊。基础性的知识,你能跳过去,我就不信!古人云:术业有专攻。但目前有一种怪现象,搞测量的去深究标准,搞公差去深究测量,大而不强,有啥用?陷入一个误区,何时休。。。
转载 2021-08-13 15:37:17
5624阅读
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
643阅读
2评论
径向渐变与其他渐变相同,径向渐变是一个不固定尺寸的图片,譬如,它没有默认尺寸、比例。具体尺寸由它所定义的元素尺寸决定。径向渐变(Radial gradients)由其中心点、边缘形状轮廓及位置、色值结束点(color stops)定义而成。径向渐变的中心点至边缘形状以及其延伸的部分,由连续缩放的若干同心轮廓组成,这个轮廓由设定的边缘形状决定。径向渐变的中心点至边缘形状以及其延伸的部分是由连续缩放的
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
782阅读
 range().resize(x,y) 方法语法Range(i,j).resize(行数,列数)   resize(x,y) 表示的区域,x是行,往下。Y是列,往右。重新定位出来的区域 resize() 得出的是一个区域范围!!!因为X 是表示行数,必须大于0因为Y是表示列数,必须大于0resize(x,y)可以为负数吗?比如 resize(-1
转载 2024-06-09 08:57:37
788阅读
大家好,我是东哥。经常给大家推荐好用的数据分析工具,也收到了铁子们的各种好评。这次也不例外,我要再推荐一个,而且是个爆款神器。Excel和Jupyter Notebok都是我每天必用的工具,而且两个工具经常协同工作,一直以来工作效率也还算不错。但说实在,毕竟是两个工具,使用的时候肯定会有一些切换的成本。最近,在逛GitHub突然发现了一款神器「PyXLL-Jupyter」,它可以完美将Jupyte
  • 1
  • 2
  • 3
  • 4
  • 5