Tutorial for et skjema i Excel

Tutorial for et skjema i Excel


Når du har å kopiere data fra en form til et regneark, kan det bli komplisert og forvirrende ganske raskt. Hvis du vil legge inn data mer tydelig, skjule informasjonen, eller rett og slett skape et mer attraktivt brukergrensesnitt for en Excel-lagret database, bør du se nærmere på å skape en form. Skjemaer er mer attraktive og brukbare enn en vanlig regneark, og er ganske enkel å lage.

Visual Basic Editor

Åpne et nytt regneark. Skriv i overskriftene for all informasjonen, og innspill den første formen. Dette setter opp databasen del av regnearket. Dobbeltklikk på fanen som sier "Ark 1" og skriv inn et navn på arket. Lagre regnearket. Hold "Alt" og trykk "F11" for å åpne Visual Basic Editor, som vil tillate deg å lage din form. På Vis-panelet velger regnearket - som vil ha navnet du valgte ovenfor. Åpne Sett inn-menyen og velg "Userform." En tomt skjema vil vises på skjermen, så vil Userform verktøykasse. Før du begynner å designe form, name it: Trykk "F4" for å åpne panelet Egenskaper Dobbeltklikk på skjemaet, og skriv inn navnet ditt. Vanligvis vil programmerere gjør skjemanavnet noe kort og beskrivende, som "UserInfoForm." Når du er ferdig, trykk "Enter".

Du vil også legge merke til at den nye formen bare sier "Userform 1" på toppen. Du ønsker sannsynligvis å si noe annet, for eksempel "Ny informasjon". På Properties panelet, dobbeltklikk på "Caption" eiendom, skriv inn skjemaet nye navn og trykk "Enter".

Designing Form

Bruk verktøylinjen for å lage de ulike delene av skjemaet. Tekstboksen verktøyet kan skape bokser der du kan skrive noen form for data. Klikk verktøykassen knappen som ser ut som "AB |", klikk deretter et sted på skjemaet og tegne tekstboksen på skjemaet. Marker tekstruten, dobbeltklikker du på "Name" -feltet, under Egenskaper, og skriv inn et navn som "korrespondanse". Label form ved hjelp Label -verktøyet, som ser ut som en hovedstad A), for å utpeke hva merket for.

Legg noen knapper ved hjelp av knappeverktøyet. Pass på at du endrer navn på disse knappene, og bildetekstene, på eiendommer menyen. Hver form bør ha minst en "Legg til" og "Clear" -knappen. Hvis du ønsker å lage en liste-boksen, legger det, men ikke bry deg om varene i det ennå. Design og redigere skjemaet før det ser ut slik du vil ha det til. For å slette noe, klikker du på delen og trykk på "Delete" -tasten. For å gjøre dataregistrering så enkelt som mulig, gjøre databasert form som ligner på en eksisterende eller papirskjemaer som du har. Når du er klar, Lagre skjemaet.

Coding knappene

Åpne Vis-menyen og velg "Code" eller trykk "F7". Dette vil åpne et tomt vindu der du kan skrive inn koden som makter skjemaet. Start med å legge inn følgende kode:

Private Sub Legg Button Name
Dim Cut As Long
Dim wksht Som regneark
Sett wksht = Regneark ( "[Navn på din regneark]")

Skriv inn navnet på arbeidsskjemaet er angitt. Deretter må du fortelle systemet for å finne den første tomme raden i databasen. Bruk:

Count = ws.Cells (Rows.Count, 1) _
END (xlUp) .Offset (1, 0) .Row

Fortell system for å kontrollere at tekstboksene har ting lagt inn i dem. I det følgende kode, skriv inn navn på tekstboksene, og lime dem inn i skjemaet kode.

Hvis Trim (Me. [TextBox navn] .Value) = "" Then
Me. [TextBox] .SetFocus
MsgBox "Vennligst skriv inn en del tall"
Exit Sub
Slutt om

Deretter legger du inn koden for å kopiere dataene inn i databasen. Forutsatt at du har tre tekstbokser og listeboksen, her er koden for å skrive det.
wksht.Cells (Count, 1) .Value = Me. [TextBox en Navn] .Value
wksht.Cells (Count, 2) .Value = Me. [TextBox to navn] .Value
wksht.Cells (Count, 3) .Value = Me. [TextBox tre navn] .Value
wksht.Cells (Count, 4) .Value = Me. [ListBox navn] .Value

Legg noen kode for å fjerne data:
Me. [TextBox 1 Navn] .Value = ""
Me. [TextBox to navn] .Value = ""
Me. [TextBox tre navn] .Value = ""
Me. [ListBox navn] .Value = ""
Me.txtPart.SetFocus

Til slutt trykker du på "Enter" to ganger og skriv inn "End Sub". Lagre koden, og lukke Visual Basic Application.

Opprette en knapp

På regnearket, finn Draw verktøylinjen. Hvis du ønsker å skjule data fra brukere, bytte til Ark 2 eller 3. Tegn en boks på skjermen, og justere den til å se ut som en knapp. Høyreklikk for å legge til litt tekst til den, høyreklikk igjen og velg "Tilordne makro". Klikk på "Ny" knappen og skriv inn skjemaet navn og deretter ".Show", ved hjelp av eksempel, bør det si "UserInfoForm.show".