フォームコントロールにマクロを割り当てる

新しいワークブックを作成し、フォームボタンにマクロコードを割り当て、出力をXLSM形式で保存するサンプルコードを以下に示します。作成されたXLSMファイルをMicrosoft Excelで開くと、指定のマクロコードが表示されます。

 Sub ShowMessage()

    MsgBox "Welcome to Aspose!"

End Sub

Pythonでフォームコントロールにマクロを割り当て

新しいXLSM ファイルとマクロコードを生成するサンプルコードを以下に示します。

from aspose.cells import Workbook
from aspose.cells.drawing import PlacementType
from aspose.pydrawing import Color
from os import os, path
# For complete examples and data files, please go to https:# github.com/aspose-cells/Aspose.Cells-for-.NET
# The path to the documents directory.
dataDir = RunExamples.GetDataDir(".")
if notpath.isdir(dataDir):
os.makedirs(dataDir)
workbook = Workbook()
sheet = workbook.worksheets[0]
moduleIdx = workbook.vba_project.modules.add(sheet)
module = workbook.vba_project.modules[moduleIdx]
module.codes = "Sub ShowMessage()" + "\r\n" + " MsgBox \"Welcome to Aspose!\"" + "\r\n" + "End Sub"
button = sheet.shapes.add_button(2, 0, 2, 0, 28, 80)
button.placement = PlacementType.FREE_FLOATING
button.font.name = "Tahoma"
button.font.is_bold = True
button.font.color = Color.blue
button.text = "Aspose"
button.macro_name = sheet.name + ".ShowMessage"
dataDir = dataDir + "Output.out.xlsm"
workbook.save(dataDir)