Formatting using macro

Thread view:

Enable EMail Alerts

Start New Thread

Thread rating:

Mohan - 03 Sep 2007 13:12 GMT

Hi,
I am using macro to populate data in the publisher. I want to do formatting
of this data, say making Bold and using bullets. How can I do this? Is it
possible or not?

Thanks
Mohan

Reply to this Message

Ed Bennett - 03 Sep 2007 13:48 GMT

> I am using macro to populate data in the publisher. I want to do formatting
> of this data, say making Bold and using bullets. How can I do this? Is it
> possible or not?

I'm presuming you're using one of the TextRange.Insert() methods to
insert the text. (e.g. InsertAfter)

This method returns a text range, to which you can then apply formatting.

E.g.

Dim aTextRange As TextRange
Set aTextRange = _
ThisDocument.Pages(1).Shapes(1).TextFrame.TextRange.InsertAfter _
("Look, some blue text!!")
aTextRange.Font.Color.RGB = RGB(0, 0, 255)

or

ThisDocument.Pages(1).Shapes(1).TextFrame.TextRange.InsertAfter _
("Look, some blue text!!").Font.Color.RGB = RGB(0, 0, 255)

Signature

Ed Bennett - MVP Microsoft Publisher
http://ed.mvps.org

Reply to this Message