Community Tip - You can change your system assigned username to something more personal in your community settings. X
We have many thousand illustrations without any title visible on illustration to identify them, so is there a way to run batch export with macro that take existing illustrations and add is own file name inside at specific place. If somebody have experience to help me solving this problem and save us labor, it will be much appreciated!
Thanks!
Solved! Go to Solution.
We kind of do the same thing only we pull the name of the file to be placed on the illustraition. Here is what our macro looks like. We run it when we are done our illustriaon in Isodraw. It will show up on the RH side of the illustration vertically placed on a layer labeled Illustraion Number
Macro Add_MacDon_FileName
Define h As Integer
Define w As Integer
w = activeDoc.window.pageX-2
h = 2
#Message "The height is " + h
#Message "The width is " + w
#Added below command to ensure number is placed on the Illustation number layer
ACTIVATE LAYER "Illustration Number"
Select none
Text Align Left
Text font 'Arial'
Text size 6
Create Text w h stripext(activeDoc.name)
Rotate selection w h 90
End Macro
It is possible. Depending on whether you just want the outputted file to have the verbiage or the source as well would dictate how you proceed. Unfortunately I'm out for the next 2 weeks. Hopefully someone will be able to help you before that. If not, I'll be able to take a closer look then.
Hi Trevor, thanks for your fast feedback, I’m very happy to ear that it is possible process... it will save many hours, If somebody else could help me before you came back, but a could wait 2 weeks, that’s not a problem to save that amount of time!!!
Thanks!
We kind of do the same thing only we pull the name of the file to be placed on the illustraition. Here is what our macro looks like. We run it when we are done our illustriaon in Isodraw. It will show up on the RH side of the illustration vertically placed on a layer labeled Illustraion Number
Macro Add_MacDon_FileName
Define h As Integer
Define w As Integer
w = activeDoc.window.pageX-2
h = 2
#Message "The height is " + h
#Message "The width is " + w
#Added below command to ensure number is placed on the Illustation number layer
ACTIVATE LAYER "Illustration Number"
Select none
Text Align Left
Text font 'Arial'
Text size 6
Create Text w h stripext(activeDoc.name)
Rotate selection w h 90
End Macro
Hi Bryon,
I addapted this macro with our layer, Std text and position inside predifine frame, and it work perfectly!!!
The missing part on my macro was (activeDoc.name).
Big thumb's up! Thanks!
Macro Flight Title
# recorded with Arbortext IsoDraw 7.1
Define h As Integer
Define w As Integer
w = activeDoc.window.pageX-24
h = 47
#Message "The height is " + h
#Message "The width is " + w
#Added below command to ensure number is placed on the Illustation number layer
Activate layer "Standard layer"
Select none
Create Text w h stripext(activeDoc.name)
Rotate selection w h 90
Select at 111.796 258.949
Text font "Helvetica"
Text size 6
Text align centered
Select none
Select at 100.188 258.779
Select at 100.188 258.779
Move Selection 8.305 (-9.064)
Select none
Zoom page
End Macro