On Wednesday, 14 January 2015 20:40:31 UTC+11, Claus Busch wrote:
Hi,

Am Wed, 14 Jan 2015 01:32:12 -0800 (PST) schrieb Zbyszek Pluta:

Syntax from Word is not accepted in Excel vba, I am getting errors. I am not sure how it should br changed to work. I have seen code which works well for last paragraph in document. I need to find out how to modify style for current oaragraph after inserting text after bookmark. So far I cannot do it. Any suggestions ?

Excel = VBA editor = Extras = References and activate
Microsoft Word xx.0 Object Library

Regards
Claus B.
--
Vista Ultimate / Windows7
Office 2007 Ultimate / 2010 Professional

Hi Claus,

I have already activated this library. I have managed to do nearly all I wanted to do. The last thing I am trying to achieve is to apply word styles from the template to give it better look. And this is where I am experiencing the problems. I cannot find the syntax for applying the style to the paragraph created by using insertafter. Can you help me with this one ???

Regards,

Tony

I have solved this problem. The code which does what I wanted is:

With wordDoc
.Bookmarks("SafetyStart").Range.InsertAfter Chr(13)
.Bookmarks("SafetyStart").Range.InsertAfter Chr(13)
.Bookmarks("SafetyStart").Range.Style = .Styles("DetailsReported")
.Bookmarks("SafetyStart").Range.InsertAfter DetailsEntry
.Bookmarks("SafetyStart").Range.InsertAfter Chr(13)
.Bookmarks("SafetyStart").Range.Style = .Styles("ProjectReported")
.Bookmarks("SafetyStart").Range.InsertAfter ProjectEntry
End With