Kaip sukurti „Excel“ lapų ataskaitą su „VBA

Naudodami „Visual Basic for Application“ (VBA), galite sukurti „VBA“ procedūras „Excel Visual Basic Editor“ (VBE). Tai lengva naudoti kūrimo aplinka. VBE sukurtos VBA procedūros bus darbo knygos dalis. Galite sukurti „VBA“ programą automatiškai generuoti ataskaitas „Excel“. Prieš programuodami su „VBE“, turite įjungti „Macro“.

1 žingsnis
Spustelėkite „Pradėti“, „Visos programos“ ir „Microsoft Excel“, kad įeitumėte į „Excel“ sąsają. Spustelėkite juostą „Kūrėjas“ ir mygtuką „Makro saugumas“. Pažymėkite „Išjungti visus pranešimus apie makrokomandas“ ir spustelėkite „Išsaugoti“. Dabar „Excel“ nustatėte makrokomandas.

2 žingsnis
Paspauskite „Alt“ ir „F11“ vienu metu, kad paleistumėte VBE. Jei norite atidaryti kodo langą, dešiniuoju pelės klavišo skiltyje dešiniuoju pelės klavišu spustelėkite „Sheet1“. Išskleidžiamajame parinktyse kodo lange pasirinkite „Darbalapį“.
Įveskite šį kodą kodo lange: Sub PrintReport () Dim Page_numeris „Dim ActiveSh“ kaip darbo lapas Dim ShNameView kaip eilutės rinkinys „ActiveSh“ - kiekvienos diapazono elementų „ActiveSheet“ (Range ("b3"), Range ("b3"). End (xlDown)) Sh_view = ActiveCell.Offset (0, 1) .Value Page_number = ActiveCell.Offset (0, 1) .Value Pasirinkite Case Cell.Value Case 1 Lapai („ShNameView“) .Pasirinkite 2 atvejį. Goto nuoroda: = ShNameView End Pasirinkite ActiveWindow.SeletedSheets.Printut Copies: = 1 Toliau Kodo kilpa veda prie kiekvieno B stulpelio langelio, pradedant nuo B2. Kodas tik spausdina puslapius dabartinėje darbo knygoje.

Reikalingi elementai