View Single Post
Old 01-23-2007, 10:42 PM   #48
pinenut
Member
pinenut began at the beginning.
 
Posts: 22
Karma: 10
Join Date: Nov 2006
Location: Northbrook, IL
Quote:
Originally Posted by Stingo
I got tired of going through the properties menu to fill in the the title and author information in converted files so I modified the Word macro to pop up a window at the start which lets you fill the information in. The window is non-modal so you can cut and paste the author and title from the document.

Download the zip file, expand the two files in its contents. Open word, open macros. Select the old macro or if you have never installed this macro before follow instructions elsewhere on this thread. Edit the macro. Drag and drop the two files in the sip unto the forms item in the macro window. Cut and paste the macro text below.

Sub ebook_formatter()
'
' ebook_formatter Macro
' Macro created 11/28/2006 by Jorge Espinosa
'
' This step take you to the top of your document

Selection.GoTo What:=wdGoToPage, Which:=wdGoToNext, Name:="1"

' Author Title Box
'
title_author_form.Titlebox = ActiveDocument.BuiltInDocumentProperties("Title"). Value

title_author_form.Authorbox = ActiveDocument.BuiltInDocumentProperties("Author") .Value

title_author_form.Show

' This step clears formatting and sets font to my preferred size
'
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchByte = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll

End Sub
I am having difficulty dragging and dropping the two files unto the forms item in the macro window. I don't see any forms item when I open the edit macro window.

Can you help me?
pinenut is offline   Reply With Quote