Hvordan lage en rapport fra Excel-ark med VBA

Hvordan lage en rapport fra Excel-ark med VBA


Ved hjelp av Visual Basic for Application (VBA), kan du utvikle VBA prosedyrer i Excel Visual Basic Editor (VBE). Det er en lett-å-bruke utviklingsmiljø. VBA prosedyrer utviklet i VBE vil være en del av arbeidsboken. Du kan utvikle en VBA-programmet til å automatisk generere rapporter i Excel. Du må aktivere Makro før du kan programmere med VBE.

Bruksanvisning

1 Klikk "Start", "Alle programmer" og "Microsoft Excel" for å gå inn i Excel-grensesnitt. Klikk på "Utvikler" bånd og deretter "Macro Sikkerhet" knappen. Sjekk "Deaktiver alle makroer med varsling" og klikk "Lagre". Nå har du satt opp makroer i Excel.

2 Trykk "Alt" og "F11" samtidig for å starte VBE. Dobbeltklikk på "Ark1" på din høyre ruten i VBE for å åpne kodevinduet. Velg "regneark" på rulle alternativer i koden vinduet.

3 Skriv inn følgende kode i kodevinduet:

Sub PrintReport ()

Dim PAGE_NUMBER

Dim ActiveSh Som regneark

Dim ShNameView As String

Sett ActiveSh = Active

For hver celle i Range (Range ( "B3"), Range ( "B3"). End (xlDown))

Sh_view = ActiveCell.Offset (0, 1) .Value

PAGE_NUMBER = ActiveCell.Offset (0, 1) .Value

Velg Sak Cell.Value

tilfelle 1

Sheets (ShNameView) .Velg

tilfelle 2

Søknad. Goto Annonse: = ShNameView

End Select

ActiveWindow.SeletedSheets.Printout Eksemplar: = 1

neste

Sløyfen i koden fører til en utskrifts for hver celle i kolonne B fra B2. Koden skriver bare sider i gjeldende arbeidsbok.