Skip to main content

Execute excel macro from Microsoft dynamics axapta application

Execute excel macro from dynamics axapta application

 //variable declaration  
 SysExcelApplication xlsAppObj;  
 SysExcelWorkbooks xlsWorkbooks;  
 SysExcelWorkbook WorkBook;  
 SysExcelWorksheet Worksheet;  
 str         fileName;  
 ;  
 xlsAppObj = SysExcelApplication::construct();  
 xlsAppObj.displayAlerts(true);  
 xlsAppObj.visible(true);  
 xlsAppObj.workbooks().open("SomeExcelFile.xls");  
 xlsWorkbook = xlsAppObj.workbooks().item(1);  
 Worksheet = xlsWorkbook.worksheets().itemFromName("NameOfWorksheet");  
 //execute excel macro  
 xlsAppObj.comObject().Run("XlsMacroName");  
 //Other excel related code is here  
 //Filename  
   fileName = "C:\\abc.xlsx";  
  //Check whether the document already exists  
     if(WinApi::fileExists(fileName))  
      WinApi::deleteFile(fileName);  
     //Save Excel document  
     xlsWorkbook.saveAs(fileName);  
     //Open Excel document  
     xlsApplication.visible(true);  
     //Close Excel  
     //xlsApplication.quit();  
     //xlsApplication.finalize();  

Popular posts from this blog

strScan and Find a first occurrence of a string in a string using x++

strScan (Find a first occurrence of a string in a string) info("int strScan(str _text1,str _text2,int _position,int _number)"); info("Searches a text string for the occurrence of another string."); info("_text1 - The text string to search."); info("_text2 - The string to find."); info("_position - The position at which the search should start."); info("_number - The number of characters that should be searched."); info(int2str(strScan("ABCDEFGHIJ","DE",1,10)));

Get record from table on the basis of field id in Microsoft dynamics axapta x++

How to Get record from table on the basis of field id in dynamics axapta x++. just try following code in job to understand better way. emplTable emplTable; FieldId fieldId; ; fieldId = fieldNum(emplTable, Emplid); select emplTable; info(emplTable.(fieldId)); select emplTable where emplTable.(fieldId) == '1101'; info(emplTable.Name);

Code to get customer Primary Address in Ax 2012

Below Code to get customer Primary Address in Ax 2012. CustTable custTable_P; DirPartyTable dirPartyTable_P; DirPartyLocation dirPartyLocation_P; DirPartyLocationRole dirPartyLocationRole_P; LogisticsLocation logisticsLocation_P; LogisticsLocationRole logisticsLocationRole_P; LogisticsPostalAddress logisticsPostalAddress_P; LogisticsPostalAddress primaryAddress_P; while select custTable_P where custTable_P.AccountNum =='ED_01029' join dirPartyTable_P where dirPartyTable_P.RecId == custTable_P.Party join dirPartyLocation_P where dirPartyLocation_P.Party == custTable_P.Party && dirPartyLocation_P.IsPrimary==NoYes::Yes join dirPartyLocationRole_P where dirPartyLocationRole_P.PartyLocation == dirPartyLocation_P.RecId join logisticsLocationRole_P where logisticsLocationRole_P.RecId == dirPartyLocationRole