CommandBar

Sub 获取所有CommandBarID() Dim wdApp As Object ' Word.Application Dim cb As Object ' CommandBar Dim s As String, id As String Set wdApp = CreateObject("Wo ......