Kā nomākt VBA brīdinājuma ziņojumus
Ja dzēšat darbgrāmatas vai tabulas, kuras kontrolē makro, vai veicat citas nopietnas darbības, programma Excel pēc makro palaišanas jautā lietotājam, vai tas tiešām ir tas, ko vēlaties. Šajā attēlā parādīts, kā logs var izskatīties:
Būtībā šis logs noteikti ir noderīgs, jo tas novērš nejaušu svarīgu datu dzēšanu. Daudzos gadījumos logs lietotājam ir kaitinošs un mulsinošs. Iedomājieties VBA risinājumu, kurā jāizveido un pēc tam jāizdzēš tabulas iekšējiem aprēķina soļiem. Tad ziņojuma logs rada grūtības lietotājam, jo lietotājs nevar zināt, kā makro darbojas iekšēji.
Šādos gadījumos ir lietderīgi izslēgt brīdinājuma logu. Tā kā to var paveikt, izmantojot īpašumu DisplayAlerts vērtība Nepatiess piešķirt. Šis makro to dara un pēc tam izdzēš pirmo lapu no tabulas, kurā atrodas makro:
Apmales slēdzisWarningOff ()
Application.DisplayAlerts = Nepareizi
ThisWorkbook.Sheets (1). Dzēst
Application.DisplayAlerts = Patiess
Beigt apakš
Makro nerāda brīdinājuma ziņojumu, jo brīdinājuma ziņojums tika izslēgts ar pirmo komandu. Pirms makro beigām visi brīdinājuma ziņojumi tiek atkal ieslēgti. Noteikti atcerieties šo! Pēc katras komandas, ar kuru jūs DisplayAlerts uz Nepatiess iestatīts, ir arī komanda, kuru varat izmantot, lai atkal ieslēgtu brīdinājuma logu pēc tam, kad makro ir veicis atbilstošo darbību, kas var novest pie brīdinājuma loga. Varat ieslēgt, piešķirot vērtību Taisnība.
