     Excel_ActiveCell()
     XLMAIN_GetSelectionType()
     XLMAIN_GetSelectionInfo()
-    msgbox,%SelectionType%
+    ;msgbox,%SelectionType%
     if SelectionType=1
         {
             excel.Selection.Borders(7).LineStyle := 1

	return
}

<XLMAIN_工作表删除当前>:
{
Excel_ActiveSheet()
excel.ActiveWindow.SelectedSheets.delete
objRelease(excel)
return
}

<XLMAIN_工作表复制当前>:
{

    Excel_ActiveSheet()
    value:=excel.ActiveCell.Value
    value=%value%*
    msgbox,%value%
    XLMAIN_CustomAutoFilter("=*",valve)
    objrelease(excel)
    return
