随笔分类 -  excell操作及VBA编程学习记录

VBA-字典与用户界面设计+ACCESS系统开发
摘要：1，字典：就是一个数组 只有两列 作用：去重复 使用字典首先得勾选工具中的 然后才可以使用 Sub test2() Dim dic As New Dictionary dic.Add "张三", 3000 dic.Add "李四", 2000 dic("李四") = 8000 Range("a10" 阅读全文
posted @ 2020-05-06 10:55 我是小旋风 阅读(1258) 评论(0) 推荐(0)
VBA-触"类"旁通-类模块
摘要：公有与私有 Private Sub test() 'privete私有的，这有在这个模块下可以被调用，相反为 public公有的 MsgBox "aaa" End Sub Sub test1() Call test End Sub 还有一个小知识点 Dim i As Integer ‘将i 定义在外 阅读全文
posted @ 2020-04-13 09:12 我是小旋风 阅读(1732) 评论(1) 推荐(0)
VBA-触类旁通：图形、图片、与表单控件
摘要：Shapes大家族： 首先认识一下，在VBA里他们都叫shapes 示例：计算有多少个shape Sub test() MsgBox Sheet1.Shapes.Count End Sub shape属性 Sub test() Dim shp As Shape For Each shp In She 阅读全文
posted @ 2020-04-12 21:44 我是小旋风 阅读(2581) 评论(0) 推荐(1)
VBA-使用ADO操作外部数据
摘要：使用ADO连接外部excel数据源 补充小知识：在不打开文件的情况下，抓取数据 1）打开数据-现有连接-浏览更多，然后导入你要导的数据，就能在不打开该文件的条件下，进行透视，操作等。 然后就是通过VBA来实现这个小功能 Sub test1() MsgBox "叫""张三""的那个人" '想要输出：叫 阅读全文
posted @ 2020-04-12 10:17 我是小旋风 阅读(3056) 评论(0) 推荐(0)
VBA-VBA中的用户信息交互
摘要：msgbox的用法： 它有多个参数，但常用的就前两个。详情如下表。其实它就是个vba函数 显示全部为(vba.interation.msgbox) 参数，主要用前两个 示例 Sub test() Dim i As Integer i = MsgBox("您好吗", 1 + 48) '它有返回值，对应 阅读全文
posted @ 2020-04-11 21:23 我是小旋风 阅读(1017) 评论(0) 推荐(1)
VBA-使用ActiveX控件
摘要：Active控件的在设计模式下才能更改，进行操作：按钮主要用到的属性有 caption "按钮什么名字"；visible“按钮是否可见” enable“按钮是否可编辑” 这三个属性值，其余都比较简单常用 Sub test() Sheet1.CommandButton1.Caption = "结束" 阅读全文
posted @ 2020-04-11 15:52 我是小旋风 阅读(4455) 评论(0) 推荐(0)
VBA- 使用数组
摘要：从例子中了解什么是数组 ：在vba里数组就是一组变量 Sub ss1() Dim i, k t = Timer '这个是从今天0点开始已经过了多少秒的时间 For i = 2 To 200000 If Range("g" & i) = Range("n5") Then '每一次取值都要到range( 阅读全文
posted @ 2020-04-10 20:39 我是小旋风 阅读(2489) 评论(0) 推荐(0)
VBA-使用DIR函数多文件合并
摘要：如何将对象赋值给变量 Sub test() Dim sht As Worksheet sht = Sheets.Add '这里会报错的 Set sht = Sheets.Add ‘将对象赋值给变量 需要加上set sht.Name = "4月" End Sub 例子：创建表 以sheet1的单元格内 阅读全文
posted @ 2020-04-08 20:42 我是小旋风 阅读(1067) 评论(0) 推荐(0)
VBA-自定义函数和带参数的过程
摘要：自定义函数 在VBA中自定义函数 使用如下 function 函数名 （输入的参数） Function zmj(str As String) zmj = str / 6.4 + str * 2 + 8 End Function VBA中有个很好用的函数split 分割 可以通过自定义函数将其写成公式 阅读全文
posted @ 2020-04-06 10:19 我是小旋风 阅读(8700) 评论(0) 推荐(0)
VBA-在VBA中使用公式
摘要：在VBA中如何使用excel中的函数 这样Application.WorksheetFunction. “.”后面就能找到在excel中常用的函数 代码 Sub tongji() Dim k, l, m As Integer For i = 2 To Sheets.Count k = k + App 阅读全文
posted @ 2020-04-05 18:00 我是小旋风 阅读(4217) 评论(0) 推荐(0)
VBA事件与典型应用案例
摘要：with语句的使用 Sub test() Sheet2.Range("a1") = 6 Sheet2.Range("a2") = 16 Sheet2.Range("a3") = 26 '等效 With Sheets .Range("a1") = 6 .Range("a2") = 16 .Range( 阅读全文
posted @ 2020-04-04 19:33 我是小旋风 阅读(5755) 评论(0) 推荐(0)
VBA-操作单元格对象
摘要：选择单元格的几种方式： [a1].select cell(2,3).select #参数 行 列 range("a1").select range("a1") =1 默认是 range("a1").value = 1 为属性赋值 两者还是有 区别的 比如安装单元格a1的值去点击对应的工作表 shee 阅读全文
posted @ 2020-04-03 09:44 我是小旋风 阅读(799) 评论(0) 推荐(0)
VBA-操作工作簿
摘要：对for循环再次升级，使用for each： Sub shishi() Dim i As Integer For i = 1 To 10 Range("a" & i) = i Next End Sub 同等效果for each 的做法，此处这个for each 针对的是单元格，也可以是表等 Sub 阅读全文
posted @ 2020-04-02 16:52 我是小旋风 阅读(446) 评论(0) 推荐(0)
VBA-操作工作表
摘要：第一讲：录制宏及for循环 for循环: sub shihsi() dim i as integer for i = 1 to 100 step 2 (设置步长) range("a"&i) = i next end sub 一些概念： 方法：表示动作的操作叫做方法 属性：表示固有的属性，如有多少个单 阅读全文
posted @ 2020-04-01 11:31 我是小旋风 阅读(1052) 评论(0) 推荐(0)