Excel VBA是什么呢?Excel VBA又有什么作用呢?要有想要了解Excel VBA这方面知识的小伙伴,那就快来看看小编在下边给你们分享的Excel VBA的知识吧。
小编发现最近小伙伴们向小编提出很多的问题,其中就有不少的小伙伴提出问题就是小编今天要讲的内容。那就VBA是什么,VBA怎么用,所以小编今天就来给你们普及下关于这方面的知识,一块来看看吧。
1.VBA到底是什么
VBA是Visual Basic for Applications的缩写,是内嵌于office软件中的一个开发模块,这个模块提供程序自主开发,语言基础和VB(Visual Basic)相似。在Excel的“工具—宏—编辑器”可以打开,也可按Alt+F11打开
如何使用Excel vba图解详情-1
如何使用Excel vba图解详情-2
2.VBA怎么用
进入VBA界面之后,我们打开VBA代码框,打开方式有以下几种方式种:
(说明一下:方式一打开的窗体没有默认对象,程序编写时如果要处理工作表或工作簿的数据,必须指明对象,如:对sheet2工作表的单元格进行处理,那么这样写sheet2.cells或sheets(2).cells;方式二和方式一打开的一样,需要指明程序处理的对象;方式三打开的代码框是默认的,也可以重新指定对象,如:双击sheet1工作表,那么在对应的代码框中如果不指定对象,默认对应的是sheet1工作表。)
如何使用Excel vba图解详情-3
VBA是什么图解详情-4
VBA是什么图解详情-5
Excel图解详情-6
3.实例分析
下面将以一段实例程序来说明Excel VBA的高效性和灵活性,
实例:E盘有一个名为VBA教研室的文件夹,文件夹内有200个xls文件,现在我需要获取这200个文件的文件名。
具体程序:
Sub 文件名获取()
Dim i As Integer
Dim myDir, myF, str As String
myDir = "E:\VBA教研室\"
myF = Dir(myDir & "*.xls")
Do While myF <> ""
str = myF
i = i + 1
ThisWorkbook.Sheets(1).Cells(i, 1) = Left(str, Len(str) - 4)
myF = Dir()
Loop
End Sub
程序运行结果如下:
我们设想一下,如果不用VBA,我们还有其他办法吗?可能唯一的办法就是手工一个个的复制粘贴,这还只是200个文件,如果是两千或者两万个呢!这只是举了一个例子,当然VBA不仅仅只有这些,它的功能非常强大!
VBA是什么图解详情-7
Excel图解详情-8
注意事项
VBA不仅仅只是在Excel里面有,Word和ppt里面都可以用VBA来操作
VBA其实不是那么的难,即使没有VB基础的也可以学得会的哦!
VBA在以后的办公作业中的运用会日益凸显的!
Excel VBA是什么呢?Excel VBA又有什么作用呢?要有想要了解Excel VBA这方面知识的小伙伴,那就快来看看小编在下边给你们分享的Excel VBA的知识吧。
小编发现最近小伙伴们向小编提出很多的问题,其中就有不少的小伙伴提出问题就是小编今天要讲的内容。那就VBA是什么,VBA怎么用,所以小编今天就来给你们普及下关于这方面的知识,一块来看看吧。
1.VBA到底是什么
VBA是Visual Basic for Applications的缩写,是内嵌于office软件中的一个开发模块,这个模块提供程序自主开发,语言基础和VB(Visual Basic)相似。在Excel的“工具—宏—编辑器”可以打开,也可按Alt+F11打开
如何使用Excel vba图解详情-1
如何使用Excel vba图解详情-2
2.VBA怎么用
进入VBA界面之后,我们打开VBA代码框,打开方式有以下几种方式种:
(说明一下:方式一打开的窗体没有默认对象,程序编写时如果要处理工作表或工作簿的数据,必须指明对象,如:对sheet2工作表的单元格进行处理,那么这样写sheet2.cells或sheets(2).cells;方式二和方式一打开的一样,需要指明程序处理的对象;方式三打开的代码框是默认的,也可以重新指定对象,如:双击sheet1工作表,那么在对应的代码框中如果不指定对象,默认对应的是sheet1工作表。)
如何使用Excel vba图解详情-3
VBA是什么图解详情-4
VBA是什么图解详情-5
Excel图解详情-6
3.实例分析
下面将以一段实例程序来说明Excel VBA的高效性和灵活性,
实例:E盘有一个名为VBA教研室的文件夹,文件夹内有200个xls文件,现在我需要获取这200个文件的文件名。
具体程序:
Sub 文件名获取()
Dim i As Integer
Dim myDir, myF, str As String
myDir = "E:\VBA教研室\"
myF = Dir(myDir & "*.xls")
Do While myF <> ""
str = myF
i = i + 1
ThisWorkbook.Sheets(1).Cells(i, 1) = Left(str, Len(str) - 4)
myF = Dir()
Loop
End Sub
程序运行结果如下:
我们设想一下,如果不用VBA,我们还有其他办法吗?可能唯一的办法就是手工一个个的复制粘贴,这还只是200个文件,如果是两千或者两万个呢!这只是举了一个例子,当然VBA不仅仅只有这些,它的功能非常强大!
VBA是什么图解详情-7
Excel图解详情-8
注意事项
VBA不仅仅只是在Excel里面有,Word和ppt里面都可以用VBA来操作
VBA其实不是那么的难,即使没有VB基础的也可以学得会的哦!
VBA在以后的办公作业中的运用会日益凸显的!