Hur man gör en rapport från Excel-ark med VBA
Med Visual Basic for Application (VBA) kan du utveckla VBA-procedurer i Excel Visual Basic Editor (VBE). Det är en lättanvänd utvecklingsmiljö. VBA-procedurer som utvecklats i VBE kommer att vara en del av arbetsboken. Du kan utveckla ett VBA-program för att automatiskt generera rapporter i Excel. Du måste aktivera makroen innan du kan programmera med VBE.
Steg 1
Klicka på "Start", "Alla program" och "Microsoft Excel" för att öppna Excel-gränssnittet. Klicka på menyn "Utvecklare" och sedan på "Makrosäkerhet" -knappen. Markera "Inaktivera alla makron med avisering" och klicka på "Spara". Nu har du konfigurerat makron i din Excel.
Steg 2
Tryck på "Alt" och "F11" samtidigt för att starta VBE. Dubbelklicka på "Sheet1" i din högra ruta i din VBE för att öppna kodfönstret. Välj "Kalkylblad" i rullgardinsmenyn i kodfönstret.
Ange följande kod i kodfönstret:
Sub PrintReport ()
Dim sidnummer
Dimma ActiveSh som kalkylblad
Dim ShNameView As String
Ställ in ActiveSh = ActiveSheet
För varje cell inom räckvidd (Range ("b3"), Range ("b3"). End (xlDown))
Sh_view = ActiveCell.Offset (0, 1) .Värde
Sidnummer = ActiveCell.Offset (0, 1) .Värde
Välj Case Cell.Value
Fall 1
Ark (ShNameView). Välj
Fall 2
Ansökan. Gå till referens: = ShNameView
Slutval
ActiveWindow.SeletedSheets.Printout-kopior: = 1
Nästa
Slingan i koden leder till en utskrift för varje cell i kolumn B med början från B2. Koden skrivs bara ut sidor i den aktuella arbetsboken.