Tip: andere talen zijn Google-Vertaald. Je kunt het English versie van deze link.
Log in
x
or
x
x
Registreren
x

or

Hoe de waarde van de Combo Box naar een actieve cel in Excel te kopiëren?

In sommige gevallen moet u de geselecteerde waarde van een keuzelijst met invoervak ​​naar de actieve cel kopiëren. Normaal gesproken moet u in de keuzelijst met invoervak ​​stappen, kopiëren en handmatig in de actieve cel plakken. Dit artikel introduceert een handige methode om de actieve cel automatisch bij te werken tijdens het selecteren van waarden in een keuzelijst met invoervak.

Kopieer de waarde van de Combo Box naar de actieve cel met VBA-code

VBA 1: Kopieer de waarde van de keuzelijst met invoervak ​​naar actieve cel via Command

VBA 2: waarde van keuzelijst met invoervak ​​automatisch naar actieve cel kopiëren

Tabblad Office Schakel bewerken en browsen met tabbladen in Office in en maak uw werk veel eenvoudiger ...
Kutools voor Excel - De beste Office-productiviteitstool lost de meeste van uw Excel-problemen op
  • Alles hergebruiken: Voeg de meest gebruikte of complexe formules, grafieken en al het andere toe aan uw favorieten en hergebruik ze snel in de toekomst.
  • Meer dan 20-tekstfuncties: Nummer uit tekststring halen; Een deel van de tekst extraheren of verwijderen; Nummers en valuta's omzetten in Engelse woorden ...
  • Tools samenvoegen: Meerdere werkmappen en bladen in één; Meerdere cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Dubbele rijen en som samenvoegen ...
  • Split gereedschap: Gegevens splitsen in meerdere bladen op basis van waarde; Eén werkmap naar meerdere Excel-, PDF- of CSV-bestanden; Eén kolom naar meerdere kolommen ...
  • Plakken overslaan Verborgen / gefilterde rijen; Tel en som op achtergrondkleur; Maak een verzendlijst en Verzend e-mails op waarde van Cell...
  • Super filter: Maak geavanceerde filterschema's en pas deze toe op alle bladen; Soort per week, dag, frequentie en meer; filters door vetgedrukt, formules, commentaar ...
  • Meer dan 300 krachtige functies; Werkt met Office 2007-2019 en 365; Ondersteunt alle talen; Eenvoudig inzetbaar in bedrijf; Volledige functionaliteit 60-daagse gratis proefversie.

pijl blauwe rechterbel Kopieer de waarde van de Combo Box naar de actieve cel met VBA-code


De onderstaande VBA-codes kunnen u helpen de waarde van de keuzelijst met invoervak ​​automatisch naar actieve cellen te kopiëren. Doe het als volgt.

VBA 1: Kopieer de waarde van de keuzelijst met invoervak ​​naar actieve cel via de opdrachtknop

1. Allereerst moet u een Command-knop invoegen in het werkblad zoals hieronder wordt getoond.

2. Klik met de rechtermuisknop op de opdrachtknop en klik vervolgens op Bekijk code vanuit het rechtsklikmenu. Zie screenshot:

3. In het opduiken Microsoft Visual Basic voor toepassingen venster, vervang dan de originele code in het codevenster met de onderstaande VBA-code.

VBA-code: waarde Combo Box naar actieve cel kopiëren

Private Sub CommandButton1_Click()
   ActiveCell.Value = Me.ComboBox1.Text
End Sub

Notes: In de code is CommandButton1 de naam van de ingevoegde opdrachtknop en is ComboBox1 de naam van de keuzelijst met invoervak ​​waaruit u de waarde kopieert. Wijzig ze als je nodig hebt.

4. druk de anders + Q toetsen om het te sluiten Microsoft Visual Basic voor toepassingen venster.

Als u nu de waarde van de keuzelijst met invoervak ​​moet kopiëren naar de actieve cel, selecteert u de cel en klikt u vervolgens op de knop Opdrachten om dit voor elkaar te krijgen.

