Ouput to textfile is not real hard... there are a couple ways to do it. You can read up on the Textstream object (I forget which reference you need to add to enable it) or you can use Open, Close statements:
Open "C:\textfile.txt" for Output as #1
Write #1, "This is line 1"
Write #1, "This is line 2"
I wrote a class around the textstream object so have not used Open/Close in a long time.
Regarding styles, you can easily output properties. Use the loop above, and into the IF statement you can add all sorts of things:
mySty.InUse 'This should be the same property as what is tested in the IF statement above... just a shorter way to get it.
The best way to check this out is to go into the VBA editor, copy and paste the code AndyM gave you and then type "mySty." so the property helper comes up... you can see all the properties to play with them (you can also hit F2 to go to the object browser).