服务器之家

服务器之家 > 正文

傻瓜都会用Excel VBA(教你怎么用VBA)

时间:2020-07-11 11:49     来源/作者:百度经验

VBA是Excel的底层根本。只有明白使用最底层的东西,使用起来才能随心所欲。对于多数读者而言,由于未使用过VBA或者不具备计算机语言知识,所以被VBA直白的语句所吓倒。但是楼主可以肯定的告诉大家,VBA其实很简单,并且很实用。学会后,也会上瘾;变化无穷,很有意思。

一般新的学者都有如下几个问题:

  • 1.在哪编写或者查看我们的VBA代码?
  • 2.告诉Excel什么时候,怎么触发我们的程序?
  • 3.怎么编写我们的VBA代码,怎么用代码引用或者指定到我们的单元格或区域?

下面我以一个双击鼠标后,触发:将两个单元格的数值相加后赋值给第三个单元格。

Excel VBA使用方法

打开一个Excel文件,鼠标右击下面的工作表(如sheet1)。选择“查看代码”,就可以打开VBA编辑界面。

傻瓜都会用Excel VBA(教你怎么用VBA)

傻瓜都会用Excel VBA(教你怎么用VBA)

傻瓜都会用Excel VBA(教你怎么用VBA)

选择如下图所示的下拉菜单,选择“worksheet”。

傻瓜都会用Excel VBA(教你怎么用VBA)

选择如下图所示的下拉菜单,选择对应的触发模式。这里我们选择BeforeDoubleClick,意思就是说:在本工作表鼠标双击(之前),将触发下面的代码程序。(activate意思是说:在sheet表被选取的时候,就触发;Change意思是说:在这个模式下,只要sheet(工作表)发生变化,就将触发;Before Right Click是指在鼠标右击之前触发;SelectionChange是指在鼠标焦点发生变化时,触发。)

傻瓜都会用Excel VBA(教你怎么用VBA)

选择完成后,我们会看到下面出现了两条代码;这俩条代码其实是在声明一个函数。

傻瓜都会用Excel VBA(教你怎么用VBA)

将鼠标放置在这两行代码之间,我们写上执行语句:

Sheet1.Cells(1, 3) = Sheet1.Cells(1, 1) + Sheet1.Cells(1, 2)

其中:sheet1.cells(1,3)就是指第一行第三列的这个单元格;Sheet1.Cells(1, 1)就是指第一行第一列的这个单元格;Sheet1.Cells(1, 2)就是指第一行第二列的单元格。执行语句的意思是:将cells(1,1)和cells(1,2)的值相加,并赋值给cells(1,3)

注意的是:写语句的时候,输入法一定要是输入字母的模式。要不然你的语句会报错。

傻瓜都会用Excel VBA(教你怎么用VBA)

然后点击保存,回到Excel的原始界面。在cells(1,1)和cells(1,2)中输入两个数值。(楼主输入的是:125895和78954)

注意看:现在的cells(1,3)数值是空的。

傻瓜都会用Excel VBA(教你怎么用VBA)

在sheet1的工作表中,双击你的鼠标。你会发现,cells(1,3)的值变成了cells(1,1)和cells(1,2)的和。(204849=125895+78954)

傻瓜都会用Excel VBA(教你怎么用VBA)

总结:其实VBA主要是触发和指定单元格。

1.触发的原理其实很简单,大家可以选择不同的触发模式,试一下就知道是怎么回事了。

2.至于怎么指定到单元格,大家可以看看cells语句和Range语句。

补充说明: VBA不需要过于复杂的VB语句。你只需要知道VB怎么写怎加减乘除,怎么使用IF语句,就可以满足大部分的需求了。最后希望大家能够驾驭VBA,顺便送大家一句话:眼见为虚,耳听为虚,只有运行才是硬道理。

注意事项

使用VBA时,一定要保证你Excel的宏是启用的。

为了维护Microsoft的权益,商业使用VBA时,请使用合法的VBA项目合法证书。

标签:

相关文章

热门资讯

2020微信伤感网名听哭了 让对方看到心疼的伤感网名大全
2020微信伤感网名听哭了 让对方看到心疼的伤感网名大全 2019-12-26
歪歪漫画vip账号共享2020_yy漫画免费账号密码共享
歪歪漫画vip账号共享2020_yy漫画免费账号密码共享 2020-04-07
男生常说24816是什么意思?女生说13579是什么意思?
男生常说24816是什么意思?女生说13579是什么意思? 2019-09-17
沙雕群名称大全2019精选 今年最火的微信群名沙雕有创意
沙雕群名称大全2019精选 今年最火的微信群名沙雕有创意 2019-07-07
玄元剑仙肉身有什么用 玄元剑仙肉身境界等级划分
玄元剑仙肉身有什么用 玄元剑仙肉身境界等级划分 2019-06-21
返回顶部