Inhoud
- routebeschrijving
- Gegevens overbrengen van een gebruikersformulier naar een werkblad
- tips
- waarschuwing
- Wat je nodig hebt
UserForms, ook wel "dialoogvensters" genoemd, zijn grafische vensters waarmee gebruikers informatie in velden kunnen invullen en dergelijke gegevens in Excel-spreadsheets kunnen invoegen. Een UserForm is ingesloten in Excel en wordt uitgevoerd wanneer u een Excel-bestand opent, meestal via een macro. Omdat UserForms gebruik maakt van de Visual Basic-taal, kunnen ze worden aangepast om ervoor te zorgen dat de gegevens in hun velden compleet en geldig zijn voordat ze naar een Excel-spreadsheet worden overgebracht.
routebeschrijving
-
Open Excel en maak een nieuw werkblad door op het item "Bestand" te klikken en "Nieuw" te selecteren. Sla het bestand op als "updated_sheet.xls".
-
Houd het werkblad open en start de Visual Basic-editor door op "Alt" + "F11" te drukken. Maak een nieuw UserForm door op het menu "Invoegen" te klikken en "UserForm" te selecteren. Geef het UserForm een naam voor "transferForm" door het kenmerk "Naam" in het eigenschappemenu te wijzigen. Wijzig het kenmerk "Caption" in "transferForm".
-
Voeg een tekstvak toe aan het formulier door het in de gereedschapset te selecteren door het naar het formulier te slepen en neer te zetten. Geef het tekstvak de naam 'transferInput' in het eigenschappenvenster. Als de toolbox niet open is, ga dan naar "View" en "Toolbox".
-
Voeg een updateknop toe aan het formulier. Selecteer een "Command Button" uit de toolbox, sleep het en laat het op het formulier vallen. Geef de opdrachtknop voor "transferButton" in het eigenschappenvenster een naam en wijzig het attribuut "Onderschrift" in "Blad vernieuwen".
-
Voeg een knop toe om het formulier te sluiten. Selecteer een tweede "Command-knop" in de toolbox, sleep het en laat het op het formulier vallen. Noem de opdrachtknop als "closeButton" in het eigenschappenvenster en verander het attribuut "Caption" in "Close Form".
-
Open de Visual Basic-editor door te dubbelklikken op de knop "transferButton". Voer de volgende code in de functie "transferButton_click ()" in, die gevulde informatie in het tekstvak naar het werkblad "worksheet_dual.xls" zal overbrengen wanneer de gebruiker op de knop klikt. Sluit de code-editor.
Private Sub transferButton_Click () Dim transferWorksheet as Worksheet Set transferWorksheet = Worksheets ("Sheet1") transferWorksheet.Cells (1,1). Value = Me.transferInput.Value End Sub
-
Open de Visual Basic-code-editor opnieuw door te dubbelklikken op de knop "closeButton". Voeg de volgende code toe aan de functie "closeButton_Click ()", waarmee het formulier wordt gesloten wanneer de gebruiker op de knop klikt. Sluit de code-editor.
Private Sub closeButton_Click () Unload Me End Sub
-
Voer de formuliercode uit door op "Uitvoeren" en vervolgens op "Sub- / gebruikershandleiding uitvoeren" te klikken. Vul het tekstveld in en klik op de knop "TransferButton". Controleer of de gegevens correct zijn overgedragen naar de eerste cel in het werkblad. Sla het UserForm op en sluit het.
-
Gebruik een Excel-gebeurtenisprocedure om het UserForm te openen wanneer een gebruiker het werkblad opent. Open "Project Explorer" en dubbelklik op het codevenster "ThisWorkbook". Voeg de onderstaande macro in, die het formulier opent wanneer het werkblad wordt geopend. Sla Visual Basic op en sluit het.
Privé Sub Werkboek_Open () transferForm.Show End Sub
-
Open het bestand "updated_sheet.xls" opnieuw. Het formulier wordt geopend. Typ wat tekst in het veld en klik op de knop "TransferButton". De tekst die u in het formulier invult, wordt overgebracht naar de eerste cel van het werkblad.
Gegevens overbrengen van een gebruikersformulier naar een werkblad
tips
- Om het eigenschappenvenster of de projectverkenner te openen, selecteert u de menu-items "Beeld" in de Visual Basic-editor.
- Als u de grootte van de besturingselementen die op het formulier zijn toegevoegd, wilt wijzigen, gebruikt u de kleine vierkanten die worden weergegeven wanneer het besturingselement is geselecteerd.
- Probeer een of andere validatie aan het formulier toe te voegen om te voorkomen dat gebruikers ongeldige gegevens invoeren.
waarschuwing
- Macro's worden niet in alle versies van Excel uitgevoerd.
- Sommige Excel-beveiligingsinstellingen staan niet toe dat macro's worden uitgevoerd.
- Ondersteuning voor de Visual Basic-editor is verwijderd in Excel 2008, voor Mac.
Wat je nodig hebt
- Microsoft Excel met een Visual Basic-editor