自定義選單欄
if bar.builtin=falsethen
msgbox本工作簿建立了自定義工具欄,其名稱為:&bar.name
end if
next
顯示選單欄
值n為:
1worksheetmenubar
2chartmenubar
3standard
4formatting
5pivottable
6chart
7reviewing
8forms
10externaldata
11formulaauditing
12fullscreen
14visualbasic
15web
16controltoolbox
19watchwindow
21borders
22protection
24list
26drawing
69wordart
70picture
74organizationchart
設定選單命令
.caption="命令名稱"
.onaction="巨集名"
end with
x為:data
tools
cell
設定選單命令控制項
.begingroup=true/false
.execute
.enabled=false/true
.delete
.reset
end with
設定子選單
with commandbars(x).controls(y).controls(z)
.controls.add(type:=msocontrolbutton,before:=1).caption="命令名稱"
.controls("命令名稱").onaction="巨集名"
end with
.enabled=false/true
.delete
.reset
end with
設定快捷選單
setmybar=commandbars.add(name:="名稱",position:=msobarpopup,temporary:=true)
setmyitem=mybar.controls.add(type:=msocontrolbutton,id:=i)
cancel=true
i為:檔案編輯檢視
18新建(&n)...128撤消723普通(&n)
23開啟(&o)„37重複清除(&r)724分頁預覽(&p)
106關閉(&c)21剪下(&t)5746任務窗格(&k)
3儲存(&s)19複製(&c)30045工具欄(&t)
748另存為(&a)...809office剪貼簿(&b)849編輯欄(&f)
3823另存為網頁(&g)...22貼上(&p)850狀態列(&s)
846儲存工作區(&w)...755選擇性貼上(&s)...762頁首和頁尾(&h)...
5905檔案搜尋(&h)...2787貼上為超連結(&h)1594批註(&c)
7994許可權(&m)...30020填充(&i)950檢視管理器(&v)...
3655網頁預覽(&b)30021清除(&a)178全屏顯示(&u)
247頁面設定(&u)...478刪除(&d)...925顯示比例(&z)...
30255列印區域(&t)847刪除工作表(&l)
109列印預覽(&v)848移動或複製工作表(&m)...
4列印(&p)...1849查詢(&f)...
30095傳送(&d)313替換(&e)...
750屬性(&i)757定位(&g)...
752退出(&x)759鏈結(&k)...
961物件(&o)
插入工具資料
295單元格(&e)...2拼寫檢查(&s)...928排序(&s)...
296行(&r)7343資訊檢索(&r)...30031篩選(&f)
297列(&c)6122錯誤檢查(&k)...860記錄單(&o)...
852工作表(&w)31155語音(&h)861分類彙總(&b)...
1957圖表(&h)...7710共享工作區(&d)...2034有效性(&l)...
308符號(&s)...2040共享工作簿(&b)...862模擬運算表(&t)...
1特殊符號(&y)...30138修訂(&t)806分列(&e)...
509分頁符(&b)2044比較和合併工作簿(&w)...863合併計算(&n)„
385函式(&f)...30029保護(&p)30032組及分級顯示(&g)
30023名稱(&n)30468聯機協作(&n)2915資料透視表和資料透檢視(&p)...
1589批註(&m)856單變數求解(&g)...30101匯入外部資料(&d)
30180(&p)857方案(&e)...31276列表(&i)
1032圖示(&g)...30028公式審核(&u)31268xml(&x)
546物件(&o)...30017巨集(&m)459重新整理資料(&r)
1576超連結(&i)...943載入巨集(&i)...
793自動更正選項(&a)...
797自定義(&c)...
522選項(&o)...
視窗格式
303新建視窗(&n)855單元格(&e)...
298重排視窗(&a)...30024行(&r)
7698併排比較(&b)30025列(&c)
865隱藏(&h)30026工作表(&h)
866取消隱藏(&u)..786自動套用格式(&a)...
302拆分(&s)3058條件格式(&d)...
443凍結窗格(&f)254樣式(&s)...
30136拼音指南(&t)
禁用快捷選單
for each mybar in commandbars
if mybar.type=msobartypepopup then
mybar.enabled=false
end if
next
快捷鍵設定
x為:or
或~(波形符)或到
^(插入符號)
%(百分號)
設定右鍵選單
.faceid="圖示代號"
.caption="顯示名稱"
.onaction="巨集名"
end with
禁止鍵盤滑鼠輸入
選單欄顯示工作表標籤
layui自定義工具欄
給大家分享的功能是layui自定義工具欄 功能效果 開啟資料 頭部工具欄區域 關鍵引數 引數型別 string dom boolean 引數說明 demo 指向自定義工具欄模板選擇器 直接傳入工具欄模板字元 true 僅開啟工具欄,不顯示左側模板 default 讓工具欄左側顯示預設的內建模板 在這...
openlayers自定義工具欄
因為業務要求,去年寫過基於openlayer的工具欄,網上有些工具欄的文章,但是都沒什麼人提供原始碼學習。希望我的demo能幫助大家更好的理解與開發,有什麼不足請見諒,這裡說下我的基本的實現。openlayer上有些例子,建議熟讀文件後再來看本例 所有的相關檔案都放在map資料夾中,mapconfi...
easyui自定義工具欄
easyui的彈出框上有工具欄 上方 和按鈕欄 下方 工具欄的按鈕預設靠左,自己沒找到調整位置的屬性。為了在右上角放乙個關閉按鈕,只能使用easyui的屬性自定義乙個工具欄,主要的實現為 建立乙個div作為工具欄,在div中放要顯示的按鈕,按鈕在div中向右靠齊 在彈窗框div中新增屬性 data ...