UserForms zijn schermen die gebruikers invoeren gegevens in om te communiceren met een programma geschreven in Visual Basic for Applications ( VBA ) . Programmeurs uitbreiding van de set van tools voor Microsoft Word standaard , Excel en Access deze aangepaste formulieren en bevolken ze met de knoppen , schuiven en tekstvakken aangepast zijn aan de ingang van hun VBA -programma's moeten draaien . Bewerken van een VBA userform gaat met behulp van het formulier ontwerp venster van de VBA geïntegreerde ontwikkelomgeving ( IDE ) . Deze omgeving is ingebed in elke toepassing van de Office-suite . Editing UserForms maakt het mogelijk voor gebruikers om sneller en efficiënter te communiceren met uw VBA -programma's . Wat je nodig hebt
Microsoft Word
Toon Meer Aanwijzingen
Open Microsoft Word 1 , druk dan op " Alt " en " F11 " om de VBA IDE voeren . < Br >
Klik 2 " invoegen " en vervolgens " UserForm " om een nieuwe userform voor uw VBA -programma . U zult het formulier gebruiken om gebruikersgegevens te voorzien voor een kort programma dat een Word-tabel bevolkt .
3 de " Userform " Item Dubbelklik op in het " Project" paneel aan de linkerkant van het scherm . Dit zal de gereedschapskist die besturingselementen bevat voor u te plaatsen op het formulier bloot .
4 Sleep een opdracht knop controle uit de gereedschapskist op het formulier . Plaats de doos in de buurt van het midden van de vorm van de onderste gedeelte .
5 Sleep een tekstvak uit de gereedschapskist op het formulier , boven en rechts van de opdracht knop . Sleep een tweede tekstvak uit de gereedschapskist om eventuele userform locatie die direct over is van het eerste tekstvak .
6 Dubbelklik op de opdracht knop toevoegen aan het gedeelte van de IDE voor programma code in te voeren .
7 Plak de volgende programmacode in het venster code :
Als ( ActiveDocument.Tables.Count = 0 ) ActiveDocument.Tables.Add Selection dan
. waaier , 1 , End 2
Als ActiveDocument.Tables
( 1 ) . Rijen ( 1 ) . Cells ( 1 ) . Range.Text = TextBox1.Text
ActiveDocument . Tafels ( 1 ) . Rijen ( 1 ) . Cells ( 2 ) . Range.Text Dit programma = TextBox2.Text
kopieert de gegevens van de gebruiker invoert in de tekstvakken in een nieuwe tabel in de huidige Word-document . Maar de volgorde waarin de userform verwacht inbreng verschilt van de volgorde waarin de gebruiker verwacht . U zult het formulier bewerken om dat probleem op te lossen .
Druk op "F5 " 8 om het programma uit te voeren. De userform niet plaatst de tekst invoegteken in het eerste tekstvak zoals het hoort .
9 Klik op de meest linkse tekstvak , typ een tekst . Druk op " Tab " om naar het volgende veld in het formulier . Het programma belicht de opdracht knop in plaats van de verwachte tweede tekstvak .
Klik 10 in het tweede tekstvak en voer de tekst , klik vervolgens op de opdracht knop . Het programma maakt een nieuwe tabel in het document en deze gevuld met de tekst uit de tekstvakken .
11 Klik op de " X " in het userform de rechterbovenhoek om het programma te beëindigen .
12 Klik meest linkse tekstvak het userform 's , klik in het veld " tabindex " van de "Eigenschappen " venster . Het veld " tabindex " leest momenteel " 2 ", wat aangeeft dat het de laatste van de drie knoppen op het formulier om de gebruikersinvoer ontvangt .
Type 13 een " 0 " op de 2 , dan klik op het meest rechtse tekstvak . Typ " 1 " in het veld " tabindex " , klik vervolgens op de opdracht knop . Type een " 2 " in het veld " tabindex " .
14 Voer het programma opnieuw , met behulp Stap 8 's instructies. Het programma belicht nu de tekstvakken in de juiste volgorde als u op de toets " Tab " .
|
