"Excel VBA": išsaugokite darbaknygę be raginimo (paprastais žingsniais)

  • Pasidalinti
Hugh West

Išsaugant Makro failą tiksliai toje pačioje vietoje, kaip ir anksčiau, jis visuomet įspėjamuoju pranešimu paragins pakeisti failą. Tai gali būti nepatogu, kai reikia dažnai išsaugoti duomenis ir tam turite nedaug laiko. Todėl naudosime VBA kodą, kad išspręstumėte problemą. Šioje pamokoje sužinosite, kaip išsaugoti darbo knygą be raginimo su "Excel" VBA .

Atsisiųsti praktikos sąsiuvinį

Atsisiųskite šį pratybų sąsiuvinį, kad galėtumėte atlikti pratimus skaitydami šį straipsnį.

Išsaugoti be raginimo.xlsm

7 paprasti žingsniai, kaip išsaugoti darbaknygę be raginimo naudojant "Excel VBA

Toliau pateiktame paveikslėlyje pateikiame pavyzdinį duomenų rinkinį, kad parodytume skirtumą po to, kai paleidžiama VBA kodai norėdami sustabdyti raginimą. Įrašydami failą, naudosime VBA kodai išjungti rodomą įspėjamąjį pranešimą.

1 žingsnis: sukurti modulį VBA kodui rašyti

  • Pirmiausia paspauskite Alt + F11 atidaryti VBA makrokomandos .
  • Spustelėkite Įdėkite skirtukas.
  • Iš parinkčių pasirinkite Modulis sukurti naują Modulis .

2 veiksmas: į kodą įterpkite funkciją SaveAs

  • Naudoti funkcija SaveAs šiame sąsiuvinyje įveskite ( ) ir SaveAs arba pasirinkite SaveAs iš galimų funkcijų sąrašo.

3 žingsnis: failo adreso ir pavadinimo įtraukimas į VBA kodą

  • Norėdami įterpti failo adresą, eikite į failo vietą.
  • Spustelėkite aplankas piktogramą ir kopijuoti adresas.

  • Pasta adresą pagal Failo pavadinimas argumentas Funkcija SaveAs .
  • Įvedus adresas , įveskite failo pavadinimas .
  • Galiausiai, uždaryti adresą ir failo pavadinimas su kabutėmis (" ") .

  • Įrašę adresą, įveskite kablelis ir parašykite 52 Failo formatas argumentas.

  • Taip bus rodomi galutiniai kodai.
 Sub Without_Prompt() ThisWorkbook.SaveAs "C:\Users\Admin\Desktop\Bhubon\Exceldemy\3875_420093_Bhubon_excel vba išsaugoti sąsiuvinį be raginimo\Save Without Prompt", 52 End Sub 

4 veiksmas: paleiskite VBA kodą ir patikrinkite, ar nėra klaidos

  • Bus rodomas raginamasis pranešimas, nes mes neišjungėme Įspėjimai pranešimas.
  • Tada spustelėkite Ne .

  • Galiausiai spustelėkite Pabaiga .

5 veiksmas: parašykite kodą, kad išjungtumėte raginamąjį pranešimą

  • Norėdami išjungti raginamąjį pranešimą, turime išjungti DisplayAlerts pranešimas.
  • Duokite man DisplayAlerts. parinkties pareiškimą kaip Klaidingas kad išjungtumėte raginimą arba įspėjamąjį pranešimą.
  • Įrašykite šiuos kodus į Modulis sustabdyti raginimą.
 Sub Without_Prompt() 'Komanda nerodyti užklausos Application.DisplayAlerts = False 'Taikyti komandą failiui išsaugoti 'Argumente File Name nurodykite failo pavadinimą ir adresą ThisWorkbook.SaveAs "C:\Users\Admin\Desktop\Bhubon\Exceldemy\3875_420093_Bhubon_excel vba save workbook without prompt\Save Without Prompt", 52 Application.DisplayAlerts = True End Sub 

6 veiksmas: paleiskite VBA kodą išjungę komandą DisplayAlerts

  • Šį kartą spustelėkite paleidimo mygtuką arba paspauskite F5 paleisti VBA kodai .
  • Tačiau dabar įspėjamasis pranešimas nebus rodomas.

7 veiksmas: patikrinkite galutinį atsakymą rezultatuose

  • Mūsų pavyzdiniame duomenų rinkinyje pakeiskite gavėjo vardas ir pavardė Sūrymas į Bhubon .

  • Paspauskite F5 paleisti programą ir joks pranešimas neatsiras.
  • Uždarykite darbalapį jo neišsaugoję.

  • Atidarykite failą ir įsitikinkite, kad failas išsaugotas su naujausiu dabartiniu leidimu, kurį padarėte.

Išvada

Tikiuosi, kad šiame straipsnyje rasite pamoką, kaip išsaugoti sąsiuvinius be raginimo su "Excel" VBA . visas šias procedūras reikėtų išmokti ir pritaikyti savo duomenų rinkiniui. Peržiūrėkite praktinio darbo sąsiuvinį ir išbandykite šiuos įgūdžius. Jūsų vertingas palaikymas mus motyvuoja toliau rengti tokius vadovėlius kaip šis.

Jei turite klausimų, susisiekite su mumis. Taip pat nedvejodami palikite komentarų toliau esančiame skyriuje.

Mes, Exceldemy Komanda visada reaguoja į jūsų užklausas.

Būkite su mumis ir toliau mokykitės.

Hugh Westas yra labai patyręs Excel treneris ir analitikas, turintis daugiau nei 10 metų patirtį šioje srityje. Jis yra įgijęs apskaitos ir finansų bakalauro bei verslo administravimo magistro laipsnius. Hugh turi aistrą mokymui ir sukūrė unikalų mokymo metodą, kurį lengva sekti ir suprasti. Jo ekspertinės žinios apie „Excel“ padėjo tūkstančiams studentų ir specialistų visame pasaulyje tobulinti savo įgūdžius ir tobulėti savo karjeroje. Savo tinklaraštyje Hugh dalijasi savo žiniomis su pasauliu, siūlydamas nemokamus „Excel“ vadovėlius ir internetinius mokymus, kad padėtų asmenims ir įmonėms išnaudoti visą savo potencialą.