Ինչպե՞ս ջնջել ակտիվ աշխատանքային գիրքը (ընթացիկ ֆայլը) Excel- ում:
Ասենք, որ դուք աշխատանքային կայքից ներբեռնել եք կայքից, և աշխատանքային գիրքն ինքնաբերաբար բացվել է: Այնուամենայնիվ, աշխատանքային գիրքը կարող է պատշաճը չլինել, կամ աշխատանքային գիրքը չի պարունակում պահանջվող տեղեկատվություն, և դուք ցանկանում եք այն ջնջել: Երբեմն, հավանաբար, մոռանում եք լռելյայն գրացուցակը, որի մեջ ներբեռնված ֆայլերը ավտոմատ կերպով պահվում են: Մի անհանգստացեք, մենք կարող ենք ջնջել բացման / ակտիվ աշխատանքային գրքույկը, առանց այն ուղղակիորեն փակելու Excel- ում:
VBA- ի հետ ջնջեք ակտիվ աշխատանքային գիրքը (ընթացիկ ֆայլը)
Մեկ կտտոցով ՝ այս աշխատանքային գրքի հետ ակտիվ աշխատանքային գրքույկ պարունակող թղթապանակը բացելու համար
Ընթացիկ աշխատանքային գրքույկ պարունակող թղթապանակը / գրացուցակն արագ բացելու և բացման պանակում ընտրված ընթացիկ աշխատանքային գիրքն արագ ընտրելու համար փորձեք Kutools- ի Excel- ի Բաց պարունակող պանակ կոմունալ.
VBA- ի հետ ջնջեք ակտիվ աշխատանքային գիրքը (ընթացիկ ֆայլը)
Այս մեթոդը կներկայացնի VBA ՝ առանց Excel- ում փակելու բացման / ակտիվ աշխատանքային գրքույկը ջնջելու համար: Խնդրում ենք անել հետևյալը.
1. Սեղմեք ալտ + F11 միաժամանակ ստեղներ ՝ Microsoft Visual Basic հավելվածների համար պատուհանը բացելու համար:
2: սեղմեք Տեղադրել > Մոդուլներ, պատճենեք հետևյալ VBA կոդը և տեղադրեք բացման մոդուլի պատուհանում:
VBA. Deleteնջեք Ակտիվ աշխատանքային գիրքը ՝ առանց այն Excel- ում փակելու
Sub DeleteActiveWorkbook()
Dim xFullName As String
xFullName = Application.ActiveWorkbook.FullName
ActiveWorkbook.Saved = True
Application.ActiveWorkbook.ChangeFileAccess xlReadOnly
Kill xFullName
Application.ActiveWorkbook.Close False
End Sub
3. Սեղմեք F5 բանալի կամ Վազում այս VBA- ն գործարկելու կոճակը:
Notes:
(1) Այս VBA- ն կարող է ջնջել ակտիվ աշխատանքային գիրքը, բայց չի կարող փակել Excel պատուհանը: Եթե ակտիվ աշխատանքային գրքույկը ջնջելուց հետո աշխատանքային գրքեր չկան, խնդրում ենք ձեռքով փակել Excel պատուհանը:
(2) Եթե ակտիվ աշխատանքային գիրքը նախկինում երբեք չի պահպանվել, այս VBA- ն ի վիճակի չէ ջնջել այն: Այնուամենայնիվ, դուք կարող եք ուղղակիորեն ջնջել այս չպահված աշխատանքային գիրքը ՝ փակելով այն:
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: