フォームコントロールにマクロを割り当てる
Contents
[
Hide
]
Aspose.Cells for Python via .NETは、ボタンなどのフォームコントロールにマクロコードを割り当てることを可能にします。ワークブック内のフォームコントロールに新しいマクロコードを割り当てるために、Shape.macro_nameプロパティを使用してください。
新しいワークブックを作成し、フォームボタンにマクロコードを割り当て、出力をXLSM形式で保存するサンプルコードを以下に示します。作成されたXLSMファイルをMicrosoft Excelで開くと、指定のマクロコードが表示されます。
Sub ShowMessage()
MsgBox "Welcome to Aspose!"
End Sub
Pythonでフォームコントロールにマクロを割り当て
新しいXLSM ファイルとマクロコードを生成するサンプルコードを以下に示します。
This file contains hidden or 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
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) |