VBA给单元格赋值，你真懂透了？

用微信扫码二维码

分享至好友和朋友圈

VBA代码是电子表格最高级，若学好的确大大的好。现在讲讲给单元格赋值吧，透彻理解吧。

1.建立工作薄并命名"给单元格赋值.xls"。

2.点击打开工作薄，给工作表命名"数据""透视""索引""图表"。

3.点"开发工具"标签，点"VBA编辑器"按钮，进入代码编辑器。

4.点编辑器上方"插入"按钮，选择"模块"。

5.在代玛区输入如下代码。

6.在工作表"数据"中插入表单控件，并改名为"给单元格赋值"，并将控件指定到宏"给单元格赋值"。

7.点击控件按钮，A1单元格内显示了值为100。点击保存按钮。

以上都很简单，但远远还不到透彻境界，这段代码那么容易写吗？现在详解。

Sub 给单元格赋值()

Workbooks("给单元格赋值.xls").Worksheets("数据").Range("A1").Value = 100

End Sub

理解一：这句代码无非是."值为100"。语法为主谓宾句。主为值，谓是等号，宾是100。

理解二：要对值进行修饰，定位，哪里的值。工作薄中的工作表中众多单元格中的某单元格A1中的值。

理解三：Workbooks复数，多个工作薄 Worksheets复数，多个工作表 Range单元格的范围也相当多个单元格的集合，所以这些单词都是以复数多个的形式出现的，而括号里面的才是具体的，哪一个工作簿，括号里面告诉你了，哪一个工作表，括号里面告诉你了，哪一个单元格，括号里面告诉你了。

理解四：这其实很简单，像一个简历，省（山东）.市（淄博）.县（博考）.镇（泗店）.村(桃园).150号，这才是最后详细的家庭住址。这样理解是不是很简单了，很形象了，而括号里面的只是将前面的复数的形式进行了具体化而已。而不带括号的最后的才是最具体的属性值。

理解五：括号里面的都要加引号，也就是说复数形式的都需要，Workbooks Worksheets Range。而单纯的数字是不需要加引号的。

理解六：引号必须是在英文小写的状态下输入的。

代码很简单，但要自己写岀来讲岀来实属不易，所以只有理解挖掘透彻才能运用自如。

特别声明：以上内容(如有图片或视频亦包括在内)为自媒体平台“网易号”用户上传并发布，本平台仅提供信息存储服务。

Notice: The content above (including the pictures and videos if any) is uploaded and posted by a user of NetEase Hao, which is a social media platform and only provides information storage services.