VBA 2: waarde van keuzelijst met invoervak ​​automatisch naar actieve cel kopiëren

De onderstaande VBA-code kan u helpen de actieve cel automatisch bij te werken tijdens het selecteren van waarden in een keuzelijst met invoervak. Je kunt het als volgt doen.

1. Zorg ervoor dat de Ontwerpmodus is ingeschakeld onder de ontwikkelaar Tab.

2. Klik met de rechtermuisknop op de keuzelijst met invoervak ​​waar u de waarde van kopieert en klik vervolgens op Bekijk code vanuit het rechtsklikmenu. Zie screenshot:

3. In het opduiken Microsoft Visual Basic voor toepassingen venster, vervang de originele code in de Code venster met de onderstaande VBA-code.

VBA-code: waarde Combo Box naar actieve cel kopiëren

Private Sub ComboBox1_Change()
  ActiveCell.Value = Me.ComboBox1.Value
End Sub

Notes: In de code is ComboBox1 de naam van de keuzelijst met invoervak ​​waaruit u de waarde wilt kopiëren.

4. druk de anders + Q om het venster Microsoft Visual Basic for Applications te sluiten en de ontwerpmodus uit te schakelen onder het tabblad Ontwikkelaar.

Vanaf nu wordt bij het selecteren van de waarde uit de keuzelijst met invoervak ​​dit geselecteerde record automatisch in de actieve cel weergegeven.


pijl blauwe rechterbelGerelateerde artikelen:


Kutools voor Excel - De beste Office-productiviteitstool Verhoog uw productiviteit met 80%

  • visfuik: Snel invoegen complexe formules, grafieken en alles wat je eerder hebt gebruikt; Coderen van cellen met wachtwoord; Maak een mailinglijst en stuur e-mails ...
  • Super Formula Bar (bewerk eenvoudig meerdere regels tekst en formule); Lay-out lezen (gemakkelijk grote aantallen cellen lezen en bewerken); Plakken op gefilterd bereik...
  • Cellen / rijen / kolommen samenvoegen zonder gegevens te verliezen; Inhoud gesplitste cellen; Combineer dubbele rijen / kolommen... voorkomen dubbele cellen; Ranges vergelijken...
  • Selecteer Dupliceren of Uniek rijen; Selecteer Lege rijen (alle cellen zijn leeg); Super Find en Fuzzy Find in veel werkboeken; Willekeurig selecteren ...
  • Exacte kopie Meerdere cellen zonder formule-referentie te wijzigen; Automatisch referenties maken naar meerdere vellen; Voeg kogels toe, Selectievakjes en meer ...
  • extract Text, Tekst toevoegen, verwijderen op positie, Verwijder de spatie; Subtotalen voor paging maken en afdrukken; Converteren tussen cellen Inhoud en opmerkingen...
  • Super filter (bewaar en pas filterschema's toe op andere bladen); Geavanceerde sortering per maand / week / dag, frequentie en meer; Speciaal filter door vet, cursief ...
  • Combineer werkmappen en werkbladen; Tabellen samenvoegen op basis van sleutelkolommen; Gegevens splitsen in meerdere bladen; Batch Converteer xls, xlsx en PDF...
  • Meer dan 300 krachtige functies. Ondersteunt Office / Excel 2007-2019 en 365. Ondersteunt alle talen. Eenvoudig te implementeren in uw onderneming of organisatie. Volledige functionaliteit 60-daagse gratis proefversie.
kte-tab 201905

Tabblad Office Brengt interface met tabbladen naar Office en maakt uw werk veel eenvoudiger

  • Bewerken en lezen met tabbladen inschakelen in Word, Excel, PowerPoint, Publisher, Access, Visio en Project.
  • Open en maak meerdere documenten in nieuwe tabbladen van hetzelfde venster, in plaats van in nieuwe vensters.
  • Verhoogt uw productiviteit met 50% en verlaagt dagelijks honderden muisklikken voor u!
Officetab onderaan
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.