返回列表下一主題上一主題發帖

[發問] 有關於增益集自訂工具列的圖形

s13030029

　暱稱: 伊恩

中學生 Rank: 2

帖子: 97
主題: 33
精華: 0
積分: 129
點名: 0
作業系統: Win 7
軟體版本: office 2007
閱讀權限: 20
性別: 男
註冊時間: 2019-5-7
最後登錄: 2022-8-25

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2019-6-20 16:32 | 只看該作者

[發問] 有關於增益集自訂工具列的圖形

#發錯分類重發
我利用程式自製增益集工具列，但是我想要把我的MsobuttonStyle變成圖片中右邊那樣的形式

MsobuttonStyle的形式有下面這些
msoButtonAutomatic                                  預設行為。
msoButtonCaption                                     僅文字。
msoButtonIcon                                                    僅圖像。
msoButtonIconAndCaption                            圖像和文字 (文字位於圖像右側)。
msoButtonIconAndCaptionBelow          圖像 (下方有文字)。
msoButtonIconAndWrapCaption          圖像 (右側有換行文字)。
msoButtonIconAndWrapCaptionBelow 圖像 (下方有換行文字)。
msoButtonWrapCaption                            僅文字 (置中且會換行)。
我用了msoButtonIconAndCaptionBelow但是都沒變，有高手知道怎麼改嗎????????????

Set myButton1 = .Controls.Add(msoControlButton)
With myButton1
.Style = msoButtonIconAndCaption '同時顯示文字和小圖示
.BeginGroup = True
.Caption = "使用說明" '顯示在工具列上的按鈕文字
'.TooltipText = "畫面選擇" '滑鼠移過去時，所顯示的提示文字
.FaceId = 487 '小圖示
.Tag = "MyCustomTag"
.OnAction = "選擇使用說明" '設定按下此鍵時所要執行的巨集
End With

複製代碼

test.rar (125.57 KB)

樓主熱帖

靜思自在 : 盡多少本份，就得多少本事。

返回列表下一主題上一主題