Tilldela makro till formulärkontroll

Aspose.Cells låter dig tilldela en makrokod till en formulärkontroll som en knapp. Vänligen användShape.MarcoName egenskap för att tilldela en ny makrokod till en formulärkontroll i arbetsboken.

Följande exempelkod skapar en ny arbetsbok, tilldelar en makrokod till en formulärknapp och sparar utdata i formatet XLSM. En gång kommer du att öppna utdatafilen XLSM i Microsoft Excel, du kommer att se följande makrokod.

 Sub ShowMessage()

    MsgBox "Welcome to Aspose!"

End Sub

Tilldela makro till formulärkontroll i C#

Här är exempelkoden för att generera utdatafilen XLSM med makrokod.

// For complete examples and data files, please go to https://github.com/aspose-cells/Aspose.Cells-for-.NET
// The path to the documents directory.
string dataDir = RunExamples.GetDataDir(System.Reflection.MethodBase.GetCurrentMethod().DeclaringType);
if (!System.IO.Directory.Exists(dataDir))
{
    System.IO.Directory.CreateDirectory(dataDir); 
}

Aspose.Cells.Workbook workbook = new Aspose.Cells.Workbook();
Aspose.Cells.Worksheet sheet = workbook.Worksheets[0];

int moduleIdx = workbook.VbaProject.Modules.Add(sheet);
Aspose.Cells.Vba.VbaModule module = workbook.VbaProject.Modules[moduleIdx];
module.Codes =
    "Sub ShowMessage()" + "\r\n" +
    "    MsgBox \"Welcome to Aspose!\"" + "\r\n" +
    "End Sub";

Aspose.Cells.Drawing.Button button = sheet.Shapes.AddButton(2, 0, 2, 0, 28, 80);
button.Placement = Aspose.Cells.Drawing.PlacementType.FreeFloating;
button.Font.Name = "Tahoma";
button.Font.IsBold = true;
button.Font.Color = System.Drawing.Color.Blue;
button.Text = "Aspose";

button.MacroName = sheet.Name + ".ShowMessage";

dataDir = dataDir + "Output.out.xlsm";
workbook.Save(dataDir);