Ինչպե՞ս տպել ստորագիր միայն վերջին էջում Excel-ում:
Լռելյայն, ներկառուցվածով Վերնագիր և ստորագիր Excel-ի առանձնահատկությունը, դուք հեշտությամբ կարող եք էջատակներ ավելացնել յուրաքանչյուր տպագրված էջի ներքևում՝ աշխատաթերթում: Եթե ցանկանում եք էջատակ ավելացնել վերջին տպված էջին միայն աշխատաթերթում, ինչպե՞ս կարող եք դա անել: Այս ձեռնարկը տրամադրում է VBA սկրիպտ, որը կօգնի ձեզ քայլ առ քայլ կատարել այս առաջադրանքը:
Տպել էջատակը վերջին էջի վրա միայն VBA կոդով
Խնդրում ենք գործարկել հետևյալ VBA կոդը՝ միայն Excel-ում վերջին տպված էջում հատուկ ստորագիր տպելու համար:
1. Բացեք աշխատաթերթը, որը ցանկանում եք տպել, հատուկ էջատակով, որը ցուցադրվում է միայն վերջին տպված էջում:
2. Սեղմեք ալտ + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
3. Մեջ Microsoft Visual Basic հավելվածների համար պատուհանը, սեղմեք Տեղադրել > Մոդուլներ. Այնուհետև պատճենեք հետևյալ VBA կոդը մեջ Մոդուլ (կոդ) պատուհան.
VBA կոդ. Տպել էջատակը միայն վերջին էջում
Sub SetFooterOnLastPage()
'Updated by Extendoffice 20221024
Dim xCount As Long
Dim xWSh
xCount = Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
Set xWSh = Application.ActiveSheet
With Application.ActiveSheet
.PageSetup.RightFooter = ""
If xCount > 1 Then
.PrintOut From:=1, To:=xCount - 1
End If
.PageSetup.RightFooter = "Type your footer information here"
.PrintOut From:=xCount, To:=xCount
End With
End Sub
ՆշումԿոդում խնդրում ենք փոխարինել այս բովանդակությունը:Մուտքագրեք ձեր էջատակի տեղեկությունները այստեղ«Ձեր սեփական ստորագրի տեղեկություններով։
4. Սեղմեք F5 ծածկագիրը գործելու համար:
Այնուհետև ակտիվ աշխատաթերթը կտպվի հատուկ էջատակով, որը տեղադրվում է միայն վերջին տպված էջում:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: