2
我可以在Visio用VBA代碼(與宏錄製)在Visio例如,從X頁更改activePage頁「主」如何通過JACOB圖書館更改活動頁面在Visio
Application.ActiveWindow.Page = Application.ActiveDocument.Pages.ItemU("Main")
我試着它在Java中用JACOB庫進行翻譯。
visio.projects = new ActiveXComponent("Visio.Application");
visio.projects.setProperty("Visible", new Variant(true));
Dispatch documents =
new ActiveXComponent(visio.projects.getProperty("Documents").toDispatch());
Dispatch.call(documents, "open", new Variant(fileName));
// up now a try for vba Code Translation
Dispatch activeWindow = Dispatch.get(visio.projects,"ActiveWindow").toDispatch();
Dispatch page = Dispatch.get(activeWindow, "page").toDispatch();
Dispatch activeDocument = Dispatch.get(visio.projects, "ActiveDocument").toDispatch();
Dispatch pages = Dispatch.get(activeDocument, "Pages").toDispatch();
//Dispatch actualPage = Dispatch.call(pages, "ItemU", new Variant("Main")).toDispatch(); // goes wrong
// What is next???
我試圖完成,但直到現在我沒有改進。