Sådan oprettes en rapport fra Excel-ark med VBA
Ved hjælp af Visual Basic for Application (VBA) kan du udvikle VBA-procedurer i Excel Visual Basic Editor (VBE). Det er et brugervenligt udviklingsmiljø. VBA-procedurer udviklet i VBE vil være en del af projektmappen. Du kan udvikle et VBA-program til automatisk at generere rapporter i Excel. Du skal aktivere makroen, før du kan programmere med VBE.
Trin 1
Klik på "Start", "Alle programmer" og "Microsoft Excel" for at åbne Excel-grænsefladen. Klik på båndet "Udvikler" og derefter på knappen "Makrosikkerhed". Marker "Deaktiver alle makroer med underretning", og klik på "Gem". Nu har du oprettet makroer i din Excel.
Trin 2
Tryk samtidigt på "Alt" og "F11" for at starte VBE. Dobbeltklik på "Ark1" i din højre rude i din VBE for at åbne kodevinduet. Vælg "Arbejdsark" i rullemenuerne i kodevinduet.
Indtast følgende kode i kodevinduet:
Sub PrintReport ()
Dæmp sidetal
Dæmp ActiveSh som regneark
Dim ShNameVis som streng
Indstil ActiveSh = ActiveSheet
For hver celle inden for rækkevidde (rækkevidde ("b3"), rækkevidde ("b3"). Afslut (xlDown))
Sh_view = ActiveCell.Offset (0, 1). Værdi
Sidetal = ActiveCell.Offset (0, 1). Værdi
Vælg Case Cell.Value
Sag 1
Ark (ShNameView) .Vælg
Sag 2
Ansøgning. Gå til reference: = ShNameView
Afslut Vælg
ActiveWindow.SeletedSheets.Printout Kopier: = 1
Næste
Sløjfen i koden fører til en udskrift for hver celle i kolonne B startende fra B2. Koden udskriver kun sider i den aktuelle projektmappe.