2013-11-22 6 views
1

몇 개의 그룹이있는 간단한 리본이 있습니다.Excel 2007 리본

리본에있는 그룹의 가시성을 전환하려면이 리본을 VBA를 통해 수정해야합니다. Range ("A1")에 셀 값으로 "A"가 있다고 가정 해 보겠습니다. 이 그룹이 보일 것입니다. 비어 있으면 숨겨집니다. 여기

그 리본의 XML입니다, 내가 전환 할 필요가있는 그룹은 다음과 같습니다

<group id="rxGrp_DeveloperTools" label="Developer Tools" getVisible="rxGrp_DeveloperTools_GetVisible"> 

그런 다음에 이와 같은 서브를 사용

<group id="rxGrp_DeveloperTools" label="Developer Tools"> 
+1

http://www.rondebruin.nl/win/s2/win012.htm –

답변

2

리본 그룹이 마크 업을 시도 그룹 표시/숨기기 :

Sub rxGrp_DeveloperTools_GetVisible(control As IRibbonControl, ByRef bVisible) 

    Dim sht as Worksheet 
    Set sht = ActiveWorkbook.Sheets(1) 

    If sht.Range("A1").Value = "A" Then 
     bVisible = True 
    Else 
     bVisible = False 
    End If 

End Sub