'先用vba写几个函数
'写2个事件
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
MsgBox Sh.Name & " Activate"
End Sub
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
步骤:
一、创建工程并设置属性
二、连接Excel
三、响应Excel事件
四、调试编译分发安装
一、创建工程并设置属性。
1、新建工程:打开VB6.0,新建一个工程。在新建工程选项中选择“外接程序”(有的是“Addin”)。
[<] [219] [220] 221 [222] [223] [>]