資源描述:
《自定義工具欄按鈕圖標_vba教程、excel vba編程、vba視頻、vba控件,》由會員上傳分享,免費在線閱讀,更多相關內容在行業(yè)資料-天天文庫。
1、自定義工具欄按鈕圖標_VBA教程、excelVBA編程、VBA視頻、VBA控件,21:06來源:未知作者:vba技術聯盟點擊:161次在創(chuàng)建自定義的工具欄時,除了可以為工具欄按鈕添加Excel內置的圖標外,還能為工具欄按鈕添加自定義的圖標,如下面的代碼所示。復制內容到剪貼板代碼:#001SubAddCustomButton()#002DimxBarAsCommandBar#003DimxButtonAsCommandBarButton#004OnErrorResume【絕密】快速通過2010年中級會計職稱!點擊進入在創(chuàng)建自定義的工具欄時,除了可以為工具欄按鈕添加Excel內置的圖
2、標外,還能為工具欄按鈕添加自定義的圖標,如下面的代碼所示。復制內容到剪貼板代碼:#001SubAddCustomButton()#002DimxBarAsCommandBar#003DimxButtonAsCommandBarButton#004OnErrorResumeNext#005Application.CommandBars("CustomBar").Delete#006SetxBar=CommandBars.Add("CustomBar",msoBarTop)#007SetxButton=xBar.Controls.Add(msoControlButton)#008Wi
3、thxButton#009.Picture=LoadPicture(ThisWorkbook.Path&"P.BMP")#010.Mask=LoadPicture(ThisWorkbook.Path&"M.BMP")#011.TooltipText="ExcelHome論壇"#012EndWith#013xBar.Visible=True#014SetxBar=Nothing#015SetxButton=Nothing#016EndSub代碼解析:AddCustomButton過程創(chuàng)建自定義工具欄,并設置工具欄的按鈕自定義圖標。第6、7行代碼,使用Add方法在Excel窗口中
4、添加自定義工具欄和按鈕。請參閱技巧89。第9行代碼,設置工具欄按鈕的Picture屬性為同一目錄中的p.bmp圖片。應用于CommandBarButton對象的Picture屬性返回一個IPictureDisp對象,表示CommandBarButton對象的圖像,語法如下:expression.Picture參數是必需的,返回一個CommandBarButton對象。指定對象的Picture屬性就能設置對象的圖像第10行代碼,設置工具欄按鈕的Mask屬性為同一目錄中的m.bmp圖片。為了使工具欄按鈕圖標透明顯示,在指定對象的Picture屬性后,還需要指定對象的Mask屬性。應用
5、于CommandBarButton對象的Mask屬性返回表示CommandBarButton對象的屏蔽圖像的IPictureDisp對象,語法如下:expression.Mask參數是必需的,返回一個CommandBarButton對象。屏蔽圖像決定按鈕圖像透明的部分。在創(chuàng)建作為屏蔽圖像使用的圖像時,所有要透明的區(qū)域應該為白色,所有要顯示的區(qū)域應該為黑色。第11行代碼,設置按鈕的“屏幕提示”為“ExcelHome論壇”。運行AddCustomButton過程,創(chuàng)建自定義工具欄,并設置工具欄按鈕的圖標,如圖所示。Snap1.jpg(1.38KB)2009-3-2108:42--【絕
6、密】快速通過2010年中級會計職稱!點擊進入注會考試高分秘訣注會如何一次過五門會計職稱考試高分秘訣頂級名師帶你輕松過會計職稱會計職稱培訓大優(yōu)惠!東奧會計培訓大優(yōu)惠!我的奮斗歷程-努力代表汗勤奮+方法=兩個半月通過6門我的CPA考試攻略(12月20日更新)2010年會計職稱學習最新推出完美學習計劃張志鳳給2010職稱考生的實務學習指導閆華紅給2010年中級財管考生的預習指導(責任編輯:admin)多個文本框數據相加excelvba實現限制文本框的輸入長度文本框的自動換行excelvba代碼如何將光標返回文本框中(excelvba限制文本框的輸入長度(excelvba)設置文本框數據
7、格式excelvba代碼設置文本框數據格式excelvba代碼文本框添加右鍵快捷菜單------分隔線----------------------------vba技術聯盟推薦教程ExcelVBA基礎入門ExcelVBA實戰(zhàn)技巧精粹(附光盤)中文版Excel2007高級VBA編程寶典ExcelVBA從入門到精通(附CD-ROM)WordVBA高效排版范例應用Excel應用大全Excel實戰(zhàn)技巧精粹(附光盤)Excel數據處理與分析實戰(zhàn)技巧精粹Excel數據透視表應用大全Excel