Les på engelsk

Del via


Bruk Lagre-egenskapen til å avgjøre om en arbeidsbok er endret

Sammendrag

Du kan finne ut om det er gjort endringer i en arbeidsbok ved å kontrollere lagrede egenskapen for arbeidsboken. Lagre-egenskapen returnerer en Sann- eller Usann-verdi avhengig av om det er gjort endringer i arbeidsboken.

Obs!

Det er mulig å sette lagrede egenskapen til Sann eller Usann. Delen Mer informasjon i denne artikkelen inneholder eksempelmakroer som demonstrerer bruken av egenskapen Lagret.

Ulike betingelser i regnearket, for eksempel tilstedeværelse av flyktige funksjoner, kan påvirke saved-egenskapen.

Mer informasjon

Microsoft gir programmeringseksempler kun for illustrasjon, uten garanti hverken uttrykt eller antydet. Dette inkluderer, men er ikke begrenset til, de underforståtte garantiene for salgbarhet eller egnethet for et bestemt formål. Denne artikkelen forutsetter at du er kjent med programmeringsspråket som blir demonstrert og verktøyene som brukes til å opprette og feilsøke prosedyrer. Microsofts kundestøtteteknikere kan bidra til å forklare funksjonaliteten til en bestemt prosedyre, men de vil ikke endre disse eksemplene for å gi ekstra funksjonalitet eller konstrukteringsprosedyrer for å oppfylle dine spesifikke krav.

Eksempel 1: Makro for å vise melding hvis aktiv arbeidsbok har endringer som ikke er lagret

VB
Sub TestForUnsavedChanges()
    If ActiveWorkbook.Saved = False Then
        MsgBox "This workbook contains unsaved changes."
    End If
End Sub

Eksempel 2: Makro for å lukke arbeidsboken og forkaste endringer

Denne makroen lukker arbeidsboken som inneholder eksempelkoden, og forkaster eventuelle endringer i arbeidsboken ved å angi Lagre-egenskapen til Sann:

VB
Sub CloseWithoutChanges()
    ThisWorkbook.Saved = True
    ThisWorkbook.Close
End Sub

Eksempel 3: En annen makro for å lukke arbeidsboken og forkaste endringer

VB
Sub CloseWithoutChanges()
    ThisWorkbook.Close SaveChanges:=False
End Sub

Referanser

Hvis du vil ha mer informasjon om hvordan du bruker eksempelkoden i denne artikkelen, kan du se Slik kjører du eksempelkode fra Knowledge Base-artikler i Office 2000.