using System.IO; using System.Runtime.InteropServices; [DllImport("kernel32.dll")] public static extern IntPtr _lopen(string lpPathName, int iReadWrite); [DllImport("kernel32.dll")] public static extern bool CloseHandle(IntPtr hObj
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)If Target.Column = 2 Then For Each sht In Sheets If sht.Name <> Target.Value Then n = n + 1 Next sht If n = Sheets.Count Then MsgBox "您选择的工作表不存在&qu