맑은이슬님..

기억을 더듬어 몇가지 테스트를 해봤는데.. 안되네요? ㅋㅋ

버튼 속성에 width와 height가 있기는 하는데.. 값을 변경해봐도 변화가 없습니다.

기본값은 폭 23, 높이 22인데.. 변경 값이 적용이 안되네요..

Private Sub dhMakeSubMenu(c As CommandBar, lngType As Long, blnBar As Boolean, strOnAction As String, strTip As String, strCaption As String, lngFaceId As Long)

'***********************

'메뉴에 단추 추가하기

'***********************

    Dim cBtn As CommandBarButton

    Set cBtn = c.Controls.Add(Type:=lngType)

    With cBtn

        .BeginGroup = blnBar

        .OnAction = strOnAction

        .TooltipText = strTip

        .Caption = strCaption

        .FaceId = lngFaceId

        .Width = 32

        .Height = 32

    End With

End Sub

그리고.. CommandBarButton을 크게 해 놓은 것을 본 기억도 없구요..

아마.. 안되게 막아놓은거 같습니다.

button 스펙을 변경하지 못하게 해놓은것도 같고..

http://www.archivum.info/microsoft.public.outlook.program_vba/2008-05/00175/Re-CommandBarButton-icon-size.html

암튼.. 컨맨드버튼바로 구현하는 것은 좀 구립니다. @_@;;

리본 메뉴 추천드려요~~ ㅎㅎ

어서 리본메뉴로 갈아타세요~ ^^

아별님~

감사 합니다

괜한 질문으로 고생만 하셨네요?

제가 리본메뉴는 전혀 알지 못해서 손을 델수 가 없네요(시작을 할수가 없어요)

상기 메뉴를 시간이 나시면 리본 메뉴로 변경해서 좀 올려주시면 감사 하겟습니다

(만든것을 보면 응용할수는 있을것 같습니다만...)