Kaip slopinti VBA įspėjamuosius pranešimus
Jei ištrinate darbaknyges ar lenteles, valdomas makrokomandos, arba atliekate kitas rimtas operacijas, „Excel“ paleidusi makrokomandą naudotojo klausia, ar tai tikrai tai, ko norite. Šioje iliustracijoje parodyta, kaip gali atrodyti langas:
Iš esmės šis langas tikrai naudingas, nes apsaugo nuo atsitiktinio svarbių duomenų ištrynimo. Daugeliu atvejų langas erzina ir klaidina vartotoją. Įsivaizduokite VBA sprendimą, kuriame turi būti sukurtos ir tada ištrintos vidinių skaičiavimo veiksmų lentelės. Tada pranešimo langas vartotojui sukelia sunkumų, nes vartotojas niekaip negali žinoti, kaip makrokomanda veikia viduje.
Tokiais atvejais tikslinga išjungti įspėjamąjį langą. Nes tai galite padaryti naudodami nuosavybę „DisplayAlerts“ vertė Netiesa paskirti. Ši makrokomanda tai daro ir tada ištrina pirmą lapą iš lentelės, kurioje yra makrokomanda:
Papildomas jungiklis Įspėjimas išjungtas ()
Application.DisplayAlerts = Netiesa
ThisWorkbook.Sheets (1). Ištrinti
Application.DisplayAlerts = Tiesa
Pabaiga Sub
Makrokomandoje nerodomas įspėjamasis pranešimas, nes įspėjimo pranešimas buvo išjungtas pirmąja komanda. Prieš pasibaigiant makrokomandai, visi įspėjamieji pranešimai vėl įjungiami. Būtinai prisiminkite tai! Pagal kiekvieną komandą, su kuria jūs „DisplayAlerts“ ant Netiesa Taip pat yra komanda, kurią galite naudoti, kad vėl įjungtumėte įspėjimo langą, kai makrokomanda atliks atitinkamą operaciją, dėl kurios gali atsirasti įspėjimo langas. Galite įjungti priskirdami vertę Tiesa.
