Cum se transferă datele UserForm într-o foaie de lucru

Conţinut

instrucțiuni de ghidare
Cum se transferă datele dintr-un UserForm într-o foaie de lucru
sfaturi
avertisment
Ce ai nevoie

UserForms, denumite și "casete de dialog", sunt ferestre grafice care permit utilizatorilor să umple informații în câmpuri și să introducă astfel de date în foi de calcul Excel. Un UserForm este încorporat în Excel și rulează când deschideți un fișier Excel, de obicei printr-o macrocomandă. Deoarece UserForms profită de limba Visual Basic, acestea pot fi personalizate pentru a se asigura că datele introduse în câmpurile lor sunt complete și valabile înainte de a le transfera într-o foaie de calcul Excel.

instrucțiuni de ghidare

Excel UserForms reprezintă o modalitate excelentă de a asigura introducerea datelor valide și curate (imagini binare de imagini de la rgbspace de la Fotolia.com)

Cum se transferă datele dintr-un UserForm într-o foaie de lucru

Deschideți Excel și creați o nouă foaie de lucru făcând clic pe elementul "Fișier" și selectând "Nou". Salvați fișierul ca "updated_sheet.xls".
Păstrați foaia de lucru deschisă și porniți Editorul Visual Basic apăsând "Alt" + "F11". Creați un nou UserForm făcând clic pe meniul "Inserați" și selectând "UserForm". Denumiți UserForm pentru "transferForm" schimbând atributul "Name" în meniul proprietății. Modificați atributul "Caption" la "transferForm".
Adăugați o casetă de text în formular, selectând-o în caseta de instrumente, trăgând-o și plasând-o pe formular. Denumiți caseta de text ca "transferInput" în fereastra de proprietăți. Dacă setul de instrumente nu este deschis, accesați "Vizualizați" și "Cutia de instrumente".
Adăugați un buton de actualizare la formular. Selectați un "buton de comandă" din cutia de instrumente, trageți-l și fixați-l pe formular. Denumiți butonul de comandă pentru "transferButton" în fereastra de proprietăți și modificați atributul "Caption" la "Refresh Sheet".
Adăugați un buton pentru a închide formularul. Selectați un al doilea buton "Comandă" din cutia de instrumente, trageți-l și plasați-l pe formular. Denumiți butonul de comandă ca "closeButton" în fereastra proprietăților și modificați atributul "Caption" în "Close Form".
Deschideți editorul Visual Basic făcând dublu clic pe butonul "transferButton". Introduceți codul următor în funcția "transferButton_click ()", care va transfera orice informație completă în caseta de text în foaia de lucru "worksheet_dual.xls" atunci când utilizatorul dă clic pe buton. Închideți editorul de coduri.

Private Transfer transferButton_Click () Dim transferWorksheet ca set de foi de lucru transferWorksheet = foi de lucru ("Sheet1") transferWorksheet.Cells (1,1) .Value = Me.transferInput.Value End Sub
Redeschideți editorul de coduri Visual Basic făcând dublu clic pe butonul "closeButton". Introduceți următorul cod în funcția "closeButton_Click ()", care va închide formularul când utilizatorul face clic pe buton. Închideți editorul de coduri.

Privat Sub closeButton_Click () Unload Me End Sub
Rulați codul de formular făcând clic pe "Run" și apoi pe "Run Sub / UserForm". Completați câmpul de text și faceți clic pe butonul "transferButton". Verificați dacă datele au fost transferate corect în prima celulă din foaia de lucru. Salvați și închideți UserForm.
Utilizați o procedură de eveniment Excel pentru a deschide UserForm când un utilizator deschide foaia de lucru. Deschideți "Project Explorer" și faceți dublu clic pe fereastra de cod "ThisWorkbook". Introduceți macro-ul de mai jos, care va deschide formularul când se deschide foaia de lucru. Salvați și închideți Visual Basic.

Private Sub Workbook_Open () transferForm.Show End Sub
Redeschide fișierul "updated_sheet.xls". Formularul se va deschide. Introduceți un text în câmp și faceți clic pe butonul "TransferButton". Textul pe care îl completezi în formular va fi transferat în prima celulă din foaia de lucru.

sfaturi

Pentru a deschide fereastra Proprietăți sau Project Explorer, selectați elementele din meniul "Vizualizare" din Editorul Visual Basic.
Pentru a redimensiona comenzile adăugate în formular, utilizați pătratele mici care apar atunci când este selectat comanda.
Încercați să adăugați o validare în formular pentru a împiedica utilizatorii să introducă date nevalide.

avertisment

Macrorele nu vor fi difuzate în toate versiunile Excel.
Unele setări de securitate Excel nu vor permite rularea macrocomenzilor.
Suportul pentru editorul Visual Basic a fost eliminat în Excel 2008, pentru Mac.