请发到我的信箱[email protected]并注明您的id以便我给分

解决方案 »

  1.   

    //#define USE_OFFICEXP 1#ifdef USE_OFFICEXP
    #import "C:\Program Files\Common Files\Microsoft Shared\Office10\MSO.DLL" 
    #import "c:\\Program Files\\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.olb" 
    //#import "c:\Program Files\Microsoft Office\Office10\MSWORD.olb" rename("ExitWindows","ExitWindowsEx")
    #import "c:\Program Files\Microsoft Office\Office10\excel.exe" rename("DialogBox", "DialogBoxXL") rename("RGB", "RBGXL")          rename("DocumentProperties", "DocumentPropertiesXL") exclude("IFont","IPicture")
    #else
    #import "c:\Program Files\Microsoft Office\Office\MSO9.dll"
    #import "C:\Program Files\Common Files\Microsoft Shared\VBA\VBA6\VBE6EXT.OLB"
    //#import "c:\Program Files\Microsoft Office\Office\MSWORD9.OLB" rename("ExitWindows","_ExitWindows")
    #import "c:\Program Files\Microsoft Office\Office\excel9.olb" rename("DialogBox", "DialogBoxXL") rename("RGB", "RBGXL")          rename("DocumentProperties", "DocumentPropertiesXL") exclude("IFont","IPicture") exclude("VBIDE::VBE","VBE")
    #endif已经发送