[Sandles]

I want to set up standard styles for my office and document them in a manual.
Isthere any way of exporting style properties

[Summer]

In 2003 prior do File Print Print What "Styles" will print them for active
document.

"Sandles" wrote in message
...
I want to set up standard styles for my office and document them in a
manual.
Isthere any way of exporting style properties

[Greg Maxey]

Run a macro something like this:

Sub StyleDescription()
Dim oSty As Style
With ActiveDocument
For Each oSty In .Styles
.Range.InsertAfter "Name: " & oSty.NameLocal & ", Description: " &
oSty.Description & vbCr
Next
End With
End Sub

--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Sandles wrote:
I want to set up standard styles for my office and document them in a
manual. Isthere any way of exporting style properties

[Sandles]

Greg, I am anewby to macros and your macro shows a sysntax error I can't fix?

"Greg Maxey" wrote:

Run a macro something like this:

Sub StyleDescription()
Dim oSty As Style
With ActiveDocument
For Each oSty In .Styles
.Range.InsertAfter "Name: " & oSty.NameLocal & ", Description: " &
oSty.Description & vbCr
Next
End With
End Sub

--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Sandles wrote:
I want to set up standard styles for my office and document them in a
manual. Isthere any way of exporting style properties

[Sandles]

Thanks fo that, That was the solution I wastrying to remember I am still
trying to get something that puts it into word. Greg has a macro for it.

"Summer" wrote:

In 2003 prior do File Print Print What "Styles" will print them for active
document.

"Sandles" wrote in message
...
I want to set up standard styles for my office and document them in a
manual.
Isthere any way of exporting style properties

[Herb Tyson [MVP]]

Which line is highlighted?

--
Herb Tyson MS MVP
Author of the Word 2007 Bible
Blog: http://word2007bible.herbtyson.com
Web: http://www.herbtyson.com


"Sandles" wrote in message
...
Greg, I am anewby to macros and your macro shows a sysntax error I can't
fix?

"Greg Maxey" wrote:

Run a macro something like this:

Sub StyleDescription()
Dim oSty As Style
With ActiveDocument
For Each oSty In .Styles
.Range.InsertAfter "Name: " & oSty.NameLocal & ", Description: " &
oSty.Description & vbCr
Next
End With
End Sub

--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Sandles wrote:
I want to set up standard styles for my office and document them in a
manual. Isthere any way of exporting style properties

[Greg Maxey]

Make sure that:
.Range.InsertAfter "Name: " & oSty.NameLocal & ", Description: " &
oSty.Description & vbCr

Is all on one line.

See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Sandles wrote:
Greg, I am anewby to macros and your macro shows a sysntax error I
can't fix?

"Greg Maxey" wrote:

Run a macro something like this:

Sub StyleDescription()
Dim oSty As Style
With ActiveDocument
For Each oSty In .Styles
.Range.InsertAfter "Name: " & oSty.NameLocal & ", Description: "
& oSty.Description & vbCr
Next
End With
End Sub

--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Sandles wrote:
I want to set up standard styles for my office and document them in
a manual. Isthere any way of exporting style properties

[Sandles]

Thanks for that Greg, I have got it working, I will be trying to split out
the diffent aspects now.

"Greg Maxey" wrote:

Make sure that:
.Range.InsertAfter "Name: " & oSty.NameLocal & ", Description: " &
oSty.Description & vbCr

Is all on one line.

See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Sandles wrote:
Greg, I am anewby to macros and your macro shows a sysntax error I
can't fix?

"Greg Maxey" wrote:

Run a macro something like this:

Sub StyleDescription()
Dim oSty As Style
With ActiveDocument
For Each oSty In .Styles
.Range.InsertAfter "Name: " & oSty.NameLocal & ", Description: "
& oSty.Description & vbCr
Next
End With
End Sub

--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Sandles wrote:
I want to set up standard styles for my office and document them in
a manual. Isthere any way of exporting style properties