Axapta : Sending data to Excel by X++

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
  SysExcelApplication       SysExcelApplication;
  SysExcelWorksheet         SysExcelWorksheet;
  SysExcelWorksheets        SysExcelWorksheets;
  SysExcelWorkbooks         SysExcelWorkbooks;
  SysExcelWorkbook          SysExcelWorkbook;
  SysExcelRange             SysExcelRange;
  SysExcelCell              SysExcelCell;
  SysExcelCells             SysExcelCells;
  COMVariant                COMVariant1;
  #excel
// ข้างบนนี้ คือการ กำหนดตัวแปรกับ macro
  ;

  sysExcelApplication = SysExcelApplication::construct();
  sysExcelApplication.visible(false); //set ไม่ให้มัน show ตั้งแต่แรก
  sysExcelWorkbooks = sysExcelApplication.workbooks();
  COMVariant1 = new COMVariant();

  COMVariant1.bStr('\\\\Axaptaserver\\AxaptaSP4\\Excel\\Losses.xls');
  sysExcelWorkbook = sysExcelWorkbooks.add(COMVariant1); // สั่งให้เปิดไฟล์ที่กำหนดตามบรรทัดข้างบน
  SysExcelWorksheets = sysExcelWorkbook.worksheets();
  SysExcelWorksheet = SysExcelWorksheets.itemFromNum(1); // เลือกทำงานกับ Sheet ที่ 1
//  SysExcelRange = SysExcelWorksheet.cells().range(#ExcelTotalRange);

  SysExcelCell = SysExcelWorksheet.cells().item(1,1); // กำหนด cell ที่จะอ่านหรือเขียน
  SysExcelCell.value(strfmt("Losses of %1 from %2 to %3",fromDate,toDate)); // เขียนข้อความลงไปใน cell ที่กำหนดเมื่อกี้

Written by Komkid on August 13th, 2009 with no comments.
Read more articles on Axapta and Programming.

Related articles

No comments

There are still no comments on this article.

Leave your comment...

If you want to leave your comment on this article, simply fill out the next form:

You have to be identified to write a comment.