Noen av de mest nyttige makroer er enkle prosedyrer som endrer en eller flere av Excel innstillinger. For eksempel, hvis du finner deg selv å gjøre hyppige turer til Excel dialogboksen Alternativer for å endre en innstilling, det er en god kandidat for en enkel tidsbesparende macro.

Her er to eksempler som viser deg hvordan du endrer innstillingene i Excel. Du kan bruke de generelle prinsippene demonstrert av disse eksemplene til andre operasjoner som endrer innstillingene.

Endre boolske innstillinger

Som en lysbryter, er en innstilling boolsk
enten på eller off. For eksempel kan det være lurt å lage en makro som gjør regnearket sideskift skjermen av og på. Når du skriver ut eller forhåndsvise et regneark, Excel viser stiplede linjer for å angi sideskift. Noen mennesker finner disse stiplede linjene veldig irriterende.
Dessverre er den eneste måten å bli kvitt sideskiftet skjermen er å åpne Excel dialogboksen Alternativer, klikk kategorien Avansert, og bla nedover til du finner Show Page Breaks sjekk eske. Hvis du slår på makro opptaker når du endrer dette alternativet, genererer Excel følgende kode:
ActiveSheet.DisplayPageBreaks = False

På den annen side, hvis sideskift ikke er synlig når du registrerer makro, genererer Excel følgende kode:
ActiveSheet.DisplayPageBreaks = True

Dette kan lede deg til å konkludere med at du trenger to makroer: en for å slå på sideskift skjerm og en til å slå den av. Ikke sant. Følgende prosedyre bruker ikke operatøren, som slår Tro mot False og False til True. Gjennomføring av TogglePageBreaks prosedyren er en enkel måte å slå sideskift skjermen fra True False og fra False til True:
Sub TogglePageBreaks () On Error Resume Next ActiveSheet.DisplayPageBreaks = Ikke _ ActiveSheet.DisplayPageBreaksEnd Sub

Den første uttalelse forteller Excel til å ignorere eventuelle feil. For eksempel ikke en diagramarket ikke vise sideskift, så hvis du kjører makroen når et diagram ark er aktiv, vil du ikke se en feilmelding.
Du kan bruke denne teknikken til å veksle noen innstillinger som har boolsk (sann eller usann) verdier.

Endre non-boolske innstillinger

Du kan bruke en Select sak struktur for ikke-boolske innstillinger. Dette eksemplet veksler beregningsmodus mellom manuell og automatisk og viser en melding som angir gjeldende modus:
Sub ToggleCalcMode () Valg Sak Application.Calculation sak xlManual Application.Calculation = xlCalculationAutomatic MsgBox "Automatisk beregning Mode" Case xlAutomatic Application.Calculation = xlCalculationManual MsgBox "Manual Beregning Mode" End SelectEnd Sub

Du kan tilpasse denne teknikken for å endre andre ikke-Boolske innstillinger. Anmeldelser