View Single Post
Old 01-16-2013, 10:44 AM   #72
Turtle91
Guru
Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.Turtle91 ought to be getting tired of karma fortunes by now.
 
Turtle91's Avatar
 
Posts: 669
Karma: 3807234
Join Date: Dec 2012
Location: Shannon, Ireland today
Device: iPhone 5/iPad 1&2/Surface Pro/Kindle PW
Here's how to fix the "Variable not defined" error.

Add "dim i" (without the quotes) to the top of the Sub Transform_HTML() macro...just below the green remarks

Also add "Public Entities, Quotes, CharFonts As Variant" (without the quotes) just below the Option Explicit statement at the very top of the module.

It should look like this when you are done:
Quote:
Option Explicit
Public Entities, Quotes, CharFonts As Variant

Sub Transform_HTML()
' This macro converts the active document into a document with HTML tags for layout.
' Version 2.6 - Toxaris
' - fixed some strange effect withs tables
' - fixed unnecessary code in HTML when there are no notes
' - added guillemots as quote characters
' - streamlined replacements
Dim i

ActiveDocument.Save
Application.ScreenUpdating = False
I hope that helps!

Cheers,
Dion
Turtle91 is offline   Reply With Quote