Een combobox is een vervolgkeuzelijst van waaruit een gebruiker een item kan selecteren of zijn/haar eigen keuze kan invullen. om een te maken combobox in Excel VBA, voer de volgende stappen uit.
1. Klik op het tabblad Ontwikkelaars op Invoegen.
2. Klik in de groep ActiveX-besturingselementen op Keuzelijst met invoervak.
3. Sleep een keuzelijst met invoervak op uw werkblad.
Opmerking: u kunt de naam van een besturingselement wijzigen door met de rechtermuisknop op het besturingselement te klikken (zorg ervoor dat Ontwerpmodus is geselecteerd) en vervolgens op Eigenschappen te klikken. Voor nu laten we ComboBox1 als de naam van de combobox.
Maak een werkmap-opengebeurtenis. Code die is toegevoegd aan de Workbook Open Event wordt uitgevoerd door Excel VBA wanneer u de werkmap opent.
4. Open de Visual Basic-editor.
5. Dubbelklik op Deze Werkmap in de Projectverkenner.
6. Kies Werkmap in de linker vervolgkeuzelijst en kies Openen in de rechter vervolgkeuzelijst.
7. Om items aan de combobox toe te voegen, voegt u de volgende coderegels toe aan de Workbook Open Event:
Met Blad1.ComboBox1
.Item "Parijs" toevoegen
.Item "New York" toevoegen
.Item "Londen" toevoegen
Eindigt met
Opmerking: gebruik Blad2 als uw keuzelijst met invoervak zich op het tweede werkblad bevindt, Blad3 als uw keuzelijst met invoervak zich op het derde werkblad bevindt, enz. Als u deze coderegels gebruikt buiten de gebeurtenis Werkboek openen, wilt u misschien de onderstaande coderegels toevoegen vóór deze coderegels. De eerste coderegel wist de combobox. Op deze manier worden uw items niet meerdere keren toegevoegd als u uw code meer dan één keer uitvoert. De tweede coderegel wist uw eigen keuze.
ComboBox1.Clear
ComboBox1.Value = ""
8. Om deze combobox aan een cel te koppelen, klikt u met de rechtermuisknop op de combobox (zorg ervoor dat de ontwerpmodus is geselecteerd) en klikt u op Eigenschappen. Vul D2 in voor LinkedCell.
Opmerking: zie ook de eigenschap ListFillRange om een keuzelijst met invoervak te vullen met een celbereik.
9. Sla het Excel-bestand op, sluit het en open het opnieuw.
Resultaat:
Hoewel het in sommige situaties handig kan zijn om direct een combobox op uw werkblad te plaatsen, is een combobox vooral handig wanneer deze op een gebruikersformulier wordt geplaatst.
