VBA之对象

论坛 期权论坛 期权     
吉言天下   2019-6-16 23:02   2588   0
相亲有对象,编程同样也有对象,走到图书馆,随便拿起一门语言的书籍,估计都可以看到四个字“面向对象”,到底什么是对象,VBA中有哪些对象?
对象,就是我们操作的东西,比如我们踢足球,足球就是我们踢的对象,老师划重点时敲黑板,黑板就是老师敲打的对象,夏天太热,我们要吃西瓜,西瓜就是我们吃的对象。ExcelVBA中的对象从大到小大致可以分为四类,一个是Excel应用程序对象application,它是最顶级的,就像二叉树的根节点一样。一个是工作簿对象workboos,一个是工作表对象worksheets,最后一个是单元格对象range。下面举一些例子。
如果我们想Excel无论是关闭、保存文件时不提示警告信息,我们就可以操作application对象,设置 Application.DisplayAlerts = False。
如果我们要新建一个工作簿,操作workbooks对象就可以了,直接workbooks.add。
如果我们要对新建的工作簿的第一个工作表进行重命名,操作worksheets对象就可以了,直接Worksheets(1).Name = "爱的祝福"。
如果我们要在当前工作表中的A1单元格输入父亲节祝福语,操作range对象就可以了,直接Range("a1").Value = "爸爸,节日快乐,你最伟大,我爱你!"
对象有两个特别的要素,一个是属性,另一个是方法。对于足球而言,足球的价格,大小,颜色等足球包含该的内容或者特征,是足球的属性,踢足球,买足球等对足球的动作或操作是足球的方法。对于Excel的单元格range对象而言,单元格的颜色,单元格值就是单元格的属性,而删除单元格、插入单元格,填充单元格就是单元格的方法。
一个示例:
  1. Sub workadd()
复制代码
  1.     Dim wk As Workbook '声明变量
复制代码
  1.     Set wk = Workbooks.Add '新建工作簿
复制代码
  1.     Application.DisplayAlerts = False '不显示警告
复制代码
  1.     wk.Worksheets(1).Name = "爱的祝福" '设置工作表的名称
复制代码
  1.     Range("a1").Value = "爸爸,节日快乐,你最伟大,我爱你!" '填充单元格内容
复制代码
  1.     wk.SaveAs Filename:="d:\父亲节.xlsx" '保存工作簿
复制代码
  1. End Sub
复制代码


分享到 :
0 人收藏
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

积分:10
帖子:2
精华:0
期权论坛 期权论坛
发布
内容

下载期权论坛手机APP