Bruke makroer for å lagre arbeidsbøker når celler endres

I Excel jobber du kanskje med data som er så sensitive at du vil lagre hver gang en bestemt celle eller celleområde endres. Denne makroen lar deg definere et celleområde som, når det endres, tvinger arbeidsboken til å lagre.

I eksemplet som vises, vil du at arbeidsboken skal lagres når det gjøres en redigering av noen av cellene i området C5:C16.

Bruke makroer for å lagre arbeidsbøker når celler endres

Endring av en celle i C5:C16 tvinger arbeidsboken til å lagre.

Hvordan makroen fungerer

Hemmeligheten bak denne koden er Intersect-metoden. Fordi du ikke vil lagre regnearket når en gammel celle endres, bruker du Intersect-metoden for å finne ut om målcellen (cellen som endret seg) krysser området som er spesifisert som triggerområdet (C5:C16 i dette tilfellet) .

Intersect-metoden returnerer én av to ting: et Range-objekt som definerer skjæringspunktet mellom de to gitte områdene, eller ingenting. Så i hovedsak må du kaste målcellen mot Intersect-metoden for å se etter en verdi på Ingenting. På det tidspunktet kan du bestemme om du vil lagre arbeidsboken.

Private Sub Worksheet_Change(ByVal Target As Range)
'Trinn 1: Skjærer den endrede rekkevidden seg?
    Hvis Intersect(Target, Range("C5:C16")) er ingenting da
'Trinn 2: Hvis det ikke er noe veikryss, gå ut av prosedyren
    Avslutt Sub
'Trinn 3: Hvis det er et veikryss, lagre arbeidsboken
    Ellers
    ActiveWorkbook.Save
'Trinn 4: Lukk If-setningen
    Slutt om
End Sub

I trinn 1 sjekker du ganske enkelt for å se om målcellen (cellen som har endret seg) er i området spesifisert av Intersect-metoden. En verdi på Ingenting betyr at målcellen er utenfor det angitte området.

Trinn 2 tvinger makroen til å stoppe og avslutte prosedyren hvis det ikke er noe skjæringspunkt mellom målcellen og det spesifiserte området.

Hvis det er et kryss, utløser trinn 3 Lagre-metoden for den aktive arbeidsboken, og overskriver den forrige versjonen.

I trinn 4 lukker du bare If-setningen. Hver gang du starter en If-Then-Else-sjekk, må du lukke den med en tilsvarende End If.

Hvordan bruke makroen

For å implementere denne makroen må du kopiere og lime den inn i vinduet Worksheet_Change-hendelseskode. Ved å plassere makroen her kan den kjøres hver gang du gjør endringer i arket:

Aktiver Visual Basic Editor ved å trykke Alt+F11.

I prosjektvinduet finner du navnet på prosjektet/arbeidsboken og klikker på plusstegnet ved siden av for å se alle arkene.

Klikk på arket du vil utløse koden fra.

I rullegardinlisten Hendelse velger du Endre hendelse.

Skriv eller lim inn koden i den nyopprettede modulen, og endre rekkeviddeadressen for å passe dine behov.

Bruke makroer for å lagre arbeidsbøker når celler endres

Skriv inn koden din i endringshendelsen for regneark.


Hvordan blokkere Microsoft Word fra å åpne filer i skrivebeskyttet modus på Windows

Hvordan blokkere Microsoft Word fra å åpne filer i skrivebeskyttet modus på Windows

Hvordan blokkere Microsoft Word fra å åpne filer i skrivebeskyttet modus på Windows Microsoft Word åpner filer i skrivebeskyttet modus, noe som gjør det umulig å redigere dem? Ikke bekymre deg, metodene er nedenfor

Hvordan fikse feil utskrift av Microsoft Word-dokumenter

Hvordan fikse feil utskrift av Microsoft Word-dokumenter

Slik fikser du feil ved utskrift av feil Microsoft Word-dokumenter Feil ved utskrift av Word-dokumenter med endrede fonter, rotete avsnitt, manglende tekst eller tapt innhold er ganske vanlig. Men ikke gjør det

Slett penn- og highlighter-tegninger på PowerPoint-lysbilder

Slett penn- og highlighter-tegninger på PowerPoint-lysbilder

Hvis du har brukt pennen eller merkepennen til å tegne på PowerPoint-lysbildene dine under en presentasjon, kan du lagre tegningene til neste presentasjon eller slette dem, slik at du neste gang du viser dem starter med rene PowerPoint-lysbilder. Følg disse instruksjonene for å slette penn- og merkepenntegninger: Slette linje én på […]

Style Library-innhold i SharePoint 2010

Style Library-innhold i SharePoint 2010

Stilbiblioteket inneholder CSS-filer, Extensible Stylesheet Language-filer (XSL) og bilder som brukes av forhåndsdefinerte mastersider, sideoppsett og kontroller i SharePoint 2010. For å finne CSS-filer i stilbiblioteket til et publiseringsnettsted: Velg Site Actions→ View Alt innhold på nettstedet. Innholdet på nettstedet vises. Style-biblioteket ligger i […]

Formater tall i tusenvis og millioner i Excel-rapporter

Formater tall i tusenvis og millioner i Excel-rapporter

Ikke overveld publikum med gigantiske tall. I Microsoft Excel kan du forbedre lesbarheten til dashbordene og rapportene dine ved å formatere tallene dine slik at de vises i tusenvis eller millioner.

Hvordan dele og følge SharePoint-nettsteder

Hvordan dele og følge SharePoint-nettsteder

Lær hvordan du bruker SharePoints sosiale nettverksverktøy som lar enkeltpersoner og grupper kommunisere, samarbeide, dele og koble til.

Hvordan konvertere datoer til julianske formater i Excel

Hvordan konvertere datoer til julianske formater i Excel

Julianske datoer brukes ofte i produksjonsmiljøer som et tidsstempel og hurtigreferanse for et batchnummer. Denne typen datokoding lar forhandlere, forbrukere og serviceagenter identifisere når et produkt ble laget, og dermed alderen på produktet. Julianske datoer brukes også i programmering, militæret og astronomi. Forskjellig […]

Hvordan lage en Access Web App

Hvordan lage en Access Web App

Du kan lage en nettapp i Access 2016. Så hva er en nettapp egentlig? Vel, nettet betyr at det er online, og appen er bare en forkortelse for "applikasjon". En Custom Web App er en online databaseapplikasjon som du får tilgang til fra skyen ved hjelp av en nettleser. Du bygger og vedlikeholder nettappen i skrivebordsversjonen […]

Hurtigstartlinje i SharePoint 2010

Hurtigstartlinje i SharePoint 2010

De fleste sidene i SharePoint 2010 viser en liste over navigasjonskoblinger på hurtigstartlinjen langs venstre side av siden. Hurtigstartlinjen viser koblinger til innhold på nettstedet som lister, biblioteker, nettsteder og publiseringssider. Hurtigstartlinjen inneholder to svært viktige lenker: Linken for alt nettstedinnhold: […]

Hva betyr løserfeilmeldingene i Excel?

Hva betyr løserfeilmeldingene i Excel?

For enkle problemer finner Solver i Excel vanligvis raskt de optimale Solver-variabelverdiene for objektivfunksjonen. Men i noen tilfeller har Solver problemer med å finne Solver-variabelverdiene som optimerer objektivfunksjonen. I disse tilfellene viser Solver vanligvis en melding eller en feilmelding som beskriver eller diskuterer problemet som […]