Hvordan lage en rapport fra Excel-ark med VBA

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

Trinn 1

Klikk "Start", "Alle programmer" og "Microsoft Excel" for å gå inn i Excel-grensesnittet. Klikk på "Developer" -båndet og deretter "Macro Security" -knappen. Merk av for "Deaktiver alle makroer med varsling" og klikk "Lagre". Nå har du satt opp makroer i Excel.

Steg 2

Trykk "Alt" og "F11" samtidig for å starte VBE. Dobbeltklikk "Ark1" i høyre rute i VBE for å åpne kodevinduet. Velg "Regneark" i rullegardinmenyene i kodevinduet.

Skriv inn følgende kode i kodevinduet:

Sub PrintReport ()

Demp sidetall

Demp ActiveSh som regneark

Dim ShNameVis som streng

Sett ActiveSh = ActiveSheet

For hver celle innen rekkevidde (Range ("b3"), Range ("b3"). End (xlDown))

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

Sidetall = ActiveCell.Offset (0, 1). Verdi

Velg Case Cell.Value

Sak 1

Ark (ShNameView) .Velg

Sak 2

Applikasjon. Gå til referanse: = ShNameView

Sluttvalg

ActiveWindow.SeletedSheets.Printout Kopier: = 1

Neste

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