Како користити ВБД за отварање и штампање ПДФ датотеке

Садржај

Упутства
Како
Шта ти треба

Висуал Басиц фор Апплицатионс (ВБА) је програмски језик који Мицрософт Оффице користи за апликације за обављање динамичких задатака као што су отварање и штампање ПДФ датотека. Да бисте то постигли, биће вам потребно основно знање језика и ВБА едитор, који је инсталиран у свим верзијама Мицрософт Оффице програма. Овај код се може користити за било коју од ваших апликација.

Упутства

Виев Профиле (АНСИ слика од ДБКС60 из Фотолиа.цом)

Отворите ВБА едитор у Оффице апликацији у којој ћете унети код. Идите у "Филе", затим "Тоолс", затим "Мацрос" и на крају "Висуал Басиц Едитор" у верзији Мицрософт Оффице 2003 или раније. За издање 2007, идите на картицу "Девелопер" и кликните на Висуал Басиц.
У прозору кода, кликните на место где желите да унесете код.
Додајте код за отварање ПДФ датотеке. Ваш код би требао изгледати овако

Суб ОпенПДФ () Дим стрПДФФилеНаме Ас Стринг 'Уреди додавањем пуног назива датотеке коју желите отворити умјесто "стрПДФФилеНаме" = "Ц: екамплефиле.пдф"' Сљедећа наредба провјерава је ли датотека већ отворена: Није ФилеЛоцкед (стрПДФФилеНаме), а затим 'Ако је резултат Фалсе, наставите са отварањем Доцументс.Опен филе стрПДФФилеНаме) Енд Иф Енд Суб т

копирајте и залијепите овај код у прозор кода. Једини дио који требате промијенити је пуна путања ПДФ датотеке коју желите отворити. Затим замените "Ц: екамплефиле.пдф" стазом ваше датотеке.
Код за испис датотеке је

Суб ПринтПДФ (стрПДФФилеНаме као стринг) Дим сАдобеРеадер као Стринг 'Ово је пуна путања до Адобе Реадер-а или Ацробата на вашем компјутеру сАдобеРеадер = "Ц: Програм Филес" Адобе Ацробат 6.0 РетВал = Схелл (сАдобеРеадер & "/ П" & Цхр (34) & сСтрПДФФилеНаме & Цхр (34), 0) Крај Суб

Морате да промените путање ПДФ читача онако како је на рачунару, фасцикла Програм Филес може бити на енглеском (Програм Филес) или има неке назнаке на предњој страни, као што је (к64).
Користите окидач да пустите код да зна када треба извршити функције. Користите окидач који желите, форму, дугме, чек или друге ставке обрасца. На пример, користите дугме "Цлицк". Када кликнете на дугме, ПДФ документ ће се отворити и штампати. Код изгледа овако:

Суб ЦоммандБуттон_Цлицк () 'Омогућите функцију отварања пре него што се ПДФ отвори пре него што се одштампа ОпенПДФ Цалл Затим омогућите ПринтПДФ Цалл Енд Суб

Копирајте горњи средњи дио кода (између Суб и Енд Суб) у ставку обрасца и окидач који ће се користити.

Како

Ако користите верзију система Мицрософт Оффице 2007 и не видите картицу "Развојни програмер", кликните на дугме Оффице, кликните на "Опције", кликните на "Прилагоди" и изаберите "Прикажи картицу за програмере на траци" и кликните на "ОК".