Ինչպե՞ս օգտագործել մակրոը Excel- ում ներքևում շարքը տեղադրելու համար:
Մեզ համար սովորական է, որ նշված աղյուսակի ներքևում ավելացվեն դատարկ տողեր ՝ աղյուսակն ընդլայնելու և նոր բովանդակություն ավելացնելու համար: Այս հոդվածում խոսվում է մակրո օգտագործելու մասին `նշված աղյուսակի տակ նոր տող տեղադրելու և Excel- ում վերը նշված վանդակի բանաձևը պահելու համար:
Օգտագործեք մակրո ՝ Excel- ում ներքևում շարքը տեղադրելու համար
Օգտագործեք մակրո ՝ Excel- ում ներքևում շարքը տեղադրելու համար
Խնդրում ենք արեք հետևյալը ՝ մակրոով նշված աղյուսակի տակ դատարկ տող տեղադրելու համար:
1. Սեղմեք ալտ + F11 ստեղները միաժամանակ բացելու համար Microsoft Visual Basic հավելվածների համար պատուհան.
2. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ բացել Մոդուլի պատուհանը: Դրանից հետո պատճենեք և տեղադրեք ներքևի VBA կոդը պատուհանում:
VBA կոդ. Օգտագործեք մակրո ՝ նշված աղյուսակի տակ դատարկ տող տեղադրելու համար
Sub AddRows()
'Updated by Extendoffice 2017/9/12
Dim xLastRow As Long
Dim xRg As Range
Dim xAddress As String
On Error Resume Next
xAddress = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the table range you will insert blank row below:", "KuTools For Excel", xAddress, , , , , 8)
If xRg Is Nothing Then Exit Sub
xLastRow = xRg.Row + xRg.Rows.Count
xRg.Rows(xLastRow).FillDown
xRg.Rows(xLastRow).SpecialCells(xlCellTypeConstants).ClearContents
End Sub
3. Սեղմեք F5 ծածկագիրը գործելու համար: Եվ ա Excel- ի համար նախատեսված գործիքներ երկխոսության պատուհանը հայտնվում է, ընտրեք սեղանի որոշակի տիրույթը, որը ներքևում կավելացնեք դատարկ տող, և այնուհետև կտտացրեք այն OK կոճակ Տեսեք,
Դրանից հետո դուք կարող եք տեսնել, որ նշված աղյուսակի ներքևում ավելացվում է նոր դատարկ տող: Եվ վերևի բջիջում բանաձևը վերապահված է նաև նոր տեղադրված շարքում, ինչպես ստորև, տես նկարում նշված է.
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: