Aspose.Cells功能演示：使用Java以編程方式在 Excel 文件中添加或修改 VBA 宏

 VBA是一種編程語(yǔ)言，用于在 MS Excel 文件中自動(dòng)執(zhí)行各種操作。特別是，VBA 宏是用戶定義的代碼，可加速電子表格操作任務(wù)。在本文中，將學(xué)習(xí)如何以編程方式使用 Excel 文件中的 VBA 宏。最終，將能夠 使用 Java 在 Excel 中添加和修改 VBA 宏。

• 將 VBA 宏添加到 Excel 工作簿
• 修改 Excel 工作簿中的 VBA 宏

為了在 Excel 文件中使用 VBA 宏，我們將使用Aspose.Cells for Java，它是一個(gè)強(qiáng)大的電子表格自動(dòng)化 API，可讓您創(chuàng)建、修改和轉(zhuǎn)換 Excel 文件。此外，它還簡(jiǎn)化了 VBA 宏的操作。點(diǎn)擊下方按鈕可下載試用。

將 VBA 宏添加到 Java 中的 Excel 工作簿

以下是在 Java 中在 Excel 文件中添加 VBA 宏的步驟。

• 首先，加載現(xiàn)有工作簿或使用Workbook類創(chuàng)建新工作簿。
• 使用Workbook.getWorksheets().get(index)方法將工作表提取到Worksheet對(duì)象中。
• 使用Workbook.getVbaProject().getModules().add(Worksheet)方法添加一個(gè)新的 VBA 模塊。
• 將新添加的模塊的引用獲取到VbaModule對(duì)象中。
• 分別使用VbaModule.setName()和VbaModule.setCodes()方法設(shè)置模塊的名稱和代碼。
• 最后，使用Workbook.save(string, SaveFormat.XLSM)方法保存工作簿。

以下代碼示例展示了如何使用 Java 在 Excel 文件中添加 VBA 宏。

// Load Excel workbook
Workbook workbook = new Workbook("workbook.xlsm");

// Access first worksheet
Worksheet worksheet = workbook.getWorksheets().get(0);

// Add VBA Module
int idx = workbook.getVbaProject().getModules().add(worksheet);

// Access the VBA Module, set its name and codes
VbaModule module = workbook.getVbaProject().getModules().get(idx);
module.setName("TestModule");
module.setCodes("Sub ShowMessage()" + "\r\n" + "    MsgBox \"Welcome to Aspose!\"" + "\r\n" + "End Sub");

// Save the workbook
workbook.save("output.xlsm", SaveFormat.XLSM);

用 Java 修改 Excel 工作簿中的 VBA 宏

以下是使用 Java 在 Excel 文件中修改 VBA 宏的步驟。

• 首先，使用Workbook類加載現(xiàn)有工作簿。
• 使用Workbook.getVbaProject().getModules()方法在VbaModuleCollection對(duì)象中檢索 VBA 模塊集合。
• 以迭代方式將集合中的每個(gè) VBA 模塊提取到VbaModule對(duì)象中。
• 分別使用VbaModule.setName()和VbaModule.setCodes()方法更新所需模塊的名稱和代碼。
• 最后，使用Workbook.save(string, SaveFormat.XLSM)方法保存工作簿。

以下代碼示例展示了如何使用 Java 修改 Excel 文件中的 VBA 宏。

// Create workbook object from source Excel file
Workbook workbook = new Workbook("sample.xlsm");

// Change the VBA Module Code
VbaModuleCollection modules = workbook.getVbaProject().getModules();

for (int i = 0; i < modules.getCount(); i++) { VbaModule module = modules.get(i); String code = module.getCodes(); // Replace the original message with the modified message if (code.contains("This is test message.")) { code = code.replace("This is test message.", "This is Aspose.Cells message."); module.setCodes(code); } } // Save the output Excel file workbook.save("output.xlsm");