Microsoft Excel - VBA code required for Excel 2010 to open, perform and save a Crystal Reports 9 report pls.

Refer this link-

http://forums.esri.com/Thread.asp?c=93&f=992&t=67019

solution-

Before executing below code Put the CrystalReport control on your form.
      

CrystalReport1.ReportFileName = gStrReportsPath & "\" & str
    CrystalReport1.Connect = "DSN=scana"
    CrystalReport1.SQLQuery = "SELECT CATCHTRY.STREET,CATCHTRY.YEAR,ESTAB.ES_NAME,CATCH.LEA FROM CATCHTRY,ESTAB WHERE CATCHTRY.CODE=ESTAB.ES_ESTAB " & strOrderByClause
    CrystalReport1.Destination = crptToWindow
    CrystalReport1.WindowState = crptMaximized
    CrystalReport1.Action = 1
    CrystalReport1.Reset