- 博客(19)
- 收藏
- 关注
RSS订阅原创 VBA Application 的四大方法
findfilefindfile 就是打开一个问题如果打卡成功，则返回为trueSub b()a = Application.FindFileMsgBox aIf a = True ThenMsgBox "dd"ElseMsgBox "tt"End IfEnd Subgetopenfilename这个函数和findfile有点不一样，这个函数是不会打开相关文件的，只会返回...
2020-03-25 16:08:30
3066
原创 VBA 输入输出对话框
inputboxprompt：=提示文字title：=最上面的那个字default：=默认值，如果你啥都不写，那就是这个默认值xpos：=左端与屏幕左端的距离ypos：=顶端与屏幕顶端的距离...
2020-03-25 13:40:31
3693
原创 vba ActiveX和普通窗体
普通窗体添加好之后右键-设置控件格式-控制选项卡中设置一下ActiveX自己往这里面写宏也可以，专属的那种，这个发生了什么，然后宏怎么怎么样的区别普通的窗体一般只能制定一个宏程序，或者本身的就弄弄表就完事了，但是activex这个东西，他的变动可能就直接影响了vb程序的变化...
2020-03-24 18:20:03
371
原创 vba 自动化事件
mousemovePrivate Sub C_MouseMove(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)Dim l As Integer, t As Singlel = Int(Rnd() * 10 + 125) * Int((Rnd() * 3 + 1) -...
2020-03-20 17:18:33
290
原创 vba workbook触发事件
这种涉及到book的触发事件，就需要写在thisworkbook里面了open一打开那个book，就自动触发业务Private Sub Workbook_Open()MsgBox ("奥利给兄弟们")End Subbeforeclose在关闭我的book之前，给我执行的操作Private Sub Workbook_BeforeClose(Cancel As Boolean)if...
2020-03-20 16:23:49
2134
原创 vba worksheet事件（常用的4大事件）
worksheet事件一定要写在worksheet里面，就是当操作worksheet的时候,会触发的事件。changePrivate Sub Worksheet_Change(ByVal Target As Range)msgbox Target.addressmsgbox Target.value‘Target 就是目标单元格，就是经过修改了之后的单元格End Subselect...
2020-03-20 14:37:46
8311
1
原创 VBA典型的技巧和示例
创建一个工作簿sub xxx（）dim wb as workbook ，sht as worksheet ‘定义对象set wb=workbook.add set sht=wb.worksheet(1)with sht.name="woqu".range("A1:A7")=array("1,""2","3")end withwb.saveas thiswork.path &...
2020-03-16 18:59:08
438
原创 VBA range
range（“A1”）=100range（“A1”）.value=100range（“A1：A10”）=100range（“A1：A10”）.value=100range（“date”）.value=100 选中单元格已经被命名为date了range（“A1：A10，B3：C6,G6：I8”）.SELECT 选中这三个区域range（“A1：A10 B3：C6 G6：I8”）.SEL...
2020-03-12 11:19:26
1002
原创 excel worksheet
引用worksheets（1）worksheets.item（1）worksheets.（“sheet1”）activesheet.codename 当前活动工作表名称操作worksheets.addworksheets.Add before:=worksheets(1) 第一张工作表前插入worksheets.Add after:=worksheets(1)...
2020-03-10 18:45:34
968
原创 excel workbook
引用不同的workbook1.索引号workbooks.item（3）=workbooks（3）2.名称当新建的文件，并没有保存的时候workbooks(“book1”)当已经存在的文件，要加上后缀workbooks(“book1.xls”)workbook信息cells（1,1）=thisworkbook.namecells（1,1）=thisworkbook.pathce...
2020-03-06 16:50:18
722
原创 excel application
ScreenUpdatingapplication.screenupdating = false此时此刻，执行的过程不再显示出来application.screenupdating = true此时此刻，执行的每一过程都被显示出来sheet.delete 和 displayalertsapplication.displayalerts = false不显示警告信息了enablee...
2020-03-06 16:15:28
359
原创 excel sub和function和易失性函数
sub【public】 sub xxx（） ‘public可有可无，代表这各个模块都可以引用end subprivate sub xxx（）’private必须写，代表只有这个模块可以引用end sub但是如果在最开始就声明，option private module，则无论下面有什么样子的声明，这个模块里面的统统都是私有过程私有模块下，宏补不显示在宏对话框内调用1....
2020-03-05 19:51:37
579
原创 excel 判断2和循环3
判断ifif xxx thenelse ‘可有可无 end ifselect caseselect case timecase is < 0.5干什么case 0.5 to 1干什么case is >1 干什么case else ’可有可无干什么end select循环FOR NEXTFOR i=1...
2020-03-05 11:48:11
136
原创 excel 基础语法 对象属性集合方法
对象application.workbooks（“book1”）.worksheets（“sheet2”）.range（“a2”）一般情况下是四层application–excel程序workbooks（“book1”）–excel里面的那个本本worksheets（“sheet2”）–book里面的sheetsrange（“a2”）—最后的对象方法和属性xxx。出现了东西，绿色的...
2020-03-05 00:23:12
362
原创 excel 基础语法 数组
数组一维数组dim arr（0 to 49） as string = dim arr（49） as string都是从0开始，一共50个数组dim arr（1 to 50） as string这样就可以数组从1开始了、二维数组dim arr（2，19）这就是二位数组了动态数组当我不知道我的数组要设置多大的时候，怎么办我先来dim arr（） as string，n as l...
2020-03-04 17:25:48
629
原创 excel 基础语法 变量2
定义的初级用法dim 变量名（自己起的名字） as 变量（string）dim str as string , aaa as single(中间的一个逗号可以定义两次)dim str$ = dim str as string定义的高级用法强制定义：option explicit（就是所有的变量必须定义）dim or static ：这个变量只能单个过程可以使用（写在sub里面）di...
2020-03-04 00:54:32
462
原创 excel 基础语法 变量相关
数字：decimal（几本上属都行）integer（小整数）long （长整数）single（短小数） double（长小数）byte （特别小的整数）布尔：boolean字符串：string日期：date...
2020-03-04 00:22:16
152
原创 第一章 EXCEL背景知识2
录制宏1.效率不高，因为存在activate，select，或者滚动屏幕等相关冗余单元格2.循环，判断，控件等相关操作无法记录在宏里面运行宏1.快捷键（录制的时候设置的）2.宏可以指定给形状，按钮，甚至图片！单击图片既可运行制定的宏...
2020-03-03 01:02:20
96
原创 第一章 EXCEL背景知识1
开发工具开发工具是从文件，选项中调取出来的代码：就是写vba，管理宏的一个地方加载项：管理一些加载插件相关东西控件：对话框相关的，也就是设计相关交互页面的东西XML：网页相关知识宏功能的其他方式（3种）视图下面也有宏相关的东西就绪旁边的小方块一打开就是宏录制右键工具栏之后有宏录制保存宏的文件格式二进制工作薄（xlsb）以m结尾的文件格式（xlsm，xltm，xlam）安全...
2020-03-03 00:50:52
173
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人