현재 만들어진 엑셀을 가지고 Save as하고자 하는데
Save as 하기전에 상황에 따라 엑셀에 시트를 삭제하고 Save as하고자합니다.
그때 Sheet 삭제를 하는데 잘안되네요.. google을 찾아봐도 시트삭제는 안나오고
col,row삭제만 나옵니다. ㅠㅠ
Variant excel_app;
Variant excel_book, excel_books;
Variant excel_sheet;
Variant cells;
Variant sheets;
Variant Data;
Variant v0;
Variant v1;
WideString ExcelData;
excel_app = Variant::CreateObject("excel.application");
excel_app.OlePropertySet("Visible", (Variant)false);
excel_app.OlePropertyGet("Workbooks").OleProcedure("Open", "C:\\DB\\Schedule Table\\Basic Schedule Table.xlsx");
excel_books = excel_app.OlePropertyGet("ActiveSheet");
v0 = excel_app.OlePropertyGet("Sheets" , WideString(Date)).OleFunction("Delete"); <--------------/*delete가 안됩니다.*/ Sheet Text 삭제는 가능하고 Sheet 내 Cell 삭제도 가능한대 Sheet 삭제만 안됩니다.
excel_books.OleProcedure("SaveAs" ,WideString(FileName));
excel_sheet = Unassigned;
excel_books = Unassigned;
excel_app.OleFunction("Quit");
excel_app = Unassigned;
도움좀 부탁드립니다! 감사합니다!
|