Hvordan skrive ut Odd og Even Pages i Excel 2007

Hvordan skrive ut Odd og Even Pages i Excel 2007


Mens Microsoft Excel 2007 tilbyr en rekke utskriftsalternativer fra utskrift-menyen på verktøylinjen, betyr det ikke gir deg muligheten til å skrive ut oddetall eller partall sider. Heldigvis er det et verktøy som du kan bruke til å skrive ut oddetallssidene og partallssidene: Visual Basic for Applications (VBA). VBA er innebygd i Excel 2007, og lar deg tilpasse Excel til å dekke dine behov. Dette inkluderer kjører makroer (programmer som utfører en spesifikk oppgave).

Bruksanvisning

1 Klikk på "Utvikler" kategorien i Excel 2007.

2 Klikk på "Visual Basic" for å åpne Visual Basic Editor (VBE).

3 Klikk "Sett inn" og deretter "Module" for å åpne en tom modul vindu.

4 Kopier og lim inn følgende kode inn i modulen vinduet:

Sub PrintOddEven ()

Dim TotalPages As Long

Dim startside As Long

Dim Page As Integer

Startpage = InputBox ( "Skriv start side nummer")

TotalPages = Application.ExecuteExcel4Macro ( "GET.DOCUMENT (50)")

Hvis startside> 0 Og startside & lt; = TotalPages Then

For Page = Startpage til TotalPages Trinn 2

ActiveSheet.PrintOut Fra: = Page, Til: = Page, _

Eksemplar: = 1, Sortering: = sant

neste

Slutt om

End Sub

5 Trykk "F5" for å kjøre makroen. En pop-up vindu vil dukke opp, og du vil bli returnert til Excel-regneark.

6 Skriv inn det første sidenummeret i tekstboksen. Hvis du ønsker å skrive ut oddetallssidene, angir et oddetall. Hvis du ønsker å skrive ut partallssidene, skriv et partall. Excel vil skrive ut oddetall eller partall sider fra det utgangspunktet. For eksempel, hvis du skriver "en," Excel vil skrive ut oddetallssidene 1 til slutten av dokumentet.

Hint

  • Hvis du ikke ser kategorien utbygger, klikker du på "Microsoft Office" -knappen, deretter "Alternativer for Excel."
  • Klikk "Popular", deretter på "Show Utvikler" fanen i båndet.