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