Excel:VBA编程入门
打开Excel中的VBA编程界面写一个简单的VBA程序
打开Excel中的VBA编程界面
首先打开Excel,在菜单栏的开发工具中打开Visual Basic,如下图: 如果在菜单栏上没有找到开发工具,那就应该先从文件处显示隐藏的开发工具。如下图所示: 这样就可以打开了。 打开的VBA界面是这样的:
写一个简单的VBA程序
首先打开了Visual Basic 的页面,在页面左侧的代码编辑处上方有两个下拉选框,如下图,左侧的下拉框代表工作对象,右边的下拉框代表函数方法。 来解释一下这边的下拉选择都代表什么含义
函数说明Activate激活BeforeDelete在工作表被删除之前,发生此事件。BeforeDoubleClick当双击工作表时,发生此事件BeforeRightClick右键单击工作表时发生此事件Calculate在对工作表对象重新计算后,发生此事件Change当用户更改工作表中的单元格,或外部链接引起单元格的更改时,发生此事件Deactivate图表、工作表或工作簿被停用时发生此事件FollowHyperLink当选择工作表上的任何超链接时发生此事件LensGalleryRenderComplete在标注库中的图标(动态和静态)已完成呈现时发生。PivotTableAfterValueChange在编辑或重新计算(对与包含公式的单元格)数据透视表中的单元格或单元格区域后发生。PivotTableBeforeAllocateChanges在将更改应用到数据透视表前发生。PivotTableBeforeCommitChanges在向数据透视表的OLAP数据源提交更改之前发生PivotTableBrforeDiscardChanges在放弃对数据透视表所做的更改之前发生PivotTableChangeSync在更改了数据透视表之后发生PivotTableUpdate工作簿中的数据透视表更新后发生此事件selectionChange当工作表上的选定区域发生改变时发生此事件。TableUpdate在工作表上更新了连接到数据模型的查询表之后,发生此事件。
上述函数可以根据自己的现实场景需求去使用。
更具体函数信息可以去官网看,贴地址:https://docs.microsoft.com/zh-cn/office/vba/api/excel.worksheet.activate(even)
那接着来写第一个简单的VBA程序 首先本文新建了一个表,填了一些数据,如下: 然后再Visual Basia里用代码操作这个表。 打开 选择双击触发的函数,在里面敲入代码,即下图中黄色圈中的部分。
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)/
Sheet1.Cells(3, 5) = Sheet1.Cells(3, 3) * 10
Sheet1.Cells(4, 5) = Sheet1.Cells(4, 3) * 10
Sheet1.Cells(5, 5) = Sheet1.Cells(5, 3) * 10
Sheet1.Cells(6, 5) = Sheet1.Cells(6, 3) * 10
Sheet1.Cells(7, 5) = Sheet1.Cells(7, 3) * 50
End Sub
End Sub代表函数结束
编辑完后 ctrl+s 保存。
在单元格内双击即可看到代码执行结果。
以上。