UserForms , auch genannt Dialogfelder sind grafische Fenster , mit dem Benutzer Daten in Felder eingeben und einfügen lassen , dass die Daten in Excel-Tabellen. Eine UserForm wird in einer Excel-Arbeitsmappe eingebettet und wird ausgeführt, wenn ein Benutzer die Excel-Datei , in der Regel über ein Makro . Weil UserForms nutzen Sie die Sprache Visual Basic , können sie großzügig gestaltet werden , dass die Daten in den Feldern eingetragen gewährleisten ist vollständig und gültig , bevor sie auf dem Excel-Arbeitsblatt selbst zur weiteren Bearbeitung übergeben. Things You
Microsoft Excel mit Visual Basic Editor
brauchen anzeigen Weitere Anweisungen
Wie man Daten von einem zu einem Arbeitsblatt
1

Öffnen Sie Microsoft Excel UserForm und Übertragen erstellen Sie eine neue, leere Arbeitsmappe , indem Sie auf das Menü Datei und wählen Sie " Neu." Speichern Sie die Excel-Datei als " update_worksheet.xls . "
2

Halten Sie die Arbeitsmappe öffnen und öffnen Sie den Visual Basic-Editor , indem Sie auf Alt- F11 . Erstellen Sie eine neue , indem Sie im Menü Einfügen auf UserForm und Auswahl " UserForm. " Nennen Sie die UserForm " transferForm " durch Änderung der Name-Attribut im Menü Eigenschaften . Ändern Sie die Caption -Attribut auf " transferForm . "
3

ein Textfeld zum Formular hinzufügen , indem Sie ein Textfeld aus der Toolbox und ziehen Sie ihn an seinen Platz auf dem Formular. Benennen Sie das Textfeld " transferInput " im Eigenschaften-Fenster . Wenn die Toolbox nicht geöffnet ist, wählen Sie das Menü Ansicht und Toolbox.
4

Fügen Sie ein Update -Taste, um die Form , indem Sie eine Befehlsschaltfläche aus der Toolbox und ziehen Sie ihn an seinen Platz auf dem Formular. Nennen Sie die Befehlsschaltfläche " transferButton " im Eigenschaften-Fenster und ändern Sie die Beschriftung Attribut auf " Aktualisieren Arbeitsblatt . "
5

hinzufügen Schließen-Schaltfläche auf das Formular , indem Sie einen zweiten CommandButton aus der Toolbox und ziehen Sie ihn in Platz auf dem Formular. Nennen Sie die Befehlsschaltfläche " closeButton " im Eigenschaften-Fenster und ändern Sie die Beschriftung Attribut auf " Schließen Formular . "
6

Öffnen Sie die Visual Basic -Code-Editor durch Doppelklick auf die transferButton ( Update-Button ) . Fügen Sie Code zum transferButton _Click ()-Funktion , die alle Daten in die Textbox update_worksheet.xls Arbeitsblatt , wenn der Benutzer auf die Schaltfläche klickt eingegebenen überträgt . Schließen Sie den Visual Basic-Code -Editor.

Private Sub transferButton_Click () Dim

transferWorksheet als Arbeitsblatt

Set transferWorksheet = Worksheets ( " Tabelle1 " )

transferWorksheet . Cells (1,1). Value = Me.transferInput.Value

End Sub
7

Öffnen Sie den Visual Basic -Code-Editor durch Doppelklick auf die closeButton ( Schaltfläche Schließen ) . Fügen Sie Code zum closeButton_Click ()-Funktion , die das Formular schließt, wenn der Benutzer auf die Schaltfläche klickt . Schließen Sie den Visual Basic-Code -Editor.

Private Sub closeButton_Click ()

Unload Me End Sub

8

Ausführen des Formulars durch anklicken auf dem Ausführen-Menü und wählen Sie " Ausführen auf Sub /UserForm. " Eingeben von Daten in das Eingabefeld ein und klicken Sie auf " transferButton . " Stellen Sie sicher, dass die Daten erfolgreich in die erste Zelle Wert im Excel-Arbeitsblatt übertragen , die Umstellung auf Excel , wenn nötig. Speichern und schließen Sie die laufende UserForm.
9

Verwenden Sie eine Excel- Ereignis vor, um die UserForm zu öffnen, wenn ein Benutzer die Arbeitsmappe in Excel. Öffnen Sie den Projekt-Explorer und doppelklicken Sie auf die ThisWorkbook Code-Fenster . Geben Sie ein Makro, das Formular öffnet , wenn das Arbeitsblatt öffnet und speichern Sie das Makro . Speichern und schließen Sie Visual Basic und update_worksheet.xls .

Private Sub Workbook_Open ()

transferForm.Show

End Sub
10

Öffnen " update_worksheet.xls . " Die UserForm transferForm wird geöffnet. Geben Sie Text in die " transferInput " ein und klicken Sie auf " transferButton . " Der Text in der transferForm UserForm eingegeben werden , um die erste Zelle in Tabelle1 in update_worksheet.xls übertragen werden.