photosdematures.com

Excel VBA TextBox

Textbox ay tulad ng isang kahon na ginagamit upang makakuha ng input mula sa isang gumagamit, ang mga kahon ng teksto ay bahagi ng mga form ng gumagamit at sa tab ng developer sa anumang excel worksheet, Kung nais naming gumawa ng mga text box sa isang form ng gumagamit maaari naming piliin ang pagpipilian sa textbox mula sa mga kontrol ng form ng gumagamit sa VBA o sa worksheet maaari natin itong piliin mula sa tab na disenyo.

Ang VBA TextBox ay isa sa mga kontrol ng maraming mga kontrol ng Form ng User. Sa pamamagitan ng pagpapakita ng text box sa form ng gumagamit maaari nating hilingin sa kanila na ipasok ang data sa text box at ang data na ipinasok ng gumagamit ay maaaring maiimbak sa worksheet na may mga simpleng code.

Ang mga form ng gumagamit ay talagang kaakit-akit sa VBA coding. Nakatutulong ito sa amin lalo na kapag kailangan naming kumuha ng input mula sa mga gumagamit. Sa mga form ng gumagamit, marami kaming mga kontrol at upang makuha ang halaga ng pag-input mula sa mga gumagamit na "Text Box" ay ang perpektong pagpipilian sa isang form ng gumagamit. Sa pamamagitan ng paglalagay ng isang text box sa form ng gumagamit maaari talaga nating sabihin sa gumagamit na ipasok ang kinakailangang halaga sa text box na ipinapakita namin. Kung wala kang ideya tungkol sa mga kahon ng teksto ng VBA pagkatapos ang artikulong ito ay maglilibot sa mga kahon ng teksto ng VBA.

Paano Ipasok ang TextBox sa VBA UserForm?

Maaari mong i-download ang Template ng Kahon na Teksto ng VBA dito - Template ng Kahon ng Teksto ng VBA

Upang maipasok muna ang isang text box, kailangan naming ipasok ang form ng gumagamit. Upang ipasok ang form ng gumagamit pumunta sa Ipasok> User Form.

Sa sandaling mag-click ka sa Form ng User gagamitin namin ang Form ng Gumagamit tulad ng isa pang module.

Mag-click sa Form ng Gumagamit upang makita ang Mga Pagkontrol ng Form ng User.

Mula sa toolbox na Mga kontrol na ito piliin ang "TextBox" at i-drag ang Form ng User.

Sa pamamagitan nito, makakakita tayo ng maraming mga pag-aari na nauugnay sa text box.

Mga Katangian sa TextBox

Pindutin ang F4 key upang makita ang Mga Katangian ng Text Box.

Tulad ng nakikita natin ang kahon ng teksto ay may Pangalan, kulay, Border na tulad nito ng marami. Bigyan ngayon ang isang Wastong Pangalan upang madali kaming mag-refer sa text box na ito habang naka-coding.

Halimbawa upang magamit ang TextBox sa Userform

Magsasagawa kami ng isa sa mga proyekto sa teksto ng VBA. Lilikha kami ng isang form ng gumagamit ng entry ng data upang maiimbak ang mga detalye ng mga empleyado.

Hakbang 1: Sa form ng gumagamit iguhit ang Label.

Hakbang 2: Baguhin ang default na teksto ng label sa "Pangalan ng empleyado".

Hakbang 3: Sa harap ng Label gumuhit ng isang kahon ng teksto.

Hakbang 4: Magbigay ng tamang pangalan sa text box bilang "EmpNameTextBox".

Hakbang 5: Gumuhit ngayon ng isa pang Label sa ibaba ng unang label at ipasok ang teksto bilang "ID ng empleyado".

Hakbang 6: Sa harap ng pangalawang label gumuhit ng isa pang kahon ng teksto at pangalanan ito bilang "EmpIDTextBox".

Hakbang 7: Gumuhit ng isa pang label at ipasok ang teksto bilang "Salary".

Hakbang 8: Gumuhit ng isa pang kahon ng teksto sa harap ng label na "Salary" at pangalanan ito bilang "SalaryTextBox".

