如何在Visio 2016的头脑风暴模具中创建类似于添加多个主题的自定义形状

Question

背景

我不得不多次在Visio中绘制多个矩形。我注意到在Visio中，头脑风暴模板的模具的形状为“添加多个主题”。当您将此形状带到文档页面时，它会提示您输入以换行符分隔的主题名称。当您根据行数提供此选项时，带有提供的文本的主题（水平行）将添加到文档页面。

野心

在Visio中使用矩形创建相似的（添加多个主题）自定义形状。即，当我希望将其放置在文档表上时具有一个名为“添加多个组件”的形状，它应提示输入期望用换行符分隔的组件的名称。提供这些名称后，应将包含文本的许多矩形添加到Visio文档中。

到目前为止

我探索了以下途径-

1. 我打开了模板，从中启发了Visio，并检查了

   a）宏代码，当您将形状放在文档页面中时，它可能会生成其他形状。

  

[观察] -模具中没有编写宏代码。

b）形状表中的内置函数，该函数在EventDrop或EventMultiDrop事件中被调用。

  

[观察] -单元格中显示文本“无公式”

1. 在互联网上（Googled :)搜索了如何使用与该问题的标题相同的文字来实现这一目标。

  

[观察] -我得到与

相关的结果      

  
1. 添加自定义属性
  
2. 将数据链接到形状
  
3. 如何有效使用Visio的思维导图功能。
  

要求

1. 如何设计能够实现雄心壮志的自定义形状？

Answer 1

您将需要使用哪些模板   -一个模块   - 表单   -高手 母版（放置的形状）将在其放置的单元格中包含一个调用子例程（例如，子CallForm）的公式，该例程本身会调用该表单。 ondrop单元格中的公式将写为：     = CALLTHIS（“ MyModule”，“ CallForm”）

子CallForm（形状为shp）     shp.delete'形状不再需要     myForm.show   结束子

在表格中，您将有两个文本框：供使用的母版和条目列表。 然后，一个按钮可以触发命令：   ActivePage.Drop Application.Documents.Item（[AnyStencil]）。Masters.ItemU（[TheChosenMaster]），1,1 要将所需的母版放到位置1,1。