Ինչպե՞ս Excel- ում դնել բջիջների կամ ապաբջջված բջիջների ներդիրների կարգը:
Ենթադրենք, որ դուք պետք է սահմանեք ներդիրների կարգը ձեր իսկ սահմանված բջիջների համար, օրինակ՝ սեղմելով Tab ստեղնը, այն կտեղափոխվի B5 բջիջից C6, C6-ից D7, D7-ից E8, այնուհետև կվերադառնա B5՝ E8 բջիջը աշխատաթերթում թողնելիս: ինչպես ցույց է տրված ստորև նշված սքրինշոթը: Ինչպե՞ս հասնել դրան: Այս հոդվածը ձեզ համար ներկայացնում է VBA մեթոդ:
Սահմանեք VBA կոդով բջիջների կամ ապակողպված բջիջների ներդիրների կարգը
Սահմանեք VBA կոդով բջիջների կամ ապակողպված բջիջների ներդիրների կարգը
Խնդրում ենք գործարկել ստորև ներկայացված VBA մեթոդը ՝ նորմալ աշխատանքային թերթում կամ պաշտպանված աշխատաթերթում ապակողպված բջիջների ներդիրների կարգը սահմանելու համար:
1. Աշխատանքային թերթում անհրաժեշտ է սահմանել ներդիրների կարգը, աջով կտտացրեք թերթիկի ներդիրին և կտտացրեք Դիտել կոդը համատեքստի ընտրացանկից:
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, պատճենեք և տեղադրեք ներքևի VBA կոդը ՝ Կոդ պատուհան.
VBA կոդ. Սահմանեք բջիջների կամ ապակողպված բջիջների ներդիրի կարգը
Private Sub Worksheet_Change(ByVal Target As Range)
Dim tabArray As Variant
Dim i As Long
tabArray = Array("B5", "C6", "D7", "E8")
Application.ScreenUpdating = False
For i = LBound(tabArray) To UBound(tabArray)
If tabArray(i) = Target.Address(0, 0) Then
If i = UBound(tabArray) Then
Me.Range(tabArray(LBound(tabArray))).Select
Else
Me.Range(tabArray(i + 1)).Select
End If
End If
Next i
Application.ScreenUpdating = True
End SubNotes:
3. Սեղմեք ալտ + Q ստեղները փակելու համար Microsoft Visual Basic հավելվածների համար պատուհան.
Այսուհետ, B5- ում տվյալներ մուտքագրելուց հետո կուրսորը անցնում է C6 ՝ սեղմելով Tab կամ Enter ստեղնը, ապա C7- ը թողնելիս անցնում է D6, ապա անցնում է D7, E8 ընթացիկ աշխատաթերթում:
Առնչվող հոդվածներ:
- Ինչպե՞ս հղել ներդիրի անունը Excel- ում գտնվող բջիջում:
- Ինչպե՞ս բաց թողնել բջիջները կամ սյունակները Excel- ում էջանիշ դնելիս:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
