OK try my code:

VB Code:
  1. Set m_wkbReportBook = m_appExcel.Workbooks.Add