Šiame straipsnyje sukursime makrokomandą, skirtą ištrinti modulį iš darbaknygės.
Mes naudosime „MainModule“ kaip neapdorotą modulį.
Mes norime atsikratyti šio pagrindinio modulio.
Norėdami tai padaryti, spustelėkite šį mygtuką.
Loginis paaiškinimas
Šiame straipsnyje mes sukūrėme dvi makrokomandas - „DeleteVBComponent“ ir „call_procedure“.
IštrintiVBComponent
Darbo knygos pavadinimas ir modulio pavadinimas įvedami ir modulis ištrinamas iš darbaknygės.
skambinimo_procedūra
Jis naudojamas makrokomandai „DeleteVBComponent“ iškviesti su įvestimi aktyvią darbaknygę ir „MainModule“.
Kodo paaiškinimas
Application.DisplayAlerts = Netiesa
Šis kodas naudojamas išjungti įspėjimo pranešimą.
wb.VBProject.VBComponents.Pašalinti wb.VBProject.VBComponents (CompName)
Šis kodas naudojamas moduliui pašalinti iš darbaknygės.
Application.DisplayAlerts = Tiesa
Šis kodas naudojamas įspėjimo pranešimui įjungti.
Sekite toliau pateiktą kodą
Parinktis „Explicit Sub Delete“ VBComponent („ByVal wb As Workbook“, „ByVal CompName As String“) „Įspėjimo pranešimo išjungimas Application.DisplayAlerts = False“ Ignoruoti klaidas On error Resume Next “Ištrinkite komponentą wb.VBProject.VBComponents.Remove wb.VBProject.VBN ) Apie klaidą „GoTo 0“, įgalinant įspėjamąjį pranešimą Application.DisplayAlerts = Tikroji pabaiga, antrinė call_procedure () „Skambinimas IštrintiVBComponent makrokomanda DeleteVBComponent ActiveWorkbook,„ MainModule “pabaiga
Jei jums patiko šis tinklaraštis, pasidalykite juo su draugais „Facebook“. Be to, mus galite sekti „Twitter“ ir „Facebook“.
Mes norėtume išgirsti jūsų nuomonę, praneškite mums, kaip galime pagerinti savo darbą ir padaryti jį geresnį. Rašykite mums el