我给VBA的定义:VBA是个人小型自动化处理的有效工具。利用好了,可以大大提高自己的劳动效率,而且可以提高数据处理的准确度。我推出的VBA系列教程共九套和一部VBA汉英手册,现在已经全部完成,希望大家利用、学习。
如果您只是一般的职场VBA需求,可以打包选择7.1.3.9教程+汉英手册,第7套教程是入门,第1套教程是入门后的提高,第3套教程字典是必备的VBA之精华,第9套教程是实用的典型案例讲解。这四套教程内容掌握后足以处理一般工作中的问题,实际写代码的时候再辅助代码汉英手册,足矣!如果您想进一步提高,就需要选择高级阶段的教程了。
VBA是面向对象编程的语言,博大精深。很多朋友咨询VBA的学习方法,我会陆续给大家讲解一些我的经验,大家可以慢慢体会。今日的内容是:如何学习VBA:3.2.7工作簿的操作引申
【分享成果,随喜正能量】内心的美,如空谷幽兰,洋溢阵阵芬芳,使人心情愉悦。学道的人,须重视内在的修持,不以华丽的衣着来装饰自己,而以高贵气质来涵育自己,以道德修养来庄严自己。。
3.2.7工作簿的操作引申
对于工作簿的操作,我们在VBA中要熟练地掌握“不同工作薄文件间的切换”;“如何新建EXCEL工作簿文件”“利用SAVE,SaveAs,SaveCopyAs方法保存工作薄”,在应用技巧方面,教程中给大家介绍的方法有“禁用EXCEL工作簿右上角的关闭按钮”。这些操作和技巧是我们在VBA中经常利用的。特别是工作表的切换,其实就是对工作表的引用。
在面向对象编程中,我一直在强调以对象为中心点。我们所有的操作都是以对象为中心的。属性也好,方法也罢,都是对象的分支点。我在第七套和第八套中曾经讲解了对象的层次结构,也就是说对象是分层次的,对象的属性可能也是对象,一个对象可能有父对象和子对象,最大的对象就是我们经常提到的应用程序对象即:Application对象。
在讲工作薄对象的时候,我们还讲到了图表的利用,“利用VBA自动生成图表”在这个专题中讲到了图表的添加及如何设置图表的源,在教程中对于图表的讲解较为简单,只是起到介绍的作用。在我的教程中我给出了一段代码,用于生成图表:
Sub mynz_30 '第29,30讲使用VBA代码自动生成图表
Dim myRange As Range
Dim myChart As ChartObject
Dim MR As Integer
Sheets("29,30").Select
MR = Range("A1048576").End(xlUp).Row
Set myRange = Sheets("29,30").Range("A" & 1 & ":F" & MR)
'创建新的嵌入图表expression.Add(Left, Top, Width, Height)①
Set myChart = Sheets("29,30").ChartObjects.Add(150, 140, 400, 250)
'指定新创建图表的图表类型:xlColumnClustered即图表类型为簇状柱形图
myChart.Chart.ChartType = xlColumnClustered
'图表的数据源和绘图方式②
myChart.Chart.SetSourceData Source:=myRange, PlotBy:=xlRows
'ApplyDataLabels方法使图表显示数据标签和数据点的值③
myChart.Chart.ApplyDataLabels ShowValue:=True
'设置图表标题的文字
myChart.Chart.HasTitle = True
myChart.Chart.ChartTitle.Text = "我的图表"
With myChart.Chart.ChartTitle.Font
.Size = 20
.ColorIndex = 3
.Name = "华文新魏"
End With
'设置图表区的颜色
With myChart.Chart.ChartArea.Interior
.ColorIndex = 8
.PatternColorIndex = 1
.Pattern = xlSolid
End With
'设置绘图区的颜色
With myChart.Chart.PlotArea.Interior
.ColorIndex = 35
.PatternColorIndex = 1
.Pattern = xlSolid
End With
'设置图表上第二个数据系列中的数据标签的字体格式④⑤
With myChart.Chart.SeriesCollection(2).DataLabels.Font
.Size = 17
.ColorIndex = 3
End With
Set myRange = Nothing
Set myChart = Nothing
End Sub
对于这段代码,我们要充分理解字体的设置,颜色的设置等等。
我20多年的VBA实践经验,全部浓缩在下面的各个教程中: