Makrokomandų naudojimas darbaknygėms išsaugoti, kai keičiasi langeliai

Programoje Excel galite dirbti su duomenimis, kurie yra tokie jautrūs, kad norėsite išsaugoti kiekvieną kartą, kai pakeičiamas tam tikras langelis ar langelių diapazonas. Ši makrokomanda leidžia apibrėžti langelių diapazoną, kurį pakeitus darbaknygė bus išsaugota.

Pateiktame pavyzdyje norite, kad darbaknygė būtų išsaugota, kai redaguojamas bet kuris diapazono C5:C16 langelis.

Makrokomandų naudojimas darbaknygėms išsaugoti, kai keičiasi langeliai

Pakeitus langelį C5:C16, darbaknygė bus išsaugota.

Kaip veikia makrokomandas

Šio kodo paslaptis yra Intersect metodas. Kadangi nenorite išsaugoti darbalapio, kai pasikeičia koks nors senas langelis, naudokite sankirtos metodą, kad nustatytumėte, ar tikslinė langelis (pakeitęs langelis) susikerta su diapazonu, nurodytu kaip paleidimo diapazonas (šiuo atveju C5:C16). .

Metodas Intersect grąžina vieną iš dviejų dalykų: diapazono objektą, kuris apibrėžia dviejų nurodytų diapazonų sankirtą, arba nieko. Taigi iš esmės turite nukreipti tikslinę langelį prieš metodą Intersect, kad patikrintumėte, ar nėra nieko. Tuo metu galite nuspręsti, ar išsaugoti darbaknygę.

Private Sub Worksheet_Change (ByVal Target As Range)
1 veiksmas: ar pakeistas diapazonas susikerta?
    Jei sankryža (tikslas, diapazonas ("C5: C16")) yra nieko, tada
„2 veiksmas: jei nėra sankryžos, atlikite išvažiavimo procedūrą
    Išeiti iš sub
'3 veiksmas: jei yra sankryža, išsaugokite darbaknygę
    Kitas
    ActiveWorkbook.Save
4 veiksmas: uždarykite If teiginį
    Pabaiga, jei
Pabaigos sub

1 veiksme tiesiog patikrinkite, ar tikslinė ląstelė (pasikeitusi ląstelė) yra intervale, nurodytame sankirtos metodu. Reikšmė Nieko reiškia, kad tikslinė ląstelė nepatenka į nurodytą diapazoną.

2 veiksmas priverčia makrokomandą sustoti ir išeiti iš procedūros, jei nėra susikirtimo tarp tikslinės ląstelės ir nurodyto diapazono.

Jei yra sankryža, 3 veiksmas suaktyvina aktyvios darbaknygės išsaugojimo metodą, perrašydamas ankstesnę versiją.

4 veiksme tiesiog uždarote If teiginį. Kiekvieną kartą, kai pradedate „If-Then-Else“ patikrinimą, turite jį uždaryti atitinkamu „End If“.

Kaip naudoti makrokomandą

Norėdami įdiegti šią makrokomandą, turite ją nukopijuoti ir įklijuoti į įvykio kodo langą Worksheet_Change. Įdėjus makrokomandą čia, ji bus paleista kiekvieną kartą, kai atliekate bet kokius lapo pakeitimus:

Suaktyvinkite Visual Basic redaktorių paspausdami Alt + F11.

Projekto lange raskite savo projekto / darbaknygės pavadinimą ir spustelėkite šalia jo esantį pliuso ženklą, kad pamatytumėte visus lapus.

Spustelėkite lapą, iš kurio norite suaktyvinti kodą.

Išskleidžiamajame sąraše Įvykis pasirinkite Keisti įvykį.

Įveskite arba įklijuokite kodą naujai sukurtame modulyje, pakeisdami diapazono adresą pagal savo poreikius.

Makrokomandų naudojimas darbaknygėms išsaugoti, kai keičiasi langeliai

Įveskite savo kodą į darbalapio keitimo įvykį.


Kaip neleisti „Microsoft Word“ atidaryti failų tik skaitymo režimu sistemoje „Windows“.

Kaip neleisti „Microsoft Word“ atidaryti failų tik skaitymo režimu sistemoje „Windows“.

Kaip neleisti Microsoft Word atidaryti failų tik skaitymo režimu sistemoje Windows. Microsoft Word atidaro failus tik skaitymo režimu, todėl jų redaguoti neįmanoma? Nesijaudinkite, metodai pateikiami žemiau

Kaip ištaisyti neteisingą Microsoft Word dokumentų spausdinimą

Kaip ištaisyti neteisingą Microsoft Word dokumentų spausdinimą

Kaip ištaisyti klaidas spausdinant neteisingus Microsoft Word dokumentus.Klaidos spausdinant Word dokumentus su pakeistais šriftais, netvarkingomis pastraipomis, trūkstamo teksto ar prarasto turinio yra gana dažnos. Tačiau nereikia

Ištrinkite rašiklio ir paryškinimo piešinius savo „PowerPoint“ skaidrėse

Ištrinkite rašiklio ir paryškinimo piešinius savo „PowerPoint“ skaidrėse

Jei naudodami rašiklį ar žymeklį piešėte ant savo PowerPoint skaidrės pristatymo metu, galite išsaugoti brėžinius kitam pristatymui arba ištrinti juos, kad kitą kartą rodydami pradėtumėte nuo švarių PowerPoint skaidrių. Vykdykite šias instrukcijas, kad ištrintumėte rašiklio ir žymeklio piešinius: Trinti linijas po vieną […]

Stilių bibliotekos turinys „SharePoint 2010“.

Stilių bibliotekos turinys „SharePoint 2010“.

Stilių bibliotekoje yra CSS failų, XSL (Extensible Stylesheet Language) failų ir vaizdų, naudojamų iš anksto nustatytų puslapių puslapiuose, puslapių išdėstymuose ir valdikliuose „SharePoint 2010“. Norėdami rasti CSS failus publikavimo svetainės stilių bibliotekoje: pasirinkite Svetainės veiksmai → Peržiūrėti Visas svetainės turinys. Pasirodo svetainės turinys. Stiliaus biblioteka yra […]

Formatuokite skaičius tūkstančiais ir milijonais „Excel“ ataskaitose

Formatuokite skaičius tūkstančiais ir milijonais „Excel“ ataskaitose

Neužkraukite savo auditorijos milžiniškais skaičiais. Programoje „Microsoft Excel“ galite pagerinti informacijos suvestinių ir ataskaitų skaitomumą formatuodami skaičius, kad jie būtų rodomi tūkstančiais arba milijonais.

Kaip bendrinti ir stebėti „SharePoint“ svetaines

Kaip bendrinti ir stebėti „SharePoint“ svetaines

Sužinokite, kaip naudoti „SharePoints“ socialinių tinklų įrankius, leidžiančius asmenims ir grupėms bendrauti, bendradarbiauti, bendrinti ir prisijungti.

Kaip konvertuoti datas į Juliano formatus programoje „Excel“.

Kaip konvertuoti datas į Juliano formatus programoje „Excel“.

Julijaus datos dažnai naudojamos gamybos aplinkoje kaip laiko žyma ir greita partijos numerio nuoroda. Šio tipo datos kodavimas leidžia mažmenininkams, vartotojams ir paslaugų agentams nustatyti, kada produktas buvo pagamintas, taigi ir produkto amžių. Julijaus datos taip pat naudojamos programavimo, kariuomenės ir astronomijos srityse. Skirtingi […]

Kaip sukurti „Access“ žiniatinklio programą

Kaip sukurti „Access“ žiniatinklio programą

Galite sukurti žiniatinklio programą naudodami „Access 2016“. Taigi, kas vis dėlto yra žiniatinklio programa? Na, žiniatinklis reiškia, kad jis yra internete, o programa yra tik „programos“ santrumpa. Pasirinktinė žiniatinklio programa yra internetinė duomenų bazės programa, pasiekiama iš debesies naudojant naršyklę. Kuriate ir prižiūrite žiniatinklio programą darbalaukio versijoje […]

Greitosios paleidimo juosta „SharePoint 2010“.

Greitosios paleidimo juosta „SharePoint 2010“.

Daugumoje „SharePoint 2010“ puslapių sparčiojo paleidimo juostoje, esančioje kairėje puslapio pusėje, pateikiamas naršymo nuorodų sąrašas. Greitosios paleidimo juostoje rodomos nuorodos į siūlomą svetainės turinį, pvz., sąrašus, bibliotekas, svetaines ir publikavimo puslapius. Greitojo paleidimo juostoje yra dvi labai svarbios nuorodos: Visas svetainės turinys: […]

Ką reiškia „Excel“ sprendimo klaidų pranešimai?

Ką reiškia „Excel“ sprendimo klaidų pranešimai?

Paprastoms problemoms spręsti „Excel“ sprendėjas paprastai greitai suranda optimalias tikslinės funkcijos „Solver“ kintamųjų reikšmes. Tačiau kai kuriais atvejais „Solver“ turi problemų ieškant „Solver“ kintamųjų reikšmių, optimizuojančių tikslo funkciją. Tokiais atvejais „Solver“ paprastai rodo pranešimą arba klaidos pranešimą, kuriame aprašoma arba aptariama problema, kurią […]