如何在打開的工作簿上用指定的數(shù)據(jù)填充組合框?
通常,可以通過將單元格引用輸入到組合框?qū)傩缘腖istFillRange字段中,以一定范圍的單元格數(shù)據(jù)填充組合框(ActiveX控件)。 如果要直接用指定的數(shù)據(jù)填充組合框而不用手動(dòng)指定其屬性,本文中的方法可以為您提供幫助。
使用VBA代碼填充具有指定數(shù)據(jù)的組合框
使用VBA代碼填充具有指定數(shù)據(jù)的組合框
驚人的! 在 Excel 中使用高效的選項(xiàng)卡,如 Chrome、Firefox 和 Safari!
每天節(jié)省50%的時(shí)間,并減少數(shù)千次鼠標(biāo)單擊!
此方法可以幫助您在打開工作簿時(shí)直接用指定的數(shù)據(jù)填充組合框。 請(qǐng)執(zhí)行以下操作。
1。 按 其他 + F11 同時(shí)打開 Microsoft Visual Basic應(yīng)用程序 窗口。
2.在 Microsoft Visual Basic應(yīng)用程序 窗口,雙擊 的ThisWorkbook 在左窗格中打開 的ThisWorkbook 代碼編輯器。 然后將下面的VBA代碼復(fù)制到其中。 看截圖:

VBA代碼:在打開的工作簿上用指定的數(shù)據(jù)填充一個(gè)組合框
Private Sub Workbook_Open()
Updated by Extendoffice 2018/1/30
With Sheet1.ComboBox1
.Clear
.AddItem "Select a Fruit"
.AddItem "Apple"
.AddItem "Banana"
.AddItem "Peach"
.AddItem "Pineapple"
.AddItem "Watermelon"
.Text = .List(0)
End With
End Sub
Notes:
1). ComboBox1 is the name of the combo box you will fill data, and this combo box locates in Sheet1. Please change them as you need.
2). And replace the data in the code with your needed one.
3. Save the workbook as Excel Macro-Enabled Workbook format and close it.
4. Reopen the workbook, you will see the combo box has been populated with specified data as below screenshot:
Related articles:
How to copy Combo Box value to active cell in Excel?
How to display date format in combo box output in Excel?
How to prevent or disable typing in a combo box in Excel?
How to populate Combo Box with data of Named Range in Excel?
Best Office Productivity Tools
Transform Hours into Minutes with Kutools for Excel!
Ready to supercharge your Excel tasks? Harness the power of Kutools for Excel - your ultimate time-saving tool. Streamline intricate tasks and glide through your data like a pro. Experience Excel at lightning speed!
Why You Need Kutools for Excel
??? Over 300 Powerful Features: Kutools is packed with more than 300 advanced features, simplifying your work in over 1500 scenarios.
?? Superior Data Processing: Merge cells, remove duplicates, and perform advanced data conversions – all without breaking a sweat!
?? Efficient Batch Operations: Why put in extra effort when you can work smart? Import, export, combine, and tweak data in bulk with ease.
?? Customizable Charts and Reports: Access a broad variety of additional charts and generate insightful reports that tell a story.
??? Powerful Navigation Pane: Gain an advantage with the robust Column Manager, Worksheet Manager, and Custom Favorites.
?? Seven Types of Drop-down Lists: Make data entry a breeze with drop-down lists of various features and types.
?? User-Friendly: A breeze for beginners and a powerful tool for experts.
Download Now and Soar Through Time with Excel!
Read More... Free Download... Purchase...
Office Tab Brings Tabbed interface to Office, and Make Your Work Much Easier
Enable tabbed editing and reading in
Word, Excel, PowerPoint, Publisher, Access, Visio and Project.
Open and create multiple documents in new tabs of the same window, rather than in new windows.
Increases your productivity by 50%, and reduces hundreds of mouse clicks for you every day!
Read More... Free Download... Purchase...
版權(quán)聲明:本文內(nèi)容由網(wǎng)絡(luò)用戶投稿,版權(quán)歸原作者所有,本站不擁有其著作權(quán),亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容,請(qǐng)聯(lián)系我們jiasou666@gmail.com 處理,核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。
版權(quán)聲明:本文內(nèi)容由網(wǎng)絡(luò)用戶投稿,版權(quán)歸原作者所有,本站不擁有其著作權(quán),亦不承擔(dān)相應(yīng)法律責(zé)任。如果您發(fā)現(xiàn)本站中有涉嫌抄襲或描述失實(shí)的內(nèi)容,請(qǐng)聯(lián)系我們jiasou666@gmail.com 處理,核實(shí)后本網(wǎng)站將在24小時(shí)內(nèi)刪除侵權(quán)內(nèi)容。