Програмирање
Висуал Басиц за апликације (ВБА) је програмски језик који се користи са Мицрософт Оффице-ом да би апликације обављале динамичке задатке, од којих је један отварање и штампање ПДФ датотека. Да бисте извршили овај задатак, потребно вам је основно разумевање ВБА језика и ВБА уређивача који се испоручује са сваком верзијом Мицрософт Оффице програма. Овај код се може користити за било коју од Мицрософт Оффице апликација.
Корак 1
Отворите ВБА едитор у Мицрософт Оффице апликацији у коју желите да се унесе код. Кликните на „Датотека“ > „Алатке“ > „Макрои“ > „Уређивач Висуал Басиц“ у апликацији Мицрософт Оффице 2003 или раније. Кликните на „картица Девелопер“ > „Висуал Басиц“ у издању Мицрософт Оффице-а за 2007.
Видео дана
Корак 2
Кликните било где у прозору кода где желите да уметнете код.
Корак 3
Додајте код да бисте отворили ПДФ датотеку. Ваш код би требао изгледати отприлике овако:
Суб ОпенПДФ() Дим стрПДФФилеНаме Ас Стринг 'Измените да бисте додали пуно име датотеке у ПДФ датотеку коју желите да отворите стрПДФФилеНаме = "Ц:\екамплефиле.пдф" 'Ово следеће функција проверава да ли датотека већ није отворена. Иф Нот ФилеЛоцкед (стрПДФФилеНаме) Затим „Ако врати Фалсе, онда наставите са отварањем ПДФ датотеке Документи. Отворите стрПДФФилеНаме) Енд Иф Енд Суб
Копирајте и налепите овај код у прозор кода. Једини део кода који ћете морати да промените је пуна путања до ПДФ датотеке коју желите да отворите. Дакле, замените „Ц:\екамплефиле.пдф“ сопственом путањом и именом датотеке.
Корак 4
Додајте код за штампање ПДФ датотеке. Код за штампање је:
Суб ПринтПДФ (стрПДФФилеНаме као стринг) Дим сАдобеРеадер као стринг 'Ово је пуна путања до апликације Адобе Реадер или Ацробат на вашем рачунару сАдобеРеадер = "Ц:\Програм Филес\Адобе\Ацробат 6.0\Реадер\АцроРд32.еке" РетВал = Схелл (сАдобеРеадер & "/П" & Цхр (34) & сСтрПДФФилеНаме & Цхр (34), 0) Енд Суб
Једини део овог кода који треба да се промени је пуна путања до Адобе Реадер-а, Ацробат-а или било ког ПДФ читача на вашем рачунару.
Корак 5
Користите окидач за позивање функција. Овако ће код знати када да се изврши. Користите који год окидач желите; образац, дугме, поље за потврду или друга ставка обрасца. На пример, користите декларацију дугмета „Кликни“. Када се кликне на дугме, ПДФ документ ће се отворити и затим одштампати. Код изгледа овако:
Суб ЦоммандБуттон_Цлицк() 'Прво позовите опен функцију да би се ПДФ могао отворити пре штампања Позовите ОпенПДФ 'Сада позовите функцију штампања да би ПДФ могао да се одштампа Позови ПринтПДФ Енд Суб
Само копирајте средњи део горњег кода (између Суб и Енд Суб) у ставку обрасца и окидач који одлучите да користите.
Ствари које ће вам требати
Мицрософт Оффице апликација
Апликација за читање ПДФ-а
Савет
Ако користите верзију 2007 и не видите картицу „Програмер“, кликните на дугме „Оффице“, а затим на дугме „Опције“ на дну менија. Кликните на „Прикажи картицу програмера на траци“ и кликните на „ОК“.