Hakbang 9: Ipasok ngayon ang "Button ng Command" mula sa ToolBox.

Hakbang 10: Baguhin ang teksto ng Command Button bilang "Isumite".

Ok, tapos na kami sa bahagi ng disenyo ng Form ng User. Ngayon kailangan naming isulat ang code upang maiimbak ang data na ipinasok sa form ng gumagamit na ito. Tulad ng ngayon patakbuhin ang form ng gumagamit sa pamamagitan ng pagpindot sa F5 key dapat nating makita ang isang form ng gumagamit na tulad nito.

Hakbang 11: Baguhin ang Caption ng Form ng Gumagamit sa window ng Mga Katangian.

Hakbang 12: Ngayon mag-double click sa Isumite ang Pindutan ng Command. Sa sandaling mag-double click ka makikita mo ang auto sub na pamamaraan tulad ng nasa ibaba.

Ito ay kapag nag-click ka sa pindutang Isumite kung ano ang dapat mangyari. Kailangan naming banggitin ang mga gawain sa VBA code. Sa proyektong ito, ang aming hangarin ay iimbak ang data na ipinasok sa text box sa sandaling mag-click kami sa Isumite ang Button.

Para sa unang lumikha ng isang Template na tulad nito sa worksheet na pinangalanang "Sheet ng Mga empleyado".

Hakbang 13: Bumalik ngayon sa visual basic editor. Sa loob ng pindutan i-click ang subroutine sa VBA unang tukuyin ang huling ginamit na hilera sa pamamagitan ng paggamit ng code sa ibaba.

Code:

 Pribadong Sub Command Button1_Click () Dim LR Bilang Mahabang LR = Mga Worksheet ("Empleyado Sheet"). Cell (Rows.Count, 1). End (xlUp) .Row + 1 End Sub 

Hakbang 14: Ang unang bagay ay nasa unang haligi na itatago namin ang Pangalan ng empleyado. Kaya't para dito, kailangan nating i-access ang text box na pinangalanang "EmpNameTextBox".

Code:

 Pribadong Sub Command Button1_Click () Dim LR Bilang Long LR = Mga Worksheet ("Empleyado Sheet"). Cell (Rows.Count, 1). End (xlUp) .Row + 1 Ramge ("A" & LR) .Value = EmpNameTextBox.Value Wakas Sub 

Hakbang 15: Sa pangalawang haligi kailangan naming iimbak ang ID ng empleyado. Kaya makukuha ito sa pamamagitan ng pag-access sa text box na pinangalanang "EmpIDTextBox".

Code:

 Pribadong Sub Command Button1_Click () Dim LR Bilang Long LR = Mga Worksheet ("Empleyado Sheet"). Cell (Rows.Count, 1). End (xlUp) .Row + 1 Ramge ("A" & LR) .Value = EmpNameTextBox.Value Ramge ("B" & LR) .Value = EmpIDTextBox.Value End Sub 

Hakbang 16: Sa wakas kailangan nating iimbak ang bahagi ng suweldo, para dito, kailangan nating mag-access sa text box na pinangalanang "SalaryTextBox".

Code:

 Pribadong Sub Command Button1_Click () Dim LR Bilang Long LR = Mga Worksheet ("Empleyado Sheet"). Cell (Rows.Count, 1). End (xlUp) .Row + 1 Ramge ("A" & LR) .Value = EmpNameTextBox.Value Ramge ("B" & LR) .Value = EmpIDTextBox. Saklaw ng Halaga ("C" & LR). Halaga = SalaryTextBox.Value End Sub 

Ok, tapos na rin tayo sa bahagi ng pag-coding. Patakbuhin ngayon ang code gamit ang F5 key na dapat nating makita ang isang Form ng User tulad ng nasa ibaba.

Tulad ng ngayon, ang lahat ng mga kahon ay walang laman.

Punan muna ang mga detalye.

Ngayon mag-click sa pindutang "Isumite", iimbak nito ang data sa worksheet.

Tulad nito, maaari mong panatilihin ang pagpasok ng data at pindutin ang pindutin at isumite. Ito ang simpleng form ng gumagamit ng pagpasok ng data na may isang text box.