相关知识点
数据的传递
插入菜单里的ActiveX控件比表单控件更强大,可以设置其属性
ChartObjects : 图表对象
ChartObjects.count: 工作表中当前的图表总数
ChartObjects(k):工作表中第k个图表对象
ChartObjects.delete:该工作表中所有图表全部删除
ChartObjects.add: 在该工作表中新建一个空白图表
例1 双击单元格是窗体被调用,数据的传递,修改数据(在工作表中单元格的双击事件)
Private Sub worksheet_BeforeDoubleClick(ByVal Target as Range,Cancel as blooean)
Dim i as long
i=Tarage.row
模块1.rowNum=Target.row
fmInput.txtname.txt=Cells(i,2)
fmInput.txtAge.txt=Cells(i,3)
fmInput.txtLength=Cells(i,4)
fmInput.show
End Sub
在标准模块1建立保管箱,写在所有模块的前面,用Public声明,全局变量,完成数据的传递
Option Explicit
Public rowNm as long
<