阅文时长| 0.34分钟字数统计| 550.4字符 主要内容| 1、引言&背景2、分析&解决原理3
原创
2022-11-22 10:14:44
625阅读
VBA 类模块学习1 问题背景2 创建自己的对象3 属性过程4 创建集合4.1 `Collection` 对象创建集合4.2 在类模块中创建集合5 封装 本文中，大部分内容源于书籍《Excel 2007 VBA 参考大全》，ISBN：9787115311696。感谢原书第一作者及译者。 工作表模块、图表工作表模块、工作簿模块和用户窗体模块都是类模块。不过，这些模块都是特定类型的类
转载
2024-02-16 20:18:09
155阅读
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评论
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
788阅读
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阅读
1. 在工具栏中将"开发工具"菜单调出来，点击VBA script或者快捷键ALT+F11, 打开编程窗口 1. 下拉列表：选中要处理的单元格 数据 数据验证(数据有效性) 序列 输入示例:1,2,3 1. function和sub最大区别在两点 1.function可以返回值，sub则不可以返回值
转载
2017-05-24 08:47:00
923阅读
2评论
ThisWorkbook 返回一个 Workbook 对象，该对象代表当前宏代码运行的工作簿 Screenupdating Application的一个属性，是Boolean 数据类型，意思是屏幕窗口刷新是否打开,Application.Screenupdating=False，意思是屏幕窗口刷新关闭，可以加快程序运行，加在程序开头；Application.Screenupdating=True，意思是屏幕窗口刷新打开，加在程序结尾。以上两句应在程序调试好之后再添加。 VBA程序一般需要在开头结尾加上Screenupdating控制语句,以加快程序运行 Calculation Applica.
转载
2010-04-09 10:13:00
732阅读
2评论
在编写代码时，常需要依据指定内容在指定区域查找符合条件的单元格，这时就需要用查找的方法。在工作表中，可以执行【编辑】／【查找】命令查找指定的单元格，同样也可以利用在公式中使用Match 等函数对单元格进行查找。工具/原料 Excel 2013一、Find查找 1单元格范围.Fing. （查找内容，查找开始位置，搜‘索范围，单元格区配γ 搜索方式，搜索类别，区分大小写，区分全／半
转载
2024-03-04 17:04:38
666阅读
VBA术语这些术语将在很多的模块中使用，因此理解其中的每一个术语都很重要。模块模块是编写代码的区域。如下图中，这是一个新的工作簿，因此没有任何模块。要插入模块，请导航到插入 -> 模块。当插入模块之后，就会有一个名称为“模块1”的模块被创建了。插入模块完成之后，就可以在模块中编写VBA代码，代码写在一个过程(Sub)中。 一个过程/子过程是一系列的VBA语句，指示要做什么工作。程序/过程程序
转载
2024-04-18 14:21:55
401阅读
目录1. 代码基本结构2. 基础操作：对单元格3. 赋值4. 格式设置5. 逻辑6. 说明1. 代码基本结构Sub name() '定义一个函数'
'代码主体'
End Sub2. 基础操作：对单元格'选择单元格'
Sub CellSelect()
'选中单个单元格'的三种等价表示
'Example 1'
Cells(3,1).Select '选
转载
2023-06-30 11:31:46
745阅读
前言：大家好，这里是Seon塞翁。当你收集了 n 个人的 EXCEL 记录表，需要将它们汇成一个总表时你会怎么做呢？如果不通过技术手段，要一个个打开再复制粘贴也太麻烦了吧！此时就需要一个通过几秒钟的点击就能完成合并的工具。 文章目录一、合并 EXCEL1、VBA 实现合并2、Python 实现合并二、拆分 EXCEL1、VBA 实现拆分2、Python 实现拆分 一、合并 EXCEL1、VBA 实
转载
2023-08-18 22:54:59
141阅读
[内容为转贴,感谢原作者]
转载
2024-08-17 09:31:45
111阅读
Sub 产品图片导出重新对应命名()
Dim Ad$, FileName$, sfolder$, Shp As Shape, FSO
Application.ScreenUpdating = False
On Error Resume Next
Set FSO = CreateObject("Scripting.FileSystemObject")
转载
2023-06-27 21:59:20
206阅读
大家好，今日我们继续讲解数组与字典解决方案，今日讲解第47讲：利用字典和数组，实现按指定规则的排序。随着字典讲解的深入,我们发现字典真的很神奇,在VBA代码中,给人以十分清爽的感觉,在这套数组与字典解决方案中,我会尽可能的把经常用到的实例多多讲解给大家,让大家对于字典的理解更加深入.虽然这块内容利用其它方案都可以实现,但是字典确实能大大简化我们的代码.让我们对于VBA的理解更深入.今日实例是实现按
转载
2024-04-24 21:12:22
449阅读
因为数组也是变量，所以，你必须用声明其它变量的类似方法声明数组——使用Dim语句。当你声明一个数组时，你便设定了该数组储存数据所需要的内存空间。数组声明的例子：Dim cities(6) As String
Dim daysOfWeek(7) As String
Dim lotto(6) As Integer
Dim exchange(5, 3) As Varian注意，变量名称后面带有括号以及括
转载
2024-03-21 10:22:09
378阅读
VBA取得EXCEL表格中的行数和列数请注意不要使用Columus等关键字作为变量，例如"Columus = ActiveSheet.UsedRange.Columns.Count"！初学EXCEL宏的童鞋，总是很想知道表格中含有数据的行数和列数，尤其是行数和列数不确定的情况下。这样可以避免很多的错误，并且可以提高效率。但每次用到的时候到网上查找时，总是给了很多无用的答案，往往找不到想要的结果。笔
转载
2024-05-25 16:39:02
239阅读
1.首先我们来看一下分页显示的效果2.要想作出分页的效果，必须要用listview控件实现，一般来说在窗体工具箱中并没有这个控件，所以我们要自己添加，打开窗体工具箱，在空白处右键-->附加控件-->选择microsoft listview control,version 6.0-->确定就好了，其使用方法和其他控件的使用方法是一样的，拖动到窗口就可以使用了3.首先我们来了解一下l
转载
2024-08-22 21:00:28
879阅读
例一、用cells(行，列)定位Private Sub CommandButton1_Click()Cells(12, 6) = IIf(Cells(1, 2) > 80, "优秀", "不优秀")'cells(2,3)表示第12行第6列位置显示后面的判断内容结果Cells(13, 6) = IIf(Cells(1, 11) <> "", "第一行第1列的内容是：" &
转载
2024-02-15 14:24:51
341阅读
第十二部分 ActiveX控件一、ActiveX控件属性ActiveX控件英文名称中文名称特殊属性通用属性CommandButton命令按钮caption\enable\visibleleft\top微调按钮无caption属性Label文本框OptionButton单选按钮GroupName、ValueSpinButton微调按钮控件Value、min、max案例：选择题考试系统Dim max1
