Има повече опции.
Най-лесно (за принтери, но не и за машина за фрезоване) - Използване на Print Merge. Но ако си спомням правилно, merzh променливи данни не само в опашката за печат, но и да се съхранява в оформлението (една страница) - 15 версия, 13 тя ще работи както трябва. Така че във версията 15 можете лесно да се организира един модел цялата си 350 nomerkov заедно с логото и други необходими линии - най-важното право на създаване на шаблон.
Но от опит, ръчни vbivka стаи не толкова дълго окупация, както и ръчен режим обикновено е печалбата, която регистрационни табели са съчетани парчета размер (например върху детайла 30x40 см за 25 бр.), Което ще даде предимство във времето, отколкото от номерираните макро nomerkov наново всеки път да се събират на мястото на детайла.
След като реши следния проблем - лазерен гравьор прави 1000 nomerkov. За място тя е в състояние да се кандидатира за 100 nomerkov цикъл. От листова оформление шаблон с numratsiey тип "ZH01". "ZH99", "000". На следващо място, Запиши като шаблон от еталонната функция на "търсене и замяна на" замества всички "F" на първия "1" и "2" и т.н. Получихме 10 скици на 100-те стаи в минута.
Но във всеки случай, с 350 стаи от въпроси за автоматизация на процесите не може да се печели по време на употреба vbivkoy данни.
Подходящ компетентен. И това "специално право" -
Но във всеки случай, с 350 стаи от въпроси за автоматизация на процесите не може да се печели по време на употреба vbivkoy данни.
350 nomerkov на номера, снимки - това е 939 обекти. Дори и на шаблона, за да ги разпространява, е необходимо време. В допълнение, продължителността на всяка стая е различна. С една дума, аз не разбирам от предимствата на ръчен труд. Тук е макро написана от гледна точка на дома otvlekany 15-20 минути (въпреки че алгоритъма изобретен преди, докато варени каша дете). Отстраняване на грешки - дори 10 минути, аз ще трябва да ръчно 350 стаи в този момент няма да бъдат положени. И tyagomotnoe тази работа.
9 там се определя ръчно параметри - ширина и височина на детайла, интервалите между колоните и редовете, броят на ред и колона отдясно на полето и горната и разстоянието между знака номера.
За отстраняване на грешки се 10 цифри 0-9, превръщането им в криви и ги пренареждане в реда на листа (1 = 0 2 = 1, и т.н.). Заготовки не съм, така че просто изглеждаха като те са били наредени. Изглежда, че всичко е в ред.
Вариант Base 0
Вариант Изрично
Дим ARR ()
Дим и толкова дълго, толкова дълго, i1, iNumber толкова дълго, iPages толкова дълго, IC толкова дълго, толкова дълго, МР
Дим iCmax толкова дълго, толкова дълго, iRmax
Дим е толкова форма, Г, както Форма
Дим х двойно, Y и двойни, той Както Двойна, Wi Както Двойна, otstup Както Двойна, xinterval Както Двойна, yinterval Както Двойна, Shi Както Двойна
Дим x0 Както Двойна, y0 Както Двойна, xAb Както Двойна, wi1 Както Двойна, xpole Както Двойна, ypole Както Двойна
Дим Зачерк Както стринга
ActiveDocument.ReferencePoint = cdrCenter
ActiveDocument.Unit = cdrMillimeter
той = 120
Wi = 120
iCmax = 5
iRmax = 10
xinterval = 15
yinterval = 20
xpole = 14
ypole = 14
otstup = 5
замръзване
ReDim ARR (9)
За I = 0 до 9
Комплект ARR (I) = ActivePage.ActiveLayer.Shapes (I + 1)
Следваща аз
МР = 1
iPages = 1
За iNumber = 1 до 350
Shi = 0
Зачерк = iNumber
За I = 1 да Len (Зачерк)
i1 = Mid (Зачерк, I, 1)
Shi = Shi + ARR (i1) .SizeWidth + otstup
Следваща аз
Shi = Shi - otstup
Серия D = ActiveDocument.Pages (iPages) .Layers (1) .Paste
d.SetPosition х, Y0
xAb = xAb + s.SizeWidth / 2 + otstup
Следваща аз
Следваща iNumber
End Sub
Не мърдай - тази линия трябва да бъдат премахнати, тъй като това е моят призив към друга процедура (обработка ускорение)
y0 = МР * (той + yinterval) + ypole
Ние трябва да бъде: y0 = (IR - 1) * (той + yinterval) + ypole + той / 2
x0 = IC * (Wi + xinterval) + xpole
трябва да бъде: x0 = (IC - 1) * (Wi + xinterval) + xpole + Wi / 2
xAb = x0 + Shi / 2
е необходимо да се: xAb = x0 - Shi / 2
xAb = xAb + s.SizeWidth / 2 + otstup
е необходимо да се: xAb = х + s.SizeWidth / 2 + otstup