إضافة وحدة VBA والكود باستخدام Aspose.Cells
Contents
[
Hide
]
يسمح لك Aspose.Cells بإضافة وحدة جديدة لـ VBA وكود ماكرو باستخدام Aspose.Cells. الرجاء استخدامWorkbook.getVbaProject (). getModules (). add () لإضافة وحدة VBA النمطية الجديدة داخل المصنف
إضافة وحدة VBA والكود باستخدام Aspose.Cells
ينشئ نموذج التعليمات البرمجية التالي مصنفًا جديدًا ويضيف وحدة VBA النمطية الجديدة ورمز الماكرو ويحفظ الإخراج بتنسيق XLSM. بمجرد فتح ملف الإخراج XLSM في Microsoft Excel والنقر فوقالمطور> Visual Basic أوامر القائمة ، سترى وحدة تسمى “TestModule” وداخلها ، سترى رمز الماكرو التالي.
Sub ShowMessage()
MsgBox "Welcome to Aspose!"
End Sub
عينة من الرموز
فيما يلي نموذج التعليمات البرمجية لإنشاء ملف الإخراج XLSM باستخدام وحدة VBA وكود الماكرو.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// For complete examples and data files, please go to https://github.com/aspose-cells/Aspose.Cells-for-Java | |
// The path to the documents directory. | |
String dataDir = Utils.getDataDir(AddVBAModuleAndCode.class); | |
// Create new workbook | |
Workbook workbook = new Workbook(); | |
// 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(dataDir + "output.xlsm", SaveFormat.XLSM); | |