Ved å gjøre et Microsoft Excel-regneark utløper , hindrer du brukere fra å kunne vise eller redigere dokumentet etter en bestemt dato . Dette er et godt alternativ hvis informasjonen i dokumentet ikke lenger er korrekt eller gyldig etter aktuelle datoen . Når et Excel-regneark utløper, ikke dokumentet åpnes når en bruker prøver å få tilgang til det, og en utløpsdato melding vises på skjermen . Visual Basic-redigering , installeres automatisk med 1997 gjennom 2007 versjoner av Microsoft Excel , har evnen til å sette opp et regneark som utløper. Instruksjoner
en
Åpne Microsoft Excel , gå til "Fil "-menyen og velg " Open". Bla til Excel-fil som du ønsker å gjøre utløpe, og dobbeltklikker på filen for å åpne det .
2
Trykk " Alt + F11 " for å starte Visual Basic Editor fra Excel. Bruk enten " Ctrl + R" for å bytte til "Project Explorer " vinduet eller gå til "View "-menyen , velg " Annet Windows " og velg "Project Explorer" fra listen over alternativer.
3
Høyreklikk på " ThisWorkbook " i "Project Explorer "-vinduet. Velg " Vis kode " fra listen over tilgjengelige alternativer.
4
Skriv inn koden som gjør regnearket utløper inn koden boksen. En skikkelig kode format som gir brukerne en melding om utløpsdato , og antall dager igjen til regnearket utløper ser slik ut:
Sub Auto_Open ( ) \\ \\ Dim exdate Som Dato \\ \\ exdate = \\ " 12/01/10 \\ " \\ \\ Hvis Date > exdate Deretter \\ \\ MsgBox ( \\ " Spreadsheet har utløpt \\ " ) \\ \\ ActiveWorkbook.Close \\ \\ End If \\ \\ MsgBox ( \\ " arbeidsbok gyldig til \\ " & exdate - Dato og \\ " dager igjen \\ " ) \\ \\ End Sub
Oppgi datoen da regnearket skal utløpe ved " exdate = " og en melding du foretrekker om utløpt regnearket i stedet for" Spreadsheet har utløpt . "
5
tilbake til den åpne Excel-regneark , gå til" Fil "-menyen og velg" Lagre "for å lagre arbeidsboken med den nye makroen vedlagt. Lukker arbeidsboken og åpne den i Excel. Meldingen du skrev inn makroen skal vises , med angivelse av utløpsdatoen på filen og hvor mange dager det er igjen til den utløper .