Овај Аццесс ВБА водич ће расправљати о томе како да комуницирате са Аццесс извештајима користећи ВБА.
Одштампај извештај
Ова ВБА функција штампа штампани извештај:
Јавна функција Принт_Репорт (РепортНаме Ас Стринг) Он Еррор ГоТо СубЕррор ДоЦмд.ОпенРепорт РепортНаме, ацВиевПревиев,,,, ацХиден ДоЦмд.СелецтОбјецт ацРепорт, РепортНаме ДоЦмд.РунЦомманд ацЦмдПринт СубЕкРек: Екр Функција: Број & ":" & Ерр.Опис Функција завршетка
Функцију можете позвати овако:
Привате Суб Принт_Репорт_Екампле () Позови Принт_Репорт ("Репорт1") Енд Суб
Имајте на уму да функција користи следећи ред кода за штампање извештаја:
ДоЦмд.РунЦомманд ацЦмдПринт
након отварања и одабира извештаја (погледајте следећи одељак).
Отворите / изаберите извештај
Горња функција је користила ДоЦмд.ОпенРепорт за отварање извештаја:
ДоЦмд.ОпенРепорт "Репорт1", ацВиевПревиев,,,, ацХиден
Напомена: за овај пример смо заменили променљиву РепортНаме са именом табеле „Извештај 1“
Затим бира извештај:
ДоЦмд.СелецтОбјецт ацРепорт, "Репорт1"
Извештај о филтрирању
Такође можете филтрирати извештај тако што ћете отворити извештај са посебним критеријумима:
ДоЦмд.ОпенРепорт "Извештај1", ацВиевПревиев,, "нум = 0"
Извезите извештај у Екцел
Можете користити ДоЦмд.ОутпутТо за излаз извештаја у Екцел:
ДоЦмд.ОутпутТо ацОутпутРепорт, "Рпт1", ацФорматКСЛС, "Ц: \ екамплес \ репорт1.клс"
Ова ВБА функција извешће извештај у Екцел:
Јавна функција Екпорт_Репорт (РепортНаме Ас Стринг, ФилеПатх Ас Стринг) Он Еррор ГоТо СубЕррор ДоЦмд.ОутпутТо ацОутпутРепорт, РепортНаме, ацФорматКСЛС, ФилеПатх СубЕкит: Екит Функција СубЕррор: Цалл Екпорт_Репорт ("Репорт1". " Завршна функција
Функција ће се сачувати на унету ФилеПатх, али ако није изабрана путања датотеке, биће сачувана у привремену фасциклу на Ц диску.
Функцију можете позвати овако:
Приватни под Екпорт_Репорт_Екампле () Позив Екпорт_Репорт ("Рпт1", "Ц: \ екамплес \ репорт1.клс") Крај Суб
ДоЦмд.ОутпутТо врши излаз у нову датотеку. Уместо тога, можете извршити излаз у постојећу датотеку или користити ДоЦмд.ОутпутТо за излаз других Екцел објеката. Можете сазнати више у нашем чланку о увозу / извозу у Аццесс ВБА.