當路徑聲明爲絕對路徑時,此代碼片段正常工作。考慮行絕對路徑到相對路徑的轉換
var wb = xl.Workbooks.Open("C:\\temp\\temp.csv");
在代碼中。但是,我想爲相同的路徑聲明相對路徑。我怎麼做?
var xl = new ActiveXObject("Excel.Application");
xl.Visible = true;
var wb = xl.Workbooks.Open("C:\\temp\\temp.csv");
var sheet = wb.ActiveSheet;
wb.Worksheets.Add(after=wb.Sheets(wb.Sheets.Count));
var pws = wb.ActiveSheet;
pws.Name="temp_pivot";
var pvtTable = pws.PivotTableWizard(1, varSource=wb.sheets("temp").Range("A1").CurrentRegion);
pvtTable.PivotFields("DECISIONYEAR").Orientation = 1;
pvtTable.PivotFields("DECISIONMONTH").Orientation = 1;
pvtTable.PivotFields("WEEKYEAR").Orientation = 1;
pvtTable.PivotFields("APPLICANT").Orientation = 4;
pvtTable.PivotFields("SUM OF APPLICANT").Function=-4157;
pvtTable.PivotFields("APPROVED").Orientation = 4;
pvtTable.PivotFields("SUM OF APPROVED").Function=-4157;
pvtTable.PivotFields("SOURCE").Orientation = 3;
pvtTable.PivotFields("PRODUCTCOLOR").Orientation = 3;
pvtTable.PivotFields("PRODUCT").Orientation = 3;
pvtTable.PivotFields("SUB_CHANNEL_CADM").Orientation = 3;
pvtTable.PivotFields("CHANNEL_CADM").Orientation = 3;
pvtTable.PivotFields("MARKET").Orientation = 3;
pvtTable.PivotFields("OFFER_TYPE").Orientation = 3;
pvtTable.DataPivotField.Orientation=2;
pws.Columns.Autofit;
pws.Rows.Autofit;
xl.DisplayAlerts =0;
xl.DisplayAlerts = 1
xl.CutCopyMode = 0;
xl.EnableEvents = 0;
xl = null;
是的,它的Windows腳本主機 – user3444944