Difference between revisions of "A 'hello world' VBA program"

Public Sub CreateMyUI()
 
    ' Get a reference to the default rxCustomUI instance
    Dim myCustomUI As rxCustomUI
    Set myCustomUI = rxCustomUI.defaultInstance
 
    ' Create a new tab
    Dim myTab As rxTab
    Set myTab = rxCustomUI.defaultInstance.ribbon.tabs.Add(New rxTab)
 
    ' Give the new tab a label
    myTab.Label = "My First Tab"
 
 
    ' Render the UI
    myCustomUI.Refresh
 
End Sub