Ինչպե՞ս ամփոփել տեքստային տուփերից ստացված արժեքները:

Ենթադրելով, որ դուք ունեք երեք տեքստային տուփ, որոնք ցանկանում եք ամփոփել արժեքները Textbox1- ում և Textbox2- ում և արդյունքն ավտոմատ կերպով հաշվարկել Textbox3- ում, ինչպես ցույց է տրված հետևյալ նկարը: Ինչպե՞ս կարող էիք գործ ունենալ Excel- ում:

Ամփոփեք արժեքները VBA կոդով տեքստային տուփերից

Ամփոփեք արժեքները VBA կոդով տեքստային տուփերից

Երկու տեքստային տուփից արժեքներն ամփոփելու և արդյունքը երրորդ տուփի մեջ մտնելու համար հետևյալ VBA կոդը կարող է օգնել ձեզ:

1, Նախ, դուք պետք է տեղադրեք երեք տեքստային տուփ, կտտացրեք Երեվակիչ > Տեղադրել > Տեքստային տուփ (ActiveX կառավարման), ապա նկարեք տեքստային տուփ և կազմեք երկու օրինակ, տես նկարի նկարը.

2, Տեքստային տուփերը տեղադրելուց հետո աջով կտտացրեք թերթիկի ներդիրին, որը պարունակում է տեքստային տուփեր, որոնք ցանկանում եք օգտագործել և կտտացրեք Դիտել կոդը համատեքստային ընտրացանկից բացելու համար Microsoft Visual Basic հավելվածների համար պատուհանը, այնուհետև պատճենեք և տեղադրեք հետևյալ VBA կոդը դատարկ մոդուլի մեջ.

VBA կոդ. Ամփոփեք արժեքները տեքստային տուփերից.

Private Sub Sum_Click()
    TextBox3.Text = Val(TextBox2.Text) + Val(TextBox1.Text)
End Sub

3, Դրանից հետո արժեքները մուտքագրեք Textbox1 և Textbox2, ապա սեղմեք F5 բանալի կամ Վազում Կոդը կատարելու կոճակը, հաշվարկված արդյունքը անմիջապես ցուցադրվում է Textbox3- ում, տես նկարի նկարը.