一 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...
转载
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...
转载
2018-03-22 03:26:00
643阅读
2评论
径向渐变与其他渐变相同,径向渐变是一个不固定尺寸的图片,譬如,它没有默认尺寸、比例。具体尺寸由它所定义的元素尺寸决定。径向渐变(Radial gradients)由其中心点、边缘形状轮廓及位置、色值结束点(color stops)定义而成。径向渐变的中心点至边缘形状以及其延伸的部分,由连续缩放的若干同心轮廓组成,这个轮廓由设定的边缘形状决定。径向渐变的中心点至边缘形状以及其延伸的部分是由连续缩放的
转载
2023-09-26 09:32:55
93阅读
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
转载
2024-08-09 17:46:52
187阅读