Tässä Access VBA -opetusohjelmassa keskustellaan siitä, miten voit käyttää Access -raportteja VBA: n avulla.
Tulosta raportti
Tämä VBA -toiminto tulostaa Access -raportin:
Julkinen toiminto Print_Report (raportin nimi merkkijonona) Virhe GoTo -alivirhe DoCmd.OpenReport ReportName, acViewPreview,,,, acHiden DoCmd.SelectObject acReport, ReportName DoCmd.RunCommand acCmdPrint SubExit: Exfr Numero & ":" & Err.Description End Function
Voit kutsua funktion seuraavasti:
Yksityinen osa Print_Report_Example () Call Print_Report ("Report1") End Sub
Huomaa, että toiminto tulostaa raportin seuraavalla koodirivillä:
DoCmd.RunCommand acCmdPrint
raportin avaamisen ja valitsemisen jälkeen (katso seuraava osa).
Avaa / valitse raportti
Yllä oleva toiminto avasi raportin DoCmd.OpenReport:
DoCmd.OpenReport "Report1", acViewPreview,,,, acHiden
Huomaa: tässä esimerkissä olemme korvanneet muuttujan ReportName taulukon nimellä "Raportti 1"
Seuraavaksi se valitsee raportin:
DoCmd.SelectObject acReport, "Report1"
Suodata raportti
Voit myös suodattaa raportin avaamalla raportin tietyin ehdoin:
DoCmd.OpenReport "Report1", acViewPreview,, "num = 0"
Vie raportti Exceliin
Voit lähettää raportin Exceliin DoCmd.OutputTo -toiminnolla:
DoCmd.OutputTo acOutputReport, "Rpt1", acFormatXLS, "C: \ esimerkit \ report1.xls"
Tämä VBA -toiminto vie raportin Exceliin:
Julkinen toiminto Export_Report (Raportin nimi merkkijonona, FilePath merkkijonona) Virhe GoTo SubError DoCmd.OutputTo acOutputReport, ReportName, acFormatXLS, FilePath SubExit: Exit Function SubError: Call Export_Report ("Report1", "c) \ r Lopeta toiminto
Toiminto tallentaa syötettyyn FilePath -polkuun, mutta jos tiedostopolkua ei ole valittu, se tallennetaan C -aseman Temp -kansioon.
Voit kutsua funktion seuraavasti:
Yksityinen osa Export_Report_Example () Soita Export_Report ("Rpt1", "C: \ esimerkit \ report1.xls") Lopeta ala
DoCmd.OutputTo tulostaa uuteen tiedostoon. Sen sijaan voit tulostaa olemassa olevaan tiedostoon tai käyttää DoCmd.OutputTo -ohjelmaa muiden Excel -objektien tulostamiseen. Voit lukea lisää artikkelistamme tuonnista / viennistä Access VBA: ssa.
