VB code for indenting text 3 spaces

vtcin · Feb 4th 2013

How do I change the code below to create a 3 space indent to the Name within the paragraph?

Code

With .Selection
        '.TypeParagraph
        .Font.Name = "Arial"
        .Font.Size = 12
        .Font.Bold = True
        .ParagraphFormat.Alignment = 0
        .typetext Text:=country
        .typetext Text:=State
        .Font.Size = 7
        .typetext Text:=city
        .Font.Bold = False
        .typetext Text:=Name
        End With

Display More

I'm not sure what should be typed above the .typetext Text:=Name

patel · Feb 5th 2013

Re: VB code for indenting text 3 spaces

on excel document ?

**cytop** · Feb 5th 2013

Re: VB code for indenting text 3 spaces

You can either increase the Left indent or type 3 spaces. The former is preferable as the spaces will not be of equal pitch depending in the font/bold attributes of the text.

Code

.Font.Name = "Arial" 
    .Font.Size = 12 
    .Font.Bold = True 
    .ParagraphFormat.Alignment = 0 


    .LeftIndent = CentimetersToPoints(0.2)  '// Edit the 0.2 to suit your requirements


    .typetext Text:=country 
    '// OR
    .TypeText Text:="   " & Country

Display More

That is assuming that 'Country', 'State' and 'City' are defined variables in your application.

You (probably) should also include a 'TypeParagraph' after entering each variable, otherwise the text is concatenated on one line.

Last point: Selection is a property of the Application object, so unless you have a

Code

With Application

prior to the code you posted, the line

Code

With .Selection

will raise an error.

vtcin · Feb 5th 2013

Re: VB code for indenting text 3 spaces

Thank you. I tried this below and when it cycled through the output to a word doc did what I wanted.

.typetext Text:" "+Name

vtcin · Feb 5th 2013

Re: VB code for indenting text 3 spaces

Yes Patel, it's an excel macro with output to a word doc... I think it's working the way it needs to now for the final output...........you folks are great with your help to us newbies!

VB code for indenting text 3 spaces

Participate now!

Share

Users Viewing This Thread