Private Sub lstLookup_DblClick(ByVal Cancel As MSForms.ReturnBoolean) Dim cPayroll As String Dim findvalue On Error GoTo errHandler: For I = 0 To lstLookup.ListCount -
我想为excel 2013创建一个vba宏。此vba宏必须可用于所有excel文件,我在internet上进行搜索,并发现必须将代码放入Excel外接程序中,因此我尝试为excel的事件打开生成代码;代码如下: If (ActiveWorkbook.Path = "C:\GED\TEMP") Then End If问题是,当我打开<