Скрыть, но показать несколько других групп вкладок на пользовательской ленте, которая также потребует возможности скрыть наоборот - PullRequest
0 голосов
/ 08 мая 2019

У меня есть пользовательская лента, у меня есть несколько групп, которые мне нужно будет скрыть 1 группу, но другие группы будут отображаться. В примере показана возможность показывать только 1 группу, а не другую. Кто-нибудь знает, как я могу изменить, чтобы показать другие группы?

xml:

<group id="MyCustomGroup2" label="First Controls"  getVisible = "GetVisible" tag="First" >  
     <button id="customButton3" label="Label 1" size="normal" onAction="TransferNA" imageMso="FileServerTransferDatabase" tag="transfer"  />    
</group>    

<group id="MyCustomGroup3" label="Second Controls" getVisible = "GetVisible" tag="Second">  
     <button id="customButton5" label="Label 2" size="normal" onAction="HideInfor" imageMso="FormHeaderOrFooterShowHide" /> 
</group>    

<group id="MyCustomGroup4" label="Third Controls" getVisible = "GetVisible" tag="Third">    
     <button id="customButton4" label="Label 3" size="normal" onAction="ShowInfor" imageMso="FormHeaderOrFooterShowHide" /> 
</group>

Dim Rib As IRibbonUI
Dim MyTag As String
Sub RibbonOnLoad(ribbon As IRibbonUI)
    Set Rib = ribbon
End Sub

Sub GetVisible(control As IRibbonControl, ByRef visible)
    If control.Tag Like MyTag Then
        visible = True
    Else
        visible = False
    End If
End Sub

Sub RefreshRibbon(Tag As String)
    MyTag = Tag
    If Rib Is Nothing Then
        MsgBox "Error, restart your workbook"
    Else
        Rib.Invalidate
    End If
End Sub


Sub HideFirstGroupButShowSecondAndThird()
    Call RefreshRibbon(Tag:="First") 'Hide First but show Second and Third???????
End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...