如果菜单栏没有“开发工具”选项卡,右击上方菜单栏空白处——自定义功能区,选中“开发工具” 请点击输入图片描述 开发工具里面,插入——ActiveX控件,选中按钮,在Excel上拖拽2个按钮 请点击输入图片描述 右击按钮,查看代码,可以打开VBE界面(右击按钮,选择属性,里面可以改按钮的显示内容,Caption属性) Private Sub CommandButton1_Click() Sheet2.Range("A1").Value = Sheet1.Range("A10").Value '将表1中的某个值保存到表2的示例 End Sub Private Sub CommandButton2_Click() Sheet2.Range("A1").Value = "" '清空Sheet1指定单元格的示例 End Sub 根据示例修改代码 追问好的,基本实现了。 '获取某列最后一行有内容的行号的命令: |
|
来自: wangyong670 > 《财务》