Solved

MS Word 2003 Basic + VS.Net 2002 + Vertical Text

Posted on 2004-09-01
3
292 Views
Last Modified: 2010-04-23
I need to print an address onto envelope.  Catch is I have to have the text vertically print.  I've tried some items, but have been unsuccessfull.  The envelopes do not fit into the printers horizontally (with the flap on the top).  The envelope is (in points)    width 400 X height 684.  Any Suggestions?
0
Comment
Question by:computerg33k
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
3 Comments
 
LVL 1

Expert Comment

by:bng0005
ID: 11955688
If you have it printing out already and just need to change the direction of the text, would creating a table in Word and changing the direction of the text work? Right click on a table cell and you can change the text direction for a particular cell. Hope that helps.



Bryan
0
 
LVL 4

Author Comment

by:computerg33k
ID: 11956392
sorry--already got it
                        Dim r As Integer, c As Integer
                        Dim oTable As Word.Table
                        oTable = wrdDoc.Tables.Add(wrdDoc.Bookmarks.Item("\endofdoc").Range, 1, 1)
                        oTable.Range.ParagraphFormat.SpaceAfter = 6
                        oTable.Range.Bold = 1
                        For r = 1 To 1
                            For c = 1 To 1
                                oTable.Cell(1, 1).Range.Text = Trim(Client) & vbCr & Trim(CompAddress1) & vbCr & Trim(CompAddress2)
                                oTable.Cell(1, 1).VerticalAlignment = Word.WdCellVerticalAlignment.wdCellAlignVerticalCenter
                            Next
                        Next
                        oTable.Cell(1, 1).Column.Width = 144
                        oTable.Cell(1, 1).Row.Height = 218.25
                        oTable.Cell(1, 1).Range.Orientation = Word.WdTextOrientation.wdTextOrientationVerticalFarEast ' this line
                    End With
0
 

Accepted Solution

by:
ee_ai_construct earned 0 total points
ID: 11959048
Closed, 200 points refunded.
ee_ai_construct (replacement part #xm34)
Community Support Moderator
0

Featured Post

Technology Partners: We Want Your Opinion!

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

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

Article by: Kraeven
Introduction Remote Share is a simple remote sharing tool, enabling you to see, add and remove remote or local shares. The application is written in VB.NET targeting the .NET framework 2.0. The source code and the compiled programs have been in…
It was really hard time for me to get the understanding of Delegates in C#. I went through many websites and articles but I found them very clumsy. After going through those sites, I noted down the points in a easy way so here I am sharing that unde…

739 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