Note: The other languages of the website are Google-translated. Back to English
Մուտք  \/ 
x
or
x
Գրանցում  \/ 
x

or

Ինչպե՞ս Excel- ում ներդիրների տուփերը դնել տեքստային տուփերի:

Ենթադրելով, որ ձեր աշխատանքային էջում տեղադրել եք բազմաթիվ տեքստային տուփեր (ActiveX Control): Սովորաբար, տեքստային տուփի խմբագրումն ավարտելուց հետո դուք պետք է կուրսորը տեղափոխեք մյուս տեքստային տուփի ներսը և կտտացրեք ՝ այն ակտիվացնելու համար բովանդակություն մուտքագրելու համար: Այնուամենայնիվ, այս մեթոդը հոգնեցուցիչ է թվում բազմաթիվ տեքստային տուփերի համար: Կա՞ որևէ եղանակ `տեքստային տուփերի մեջ հեշտությամբ տեղաշարժվելու համար միայն թեժ ստեղնաշարի միջոցով: Իրականում, Tab ստեղնը կարող է օգնել ձեզ: Այս մեթոդը ձեզ ցույց կտա մեթոդ ՝ ներդիրների կարգը մանրամասն տեքստային տուփերին դնելու համար:

Տեղադրեք ներդիրի կարգը VBA կոդով տեքստային տուփերի վրա


Տեղադրեք ներդիրի կարգը VBA կոդով տեքստային տուփերի վրա


Խնդրում ենք կիրառել ստորև նշված VBA կոդը ՝ Excel- ում տեքստային տուփերին ներդիրների կարգը սահմանելու համար:

1. Խնդրում ենք ընտրել աշխատաթերթը պարունակում է բազմաթիվ տեքստային տուփեր, որոնց համար անհրաժեշտ է ներդիրների կարգը սահմանել: Աջ կտտացրեք թերթիկի ներդիրին և ընտրեք Դիտել կոդը աջ կտտացնելու ցանկից: Տեսեք,

3. Բացման մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, խնդրում ենք պատճենել և տեղադրեք ներքևում գտնվող VBA կոդի ծածկագիր կոդի պատուհանում:

VBA կոդ. Excel- ում տեքստի տուփերի վրա դնել ներդիրների կարգը

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) 
     
    If KeyCode = vbKeyTab Then 
        TextBox2.Activate 
    End If 
     
End Sub
Private Sub TextBox2_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) 
     
    If KeyCode = vbKeyTab Then 
        TextBox3.Activate 
    End If 
     
End Sub
Private Sub TextBox3_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer) 
     
    If KeyCode = vbKeyTab Then 
        TextBox1.Activate 
    End If 
     
End Sub

ՆշումԿոդում, TextBox1, TextBox2, եւ TextBox3 տեքստային տուփերն են, որոնցում դուք կդնեք ներդիրի կարգը: Խնդրում ենք փոխել դրանք, ինչպես ձեզ հարկավոր է:

4. Սեղմեք ալտ + Q ստեղները միաժամանակ փակելու համար Microsoft Visual Basic հավելվածների համար պատուհան.

Այսուհետ textbox1- ում խմբագրում կատարելիս և Tab կոճակը սեղմելիս կուրսորը անմիջապես կտեղափոխվի textbox2: Եվ textbox2- ում սեղմեք Tab ստեղնը, կուրսորը կտեղափոխի textbox3:


Առնչվող հոդված


Գրասենյակի արտադրողականության լավագույն գործիքները

Excel- ի համար նախատեսված Kutools- ը լուծում է ձեր խնդիրների մեծ մասը և բարձրացնում ձեր արտադրողականությունը 80% -ով

  • Վերաօգտագործել: Արագ տեղադրեք բարդ բանաձևեր, գծապատկերներ և այն ամենը, ինչ դուք նախկինում օգտագործել եք. Ryածկագրել բջիջները գաղտնաբառով; Ստեղծեք փոստային ցուցակ և նամակներ ուղարկել ...
  • Super Formula Bar (հեշտությամբ խմբագրեք տեքստի և բանաձևի բազմաթիվ տողեր); Ընթերցանության դասավորությունը (հեշտությամբ կարդալ և խմբագրել մեծ թվով բջիջներ); Տեղադրել ֆիլտրացված տիրույթում...
  • Միաձուլել բջիջները / տողերը / սյունակները առանց տվյալների կորստի. Պառակտված բջիջների պարունակությունը; Միավորել կրկնօրինակ տողերը / սյունակները... Կանխել կրկնօրինակ բջիջները; Համեմատեք միջակայքերը...
  • Ընտրեք Կրկնօրինակ կամ Եզակի Շարքեր; Ընտրեք դատարկ շարքեր (բոլոր բջիջները դատարկ են); Super Find և Fuzzy Find շատ աշխատանքային գրքույկներում; Պատահական ընտրություն ...
  • Actշգրիտ պատճեն Բազմաթիվ բջիջներ ՝ առանց բանաձևի հղումը փոխելու; Ավտոմատ ստեղծեք հղումներ դեպի մի քանի թերթեր; Տեղադրեք փամփուշտներ, Տուփեր և ավելին ...
  • Քաղվածք տեքստ, Տեքստ ավելացնել, հեռացնել ըստ դիրքի, Հեռացնել տարածությունը; Ստեղծել և տպել էջային ենթագոտիներ; Փոխարկել բջիջների բովանդակության և մեկնաբանությունների միջև...
  • Սուպեր զտիչ (պահպանել և կիրառել ֆիլտրի սխեմաները այլ թերթերի վրա); Ընդլայնված տեսակավորում ըստ ամիս / շաբաթ / օր, հաճախականություն և ավելին; Հատուկ զտիչ համարձակ, շեղատառով ...
  • Միավորել աշխատանքային տետրերը և աշխատանքային թերթերը; Միավորել աղյուսակները ՝ հիմնված հիմնական սյունակների վրա; Տվյալները բաժանեք մի քանի թերթերի; Խմբաքանակի փոխակերպում xls, xlsx և PDF...
  • Ավելի քան 300 հզոր առանձնահատկություններ, Աջակցում է Office / Excel 2007-2019 և 365. Աջակցում է բոլոր լեզուները: Հեշտ տեղակայում ձեր ձեռնարկությունում կամ կազմակերպությունում: Ամբողջական հատկություններ ՝ 30-օրյա անվճար փորձաշրջան: 60-օրյա գումարի վերադարձի երաշխիք:
kte էջանիշը 201905

Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50% -ով և նվազեցնում է ձեզ համար ամեն օր մկնիկի հարյուրավոր կտտոցներ:
officetab ներքևում
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.