Բաց թողնել հիմնական բովանդակությունը
 

Ինչպե՞ս կանխել օգտվողների աշխատանքային թերթը տպելը:

Հեղինակ՝ Սյաոյանգ Վերջին փոփոխությունը՝ 2024-07-31

Մեր ամենօրյա աշխատանքում աշխատանքային թերթում կարող է լինել մի քանի կարևոր տեղեկատվություն, որպեսզի ներքին տվյալների տարածումը պաշտպանվի, բաժինը թույլ չի տա մեզ տպել դրանք: Եվ ահա, ես կխոսեմ այն ​​մասին, թե ինչպես կանխել օգտվողներին տպել աշխատանքային թերթը:

Արգելել օգտվողներին տպել մեկ նշված աշխատանքային թերթ VBA- ով

Արգելել օգտվողներին տպել ամբողջ աշխատանքային գիրքը VBA- ով


նետ կապույտ աջ պղպջակ Արգելել օգտվողներին տպել մեկ նշված աշխատանքային թերթ VBA- ով

Դուք կարող եք կիրառել հետևյալ VBA կոդը `ձեր հատուկ աշխատաթերթը պաշտպանելու համար, որը պետք է տպվի:

1, Ակտիվացրեք ձեր աշխատանքային թերթը, որը ցանկանում եք անջատել դրա տպման հնարավորությունը:

2, Պահեք պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.

3, Եվ հետո ձախում Project Explorer, կրկնակի սեղմեք Այս գործառույթը մոդուլը բացելու և հետևյալ կոդը տեղադրելու մեջ.

VBA կոդ. Կանխարգելեք օգտվողներին տպել մեկ նշված աշխատանքային թերթ

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140625
Dim WsName As String
WsName = "Sheet1"
For Each xWs In Application.ActiveWorkbook.Windows(1).SelectedSheets
    If xWs.Name = WsName Then
    MsgBox ("You can not print this worksheet")
        Cancel = True
    End If
Next
End Sub

կանխել տպագրության թերթիկը vba կոդը

Նշում: Վերոնշյալ ծածկագրում, Sheet1 ակտիվ աշխատանքային թերթն է, որը ձեզ չի թույլատրվում տպել:

4, Ապա պահեք և փակեք այս կոդը, և այժմ, երբ փորձեք տպել այս հատուկ աշխատանքային թերթը, կստանաք հետևյալ նախազգուշացումը:

կանխել տպագրության թերթիկի նախազգուշական հաղորդագրությունը

ՆշումԱյս ծածկագրով միակ հատուկ աշխատանքային թերթը չի թույլատրվում տպել, բայց մյուս թերթերը կարող են տպվել ինչպես միշտ:


նետ կապույտ աջ պղպջակ Արգելել օգտվողներին տպել ամբողջ աշխատանքային գիրքը VBA- ով

Եթե ​​Ձեզ անհրաժեշտ է կանխել օգտվողների կողմից ամբողջ աշխատանքային գրքի տպագրումը, ապա այստեղ նաև ծածկագիր կարող է ձեզ լավություն բերել:

1, Բացեք ձեր աշխատանքային գիրքը, որը թույլ չեք տալիս տպել ուրիշները:

2, Պահեք պահեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան:

3, Եվ հետո ձախում Project Explorer, կրկնակի սեղմեք Այս գործառույթը մոդուլը բացելու և հետևյալ կոդը տեղադրելու մեջ.

VBA կոդ. Կանխարգելեք օգտվողներին տպել մեկ նշված աշխատանքային թերթ

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'Update 20140626
Cancel = True
MsgBox "You can't print this workbook"
End Sub

կանխել աշխատանքային գրքի vba կոդը տպելը

4, Ապա պահեք և փակեք այս կոդը, և հետ գնացեք աշխատանքային գրքույկը, և այժմ, երբ տպեք մեկ աշխատանքային թերթ կամ ամբողջ աշխատանքային գիրքը, դրանք թույլ չեն տա տպել և կստանաք հետևյալ նախազգուշացումը.

կանխել աշխատանքային գրքույկի նախազգուշացման հաղորդագրություն տպելը


Առնչվող հոդվածներ քանակը:

Ինչպե՞ս տպել բազմաթիվ աշխատանքային գրքեր Excel- ում:

Ինչպե՞ս տպել միջակայքերը Excel- ում:

Ինչպե՞ս արագ տպել ընթացիկ էջը Excel- ում:

Ինչպե՞ս երկար սյունակ տպել մեկ էջում Excel- ում:

Գրասենյակի արտադրողականության լավագույն գործիքները

🤖 Kutools AI օգնականՀեղափոխություն կատարել տվյալների վերլուծության հիման վրա՝ Խելացի կատարում   |  Ստեղծեք ծածկագիր  |  Ստեղծեք հատուկ բանաձևեր  |  Վերլուծել տվյալները և ստեղծել գծապատկերներ  |  Invoke Kutools-ի գործառույթները...
Հանրաճանաչ հատկություններ: Գտեք, ընդգծեք կամ նույնականացրեք կրկնօրինակները   |  Deleteնջել դատարկ շարքերը   |  Միավորել սյունակները կամ բջիջները՝ առանց տվյալների կորստի   |   Կլոր առանց բանաձևի ...
Super Փնտրել: Բազմաթիվ չափանիշների VLookup    Բազմակի արժեք VLookup  |   VLookup բազմաթիվ թերթերում   |   Fuzzy Փնտրել ....
Ընդլայնված բացվող ցուցակ: Արագ ստեղծեք բացվող ցուցակը   |  Կախված բացվող ցուցակ   |  Բազմակի ընտրություն Drop Down ցուցակ ....
Սյունակի կառավարիչ: Ավելացրեք որոշակի քանակությամբ սյունակներ  |  Տեղափոխել սյունակները  |  Փոխարկել թաքնված սյունակների տեսանելիության կարգավիճակը  |  Համեմատեք միջակայքերը և սյունակները ...
Առանձնահատկություններ: Ցանցի կենտրոնացում   |  Դիզայնի տեսք   |   Մեծ Formula Bar    Աշխատանքային գրքույկի և թերթիկների կառավարիչ   |  Ռեսուրսների գրադարան (Ավտոմատ տեքստ)   |  Ամսաթիվ ընտրող   |  Միավորել աշխատանքային թերթերը   |  Գաղտնագրել/գաղտնազերծել բջիջները    Ուղարկեք նամակներ ըստ ցանկի   |  Սուպեր զտիչ   |   Հատուկ զտիչ (զտել թավ/շեղ/շեղված...) ...
Լավագույն 15 գործիքների հավաքածու12 Տեքստ Գործիքներ (Ավելացրեք տեքստ, Հեռացնել նիշերը, ...)   |   50+ Աղյուսակ Տեսակներ (Գանտի աղյուսակը, ...)   |   40+ Գործնական Բանաձեւեր (Հաշվարկել տարիքը ՝ ելնելով ծննդյան տարեդարձից, ...)   |   19 միացում Գործիքներ (Տեղադրեք QR կոդ, Տեղադրեք նկար ուղուց, ...)   |   12 Փոխարկում Գործիքներ (Բառեր համարներ, Արտարժույթի փոխակերպումը, ...)   |   7 Միաձուլում և պառակտում Գործիքներ (Ընդլայնված կոմբինատ տողեր, Պառակտված բջիջներ, ...)   |   ... եւ ավելին

Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար:  Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...


Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք

  • Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
  • Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
  • Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: