"由于您的安全设置,无法找到或已禁用宏。" PPAM插件从功能区导致此错误,但不是来自代码

时间:2017-10-20 11:08:34

标签: vba powerpoint powerpoint-vba

我有一些VBA PPT宏以及自定义功能区界面。谁的宏可以从代码中正常工作但是当它被制作成ppam插件并添加到PPT插件时,一些命令会抛出这个错误信息,但是宏工作得很好,只是想阻止这个烦人的消息。子和函数都是公共的,它仍然显示相同的错误。请帮忙

Public Sub frmFeedNotes_show()
frmFeedNotes.Show
End Sub

<!--RibbonX Visual Designer 1.94 for Microsoft PowerPoint 16.0. XML Code produced on 2017-10-06-->
<customUI  xmlns="http://schemas.microsoft.com/office/2009/07/customui" >
    <ribbon >
        <tabs >
            <tab 
                id="zenTools"
                label="Zen Tools"

                visible="true">

                <group 
                    id="FileProp"
                    label="File Properties"
                    visible="true">

                    <menu id="mnuExport" 
                        label="Export Slides" 
                        showImage="true"
                        imageMso="ExportToVCardFile" size="large">

                        <button id="btnFeedNotes"
                            label="Feed Notes*"
                            imageMso="FootnotesEndnotesShow"
                            onAction="frmFeedNotes_show" />
                        <button id="btnNotesCSV"
                            label="Notes as CSV"
                            imageMso="CommaSign"
                            onAction="ExportNotes" />
                    </menu>
                </group >

            </tab >
        </tabs >
    </ribbon >
</customUI >

1 个答案:

答案 0 :(得分:0)

需要为onAction插入模块名称,例如模块1

<button id="btnNotesCSV"
                        label="Notes as CSV"
                        imageMso="CommaSign"
                        onAction="Module1.ExportNotes" />

功能区按钮也会将参数传递给子,因此希望它接收参数。为宏添加参数,如下所示

Public Sub frmFeedNotes_show(ByVal control As IRibbonControl)
    frmFeedNotes.Show
End Sub