UserForm'i andmete ülekandmine töölehele

Sisu

• Juhised
• Kuidas edastada andmeid kasutajaformilt töölehele
• Kuidas
• Teade
• Mida sa vajad

UserForms, mida nimetatakse ka "dialoogiboksideks", on graafilised aknad, mis võimaldavad kasutajatel väljadel täita andmeid ja sisestada sellised andmed Exceli arvutustabelitesse. UserForm on Excelisse sisseehitatud ja töötab siis, kui avate Exceli faili, tavaliselt makro kaudu. Kuna UserForms kasutab ära Visual Basic'i keele, saab neid kohandada, et tagada nende väljade sisestatud andmete täielik ja kehtiv täitmine enne Exceli arvutustabelisse ülekandmist.

Juhised

Excel UserForms on suurepärane võimalus tagada kehtiv ja puhas andmesisestus (binary data image rgbspace poolt Fotolia.com)

Kuidas edastada andmeid kasutajaformilt töölehele

1. Avage Excel ja looge uus tööleht, klõpsates üksusel "Fail" ja valides "Uus". Salvestage fail "updated_sheet.xls".

2. Hoidke tööleht avatuna ja käivitage Visual Basic Editor, vajutades "Alt" + "F11". Looge uus UserForm, klõpsates "Insert" menüüd ja valides "UserForm". Nimetage UserForm "transferForm" jaoks, muutes atribuuti "Name" atribuudi omadustes. Muutke atribuuti "Caption" "transferForm".

3. Lisage vormile tekstikast, valides selle tööriistakastis, lohistades selle ja vormile. Nimetage tekstikasti omaduste aknas "transferInput". Kui tööriistakast ei ole avatud, avage "View" ja "Toolbox".

   
   

4. Lisage vormile värskendusnupp. Valige tööriistakastist käsk "Command Button", lohistage see see vormile. Nimetage "transferButton" käsu nupp omaduste aknas ja muutke atribuut "Caption" väärtuseks "Refresh Sheet".

5. Lisa nupp vormi sulgemiseks. Valige tööriistakastist teine ​​"käsunupp", lohistage see see vormile. Nimetage käsu nupp omaduste aknas "closeButton" ja muutke atribuut "Caption" "Close Form".

6. Avage Visual Basic redaktor, topeltklõpsates nuppu "transferButton". Sisestage funktsioon "transferButton_click ()" järgmine kood, mis edastab tekstikasti kõik täidetud andmed töölehele "worksheet_dual.xls", kui kasutaja klõpsab nupul. Sulgege koodiredaktor.

   Privaatne Sub transferButton_Click () Dim TransferWorksheet kui tööleht Set transferWorksheet = Töölehed ("Sheet1") transferWorksheet.Cells (1,1) .Value = Me.transferInput.Value End Sub

   
   

7. Avage Visual Basic koodi redaktor uuesti, topeltklõpsates nupul "closeButton". Sisestage funktsioon "closeButton_Click ()", mis sulgeb vormi, kui kasutaja klõpsab nupule. Sulgege koodiredaktor.

   Private Sub closeButton_Click () Eemaldage mind lõppu

8. Käivitage vormi kood, klõpsates "Run" ja seejärel "Run Sub / UserForm". Täitke tekstivälja ja klõpsake nuppu "TransferButton". Veenduge, et andmed on töölehe esimesesse lahtrisse õigesti üle kantud. Salvestage ja sulgege UserForm.

9. Kasutage Exceli sündmuse protseduuri, et avada UserForm, kui kasutaja avab töölehe. Avage "Project Explorer" ja topeltklõpsake koodi aken "ThisWorkbook". Sisestage allolev makro, mis avab töölehe avamisel vormi. Salvesta ja sulgege Visual Basic.

   Private Sub Workbook_Open () transferForm.Show End Sub

10. Avage fail "updated_sheet.xls". Vorm avaneb. Tippige väljale tekst ja klõpsake nuppu "TransferButton". Vormi täitev tekst kantakse töölehe esimesse lahtrisse.

Kuidas

• Atribuutide akna või projekti Exploreri avamiseks valige Visual Basic redaktoris menüüelemendid "View".
• Vormile lisatud juhtimisseadmete suuruse muutmiseks kasutage väikeseid ruute, mis ilmuvad juhtimise valimisel.
• Proovige vormile lisada mõningat valideerimist, et vältida kehtetute andmete sisestamist.

Teade

• Makroid ei käivitata kõigis Exceli versioonides.
• Mõned Exceli turvaseaded ei luba makroid käivitada.
• Visual Basic'i toimetaja toetus eemaldati rakenduses Excel 2008, Mac.

Mida sa vajad

• Microsoft Excel koos Visual Basic Editoriga