Skip to main content
F
FrancisPaille1-Visitor
1-Visitor
April 16, 2012
Solved

Macro to incorporate file name in illustration

  • April 16, 2012
  • 2 replies
  • 2954 views

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!

Best answer by bfriesen

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

2 replies

T
thendricks12-Amethyst
12-Amethyst
April 16, 2012

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.

    F
    FrancisPaille1-VisitorAuthor
    1-Visitor
    April 16, 2012

    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!

    B
    18-Opal
    bfriesen18-OpalAnswer
    18-Opal
    April 17, 2012

    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

    F
    FrancisPaille1-VisitorAuthor
    1-Visitor
    April 17, 2012

    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

    Terms & ConditionsAccessibility statement