Ինչպե՞ս տեղադրել կամ ջնջել մասնակի տող Excel- ում:
Excel- ում հեշտ է մի ամբողջ տող տեղադրել կամ ջնջել աշխատաթերթից: Բայց ինչպե՞ս աշխատանքային էջից միայն մասնակի տող տեղադրել կամ ջնջել: Այս հոդվածը կօգնի ձեզ:
Տեղադրեք կամ ջնջեք մասնակի տող Տեղադրեք / Deleteնջել բջիջները գործառույթով
Տեղադրեք կամ ջնջեք մասնակի տող VBA կոդով
Տեղադրեք կամ ջնջեք մասնակի տող Տեղադրեք / Deleteնջել բջիջները գործառույթով
Օրինակ, ուզում եք 5-րդ շարքում մասնակի տող տեղադրել կամ ջնջել երեք բջիջով, խնդրում եմ արեք հետևյալը.
Տեղադրեք մասնակի տող
1. 5-րդ շարքում ընտրեք երեք բջիջ (ընտրված բջիջները պետք է հավասար լինեն տեղադրված բջիջներին), ապա կտտացրեք Տեղադրել > Տեղադրեք բջիջները տակ Գլխավոր ներդիր Տեսեք,
2. Մեջ Տեղադրել երկխոսության տուփ, ընտրեք Տեղափոխեք բջիջները աջ or Տեղափոխեք բջիջները ներքև ապա ընտրեք այն OK կոճակը:
Դրանից հետո տեղադրվում է մասնակի տող երեք բջիջով, ինչպես ցույց է տրված ստորև նշված նկարը:
Deleteնջել մասնակի տողը
1. Մասնակի տողն ընտրելուց հետո, որը ցանկանում եք ջնջել, կտտացրեք Deleteնջել> Deleteնջել բջիջները տակ Գլխավոր էջանիշը.
2. Մեջ ջնջել երկխոսության տուփ, ընտրեք Մնացել են հերթափոխի բջիջները or Տեղափոխեք բջիջները վերև որքան ձեզ հարկավոր է, ապա կտտացրեք OK կոճակ Տեսեք,
Այնուհետեւ ընտրված մասնակի տողը ջնջվում է:
Տեղադրեք կամ ջնջեք մասնակի տող VBA կոդով
Excel- ում մասնակի տող տեղադրելու կամ ջնջելու համար կարող եք նաև կիրառել հետևյալ VBA կոդերը:
1. Ընտրեք որոշակի տողի ցանկացած բջիջ, որը ցանկանում եք տեղադրել մասնակի տողեր, ապա սեղմել ալտ + F11 բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ, Եվ ապա պատճենեք և տեղադրեք ներքևում նշված VBA կոդը ՝ Կոդ պատուհան.
VBA կոդ. Excel- ում տեղադրեք մասնակի տող
Sub InsertRow()
Dim I As Long
On Error Resume Next
LInput:
I = Application.InputBox("Enter number of rows required.", "Kutools for Excel", 1, , , , , 1)
If I < 1 Then
MsgBox "Error, please retype", vbInformation, "Kutools for Excel"
GoTo LInput
End If
Cells(ActiveCell.Row, 1).Resize(Int(I), 3).Insert xlDown
End Sub
ՆշումVBA կոդում 1 համարը նշանակում է, որ մասնակի շարքը կտեղադրվի առաջին սյունակից, իսկ թիվ 3-ը նշանակում է, որ սյունակների միջև կտեղադրի երեք բջիջ: Դրանք կարող եք փոխել ՝ ելնելով ձեր կարիքներից:
3. Սեղմեք F5 կոդը գործարկելու բանալին, ապա ա Excel- ի համար նախատեսված գործիքներ երկխոսության պատուհանը հայտնվում է, խնդրում ենք մուտքագրել անհրաժեշտ տողերի քանակը և սեղմել այն OK կոճակը:
Եթե վանդակը մուտքագրեք 3-ը, ապա կտտացրու այն OK կոճակը, երեք սյունով երեք մասնակի տող կտեղադրվի ձեր աշխատանքային թերթի նշված դիրքում:
Մասնակի տողը ջնջելու համար կարող եք գործարկել ստորև նշված VBA կոդը:
VBA կոդ. Excel- ում ջնջեք մասնակի տողը
Sub DelActiveCell_Row()
Dim I As Long
On Error Resume Next
LInput:
I = Application.InputBox("Enter number of rows required.", "Kutools for Excel", 1, , , , , 1)
If I < 1 Then
MsgBox " Error, please retype", vbInformation, "Kutools for Excel"
GoTo LInput
End If
Cells(ActiveCell.Row, 1).Resize(Int(I), 3).Delete xlShiftUp
End Sub
Կոդը գործարկելուց հետո կա նաև ա Excel- ի համար նախատեսված գործիքներ երկխոսության պատուհանը բացվում է ՝ հիշեցնելու համար, թե քանի մասնակի տող եք ուզում ջնջել, մուտքագրեք համարը և կտտացրեք այն OK կոճակ Այնուհետեւ նշված մասնակի տողերը անմիջապես ջնջվում են:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: