Solved

MS WORD: introduce a variable field in wordart

Posted on 2008-10-12
12
489 Views
Last Modified: 2013-11-10
Need to generate a word form which uses a wordart to show a variable field (an incremental number).
(other than change the number and print as indicated bellow)
ActiveDocument.Shapes("WordArt 2").Select
    Selection.ShapeRange.TextEffect.Text = "00005"
    Application.PrintOut FileName:="", Range:=wdPrintAllDocument, .... (rest of print follows)
ActiveDocument.Shapes("WordArt 2").Select
    Selection.ShapeRange.TextEffect.Text = "00006"
    Application.PrintOut FileName:="", Range:=wdPrintAllDocument, .... (rest of print follows)
Etc etc
0
Comment
Question by:CPH_SYS
  • 6
  • 6
12 Comments
 
LVL 37

Expert Comment

by:Joanne M. Orzech
ID: 22704045
So I guess I don't understand your question.... you need to generate a word form????  and you want the word form to contain wordart?

Please clarify

0
 

Author Comment

by:CPH_SYS
ID: 22704182
Thanks,

Yes, I need a word form (think it like a ticket) which has (amont text and graphics) a number on it. The number is variable (incremental) and is written with word art.

0
 
LVL 37

Expert Comment

by:Joanne M. Orzech
ID: 22704743
But do you need the VB code?  It appears you already have the code.... I'm still a little confused.... sorry

    ActiveDocument.Shapes.AddTextEffect(msoTextEffect25, "00001", _
        "Times New Roman", 36#, msoFalse, msoFalse, 261.35, 261#).Select

Open in new window

0
Free Tool: Postgres Monitoring System

A PHP and Perl based system to collect and display usage statistics from PostgreSQL databases.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

 

Author Comment

by:CPH_SYS
ID: 22705372
The code I have posted is the one I would like to avoid (if that is possible). I want to insert a FIELD into the wordart (instead of insert text). That would allow me use the mail merge facility.
Allow me to explain further:
I have a form with text and graphics and a variable number. I would like to take this number from a list (i.e. an Excel Range), so I can only manipulate said list every time I need to generate a bath of forms.  If I use a VBA macro as the one posted, I would have to read such list along with the macro, which (is it is possible) I want to avoid.

Thanks

0
 
LVL 37

Expert Comment

by:Joanne M. Orzech
ID: 22705521
Well, I'm afraid you've lost me.....I just don't understand what you need I guess.  If you have the number you need in Excel, then just insert that field into the Word document.....

If you don't want to use VB, then what do you want?


0
 

Author Comment

by:CPH_SYS
ID: 22705703
Is not just "the number". Is a big list of numbers, which list grows (more numbers are added to it). Let me explain in other words (I assume you are familiar with mail-merge):
Assume you want to write a letter which has a variable field (you want to write one letter for each variable field you have). That is very easy using mail-merge. Just need to insert a field code in the basic letter and MS word mail merge do the rest.
Now, kyou have the same, but you want to number as a wordArt shape (each different number). So the ideal woulb be to insert a field in wordart (isntead to the plain text) But I believe that is not permitted.

0
 
LVL 37

Expert Comment

by:Joanne M. Orzech
ID: 22705846
You're right... it's not permitted - and you can't do it without using VB.  

Why does it have to be WordArt - I'm curious.
0
 

Author Comment

by:CPH_SYS
ID: 22706045
The main reason is because the number needs to appears rotated in the form (the other reason is because it would be better is the number has a fancy shape).

Thanks any way

0
 
LVL 37

Assisted Solution

by:Joanne M. Orzech
Joanne M. Orzech earned 200 total points
ID: 22706177
Well, if you put the number in a table, you can rotate the text....to a certain degree anyway.  And I think if you used the right fonts, and colors, etc., you wouldn't need WordArt....but I leave that up to you.

000002.doc
0
 

Accepted Solution

by:
CPH_SYS earned 0 total points
ID: 22706374
Thank you JOrzech. My problem is that the rotations needs to be either 30, 45 or 60 degrees. Unless I have missed something, MS word 2003 only allows to rotate 90 degrees (or -90, which is the same for this purposes).

When I start to work on this form, my first intention was to use a word table. As Excel permits to rotate a number in any degree, I was expecting to have the same facility in MS word tables, but I could not find it.

Brgds,

0
 

Author Comment

by:CPH_SYS
ID: 23041568
Closed because the problem has no solution
0
 
LVL 37

Expert Comment

by:Joanne M. Orzech
ID: 23042336
It can't be done is an answer....
0

Featured Post

Free Tool: Path Explorer

An intuitive utility to help find the CSS path to UI elements on a webpage. These paths are used frequently in a variety of front-end development and QA automation tasks.

One of a set of tools we're offering as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

For most people, the WrapPanel seems like a magic when they switch from WinForms to WPF. Most of us will think that the code that is used to write a control like that would be difficult. However, most of the work is done by the WPF engine, and the W…
Nice table. Huge mess. Maybe this was something you created way back before you figured out tabs or a document you received from someone else. Either way, using the spacebar to separate the columns resulted in a mess. Trying to convert text to t…
Learn how to make your own table of contents in Microsoft Word using paragraph styles and the automatic table of contents tool. We'll be using the paragraph styles in Word’s Home toolbar to help you create a table of contents. Type out your initial …
This is Part 3 in a 3-part series on Experts Exchange to discuss error handling in VBA code written for Excel. Part 1 of this series discussed basic error handling code using VBA. http://www.experts-exchange.com/videos/1478/Excel-Error-Handlin…

860 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question