Open de Visual Basic Editor . Klik op " Visual Basic " in het hoofdstuk "Code" van het tabblad "Ontwikkelaar " .

Selecteer Weergave> Project Explorer in het menu 2 , selecteer Beeld> Eigenschappen .
< Br > Goedkope 3

Selecteer invoegen > UserForm in het menu . U ziet een lege gebruiker vorm en de Controls Toolbox .
4

Voeg een tekstvak toe aan het formulier . In de Controls Toolbox , zweven over de iconen voor het tekstvak , dat lijkt op vinden " ab . " Klik op het pictogram . Klik op de gebruiker formulier om het tekstvak op het formulier , het op de juiste ruimte te laten voor een label , en waardoor er ruimte boven en onder .
5

Voeg een label aan het formulier . Vinden " Label " in de gereedschapskist ( het ziet eruit als een grote A ) . Met behulp van dezelfde methode , plaatst u een label aan de linkerkant van het tekstvak .
6

Voeg twee opdrachtknoppen . Vinden " CommandButton " in de gereedschapskist . Gebruik dezelfde procedure om twee opdrachtknoppen side plaatsen aan zij op de bodem van de vorm .
7

Klik op het label op het gebruikers formulier . In het venster Eigenschappen , naast " Caption , " veranderen " Label1 " om "Naam invoeren . "
8

Klik in het tekstvak op het gebruikers formulier . In het venster Eigenschappen , naast " ( Naam ) , " change " TextBox1 " naar " Name_txt . "
9

Klik op de eerste opdracht knop op het gebruikers formulier . In het venster Eigenschappen , naast " ( Naam ) , " veranderen " CommandButton1 " naar " OK_btn . " Naast " Caption , " veranderen " CommandButton1 " op " OK".
10

Klik op de tweede opdracht knop op het gebruikers formulier . In het venster Eigenschappen , naast " ( Naam ) , " veranderen " CommandButton2 " naar " Cancel_btn . " Naast " Caption , " veranderen " CommandButton2 " op " Annuleren".
11

Voeg een foto toe aan de gebruiker formulier . In de Controls Toolbox , klik op de afbeelding controle , die eruit ziet als twee bergen en de zon. Klik op de gebruiker formulier aan de box afbeelding plaatsen op het formulier .
12

Klik op de afbeelding controle die u op het gebruikers formulier geplaatst . In het venster Eigenschappen , naast het "Beeld ", klik op de drie puntjes ( ... ) aan de rechterkant. Blader naar een afbeelding opgeslagen op uw computer , zoals C : \\ Users \\ Public \\ Pictures \\ Voorbeelden van afbeeldingen \\ garden.jpg voor een weergave van oranje bloemen . Dubbelklik op het geselecteerde beeld .

Move 13 en verklein controles op de gebruiker formulier totdat u tevreden bent met het ontwerp .
In Code en Uitvoeren de Routine < br >
14 bouwen van een lijst met namen van uw Excel- spreadsheet .

Dubbelklik op de knop "OK " op het gebruikers formulier om een code -venster te openen . U zult het begin en einde verklaringen voor de subroutine zien
15

Voeg code tussen de " Private Sub " en " End Sub " verklaringen , zodat het luidt als volgt : .

Prive sub OK_btn_Click ( ) op

Dim LastRow As Long

LastRow = Worksheets
( " Blad1 " ) . Range ( " A65536 " ) . End ( xlUp ) Row + 1

. cellen ( LastRow , 1 ) . Value = Name_txt

End Sub

Deze code plaatst de naam van het tekstvak in cel A1 op het Excel-spreadsheet . Elke keer dat de gebruiker een nieuwe naam gaat en klikt op " OK , " het zal worden onderaan toegevoegd .
16

Dubbelklik op UserForm1 In het venster project . Dubbelklik op de knop Annuleren . In het venster code , voeg code tussen " Private Sub " en " End Sub ", zodat de routine luidt als volgt :

Private Sub Cancel_btn_Click
( ) op

UserForm1.Hide

End Sub

Deze code verbergt het dialoogvenster wanneer de gebruiker klikt op " Annuleren".
17

uitvoeren van de routine . Selecteer Run > Run Sub /UserForm in het menu . U keert terug naar Excel en zien het dialoogvenster , met inbegrip van uw geselecteerde foto .

Typ 18 een naam in het tekstvak en klik op " OK . " U zult de naam in cel A1 te zien . Typ een naam en klik op "OK . " U zult de naam zien in cel A2 .
19

Klik op ' Annuleren ' om het dialoogvenster te verbergen.