Ինչպե՞ս ջնջել որոշակի թերթը, եթե առկա է աշխատանքային գրքում:
Ինչպե՞ս կարող եք ջնջել որոշակի աշխատանքային թերթ, եթե այն գոյություն ունի աշխատանքային գրքում: Սովորաբար, անհրաժեշտ է գտնել և ստուգել, եթե գոյություն ունի, այնուհետև ձեռքով ջնջել: Այստեղ ես կխոսեմ նշված աշխատաթերթը ուղղակիորեն ջնջելու հեշտ եղանակի մասին, եթե այն գոյություն ունի Excel ֆայլում:
Deleteնջեք հատուկ աշխատանքային թերթը, եթե առկա է VBA կոդով աշխատանքային գրքում
Deleteնջեք հատուկ աշխատանքային թերթը, եթե առկա է VBA կոդով աշխատանքային գրքում
Հաջորդ VBA կոդը կարող է օգնել ձեզ ջնջել նշված աշխատանքային թերթը, եթե այն առկա է աշխատանքային գրքում, խնդրում ենք արեք հետևյալ կերպ.
1. Անջատեք ALT + F11 բացել ստեղները Microsoft Visual Basic հավելվածների համար պատուհան.
2: Սեղմեք Տեղադրել > Մոդուլներ, և տեղադրեք հետևյալ կոդը Մոդուլներ Պատուհանը:
VBA կոդ. Deleteնջել որոշակի աշխատանքային թերթ, եթե առկա է աշխատանքային գրքում
Sub Test()
'Updateby Extendoffice
Dim xWs As Worksheet
Dim sheetName As String
sheetName = Application.InputBox("Input Sheet Name:", "Kutools for Excel", _
"sheet1", , , , , 2)
Application.DisplayAlerts = False
Err.Clear
On Error Resume Next
Set xWs = Sheets(sheetName)
If Err <> 0 Then
MsgBox "The'" & sheetName & "'" & "does not exist!", vbInformation, "Kutools for Excel"
Exit Sub
Else
xWs.Delete
MsgBox "The'" & sheetName & "'" & "has been deleted!", vbInformation, "Kutools for Excel"
End If
Application.DisplayAlerts = True
End Sub
3, Դրանից հետո սեղմեք F5 Այս կոդը գործարկելու բանալին ցուցադրվում է հուշման տուփ ՝ հիշեցնելու համար, որ մուտքագրեք թերթիկի անունը, որը ցանկանում եք ստուգել, եթե գոյություն ունի, տես նկարի նկարը.
4. Եվ այնուհետեւ կտտացրեք OK կոճակը:
(1.) Եթե թերթը գոյություն ունի, այն միանգամից կջնջվի, տես նկարի նկարը.
(2.) Եթե թերթը գոյություն չունի, կհայտնվի հուշման տուփ ՝ հիշեցնելու համար, ինչպես ցույց է տրված հետևյալ նկարը.
Գրասենյակի արտադրողականության լավագույն գործիքները
Լրացրեք ձեր Excel-ի հմտությունները Kutools-ի հետ Excel-ի համար և փորձեք արդյունավետությունը, ինչպես երբեք: Kutools-ը Excel-ի համար առաջարկում է ավելի քան 300 առաջադեմ առանձնահատկություններ՝ արտադրողականությունը բարձրացնելու և ժամանակ խնայելու համար: Սեղմեք այստեղ՝ Ձեզ ամենաշատ անհրաժեշտ հատկանիշը ստանալու համար...
Office Tab- ը Tabbed ինտերֆեյսը բերում է Office, և ձեր աշխատանքը շատ ավելի դյուրին դարձրեք
- Միացնել ներդիրներով խմբագրումը և ընթերցումը Word, Excel, PowerPoint- ով, Հրատարակիչ, Access, Visio և Project:
- Բացեք և ստեղծեք բազմաթիվ փաստաթղթեր նույն պատուհանի նոր ներդիրներում, այլ ոչ թե նոր պատուհաններում:
- Բարձրացնում է ձեր արտադրողականությունը 50%-ով և նվազեցնում մկնիկի հարյուրավոր սեղմումները ձեզ համար ամեն օր: