Ինչպե՞ս ավտոմատ կերպով միացնել միավորված բջիջները Excel- ում:
Ինչպե՞ս կարող ենք շարքերի թվերը լրացնել Excel- ում տարբեր չափերի միավորված բջիջների ցուցակում: Մեր մտքում առաջին հերթին միացնել միաձուլված բջիջները լրացնելու համար ինքնալրացման բռնիչը, բայց, այս դեպքում, մենք կստանանք հետևյալ նախազգուշական հաղորդագրությունը և չենք կարող լրացնել միավորված բջիջները:
Քանի որ լրացման բռնիչը չի աջակցում միավորված բջիջները, այստեղ ես կարող եմ խոսել այս խնդրի լուծման որոշ այլ հնարքների մասին:
Ավտոմատ համար / լրացրեք միավորված բջիջները VBA կոդով
Ավտոմատ համար / լրացրեք միավորված բջիջները VBA կոդով
Հետևյալ VBA կոդը կարող է օգնել արագ համարակալել ընտրված միավորված բջիջները: Խնդրում ենք անել հետևյալը.
1, Պահեք պահեք ALT + F11 ստեղները, և այն բացում է Microsoft Visual Basic հավելվածների համար պատուհան.
2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլի պատուհան.
VBA կոդ. Ավտոմատ միավորված բջիջներ
Sub NumberCellsAndMergedCells()
'Update 20141028
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type: = 8)
Set WorkRng = WorkRng.Columns(1)
xIndex = 1
Set Rng = WorkRng.Range("A1")
Do While Not Intersect(Rng, WorkRng) Is Nothing
Rng.Value = xIndex
xIndex = xIndex + 1
Set Rng = Rng.MergeArea.Offset(1)
Loop
End Sub
3, Դրանից հետո սեղմեք F5 այս կոդն աշխատեցնելու բանալին, և կհայտնվի հուշման տուփ, որը թույլ կտա ձեզ ընտրել միաձուլված բջիջները, որոնք ցանկանում եք լրացնել: Տեսեք,
4, Միավորված բջիջները ընտրելուց հետո կտտացրեք OK, հիմա, ձեր ընտրած միավորված բջիջները լրացվել են հաջորդական թվերով, տես նկարի նկարը.
Առնչվող հոդվածներ քանակը:
Ինչպե՞ս ավտոմատ համարը կամ համարը համարել Excel- ում զտելուց հետո:
Ինչպե՞ս արագորեն միացնել հարակից տողերը նույն տվյալների հետ Excel- ում:
Ինչպե՞ս խցկել բջիջները և լրացնել կրկնօրինակ արժեքներով Excel- ում:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր:
