Adding a bookmark is easy enough if you have the range object already.
Adding a bookmark is easy enough if you have the range object already. ActiveDocument.Bookmarks. Add Name:=rngBookmark.
Text, Range:=rngBookmark Getting the range is often the difficult task. Now you said these were section headers. Are they actual word section headers?
Are they delimited with a certain style? Are they in the body of the document or in page headers? You can cycle through the sections of a document like this and set a range to the start of the section.
Dim sectCurrent As Word. Section Dim rngCurrent As Word. Range For Each sectCurrent In ActiveDocument.Content.
Sections ' get range that refers to the whole section Set rngCurrent = sectCurrent.Range. Duplicate ' collapse the range to the start of the section rngCurrent. Collapse wdCollapseStart ' expand the range to hold the first "word" ' you can also use other units here like wdLine rngCurrent.
MoveEnd Unit:=wdWord, Count:=1 ' now that you have the range you can add the bookmark ' you can process the range and create your own name with a custom function GenerateBookmarkName. To get the string, just use rngCurrent.Text. ActiveDocument.Bookmarks.
Add Name:=GenerateBookmarkName(rngCurrent), Range:=rngCurrent Next sectCurrent Now if they aren't actual sections, you'll often want to use the Find object to find something in the document and loop through all such items. The trick here is to know what to search for. An example loop is below.' setup range object for search results Set rngFind = ActiveDocument.
Content ' cycle through search results looking for whatever With rngFind. Find ' search text . Text = "FINDME" .
Format = False . Wrap = wdFindStop ' loop while find is successfull Do While . Execute ' get range you can modify based on found item ' each time you call .
Execute rngFind is changed to the found text Set rngModifyMe = rngFind. Duplicate Loop End With For more word vba help, you can vist the word MVPs site here: http://word.mvps.org.
I cant really gove you an answer,but what I can give you is a way to a solution, that is you have to find the anglde that you relate to or peaks your interest. A good paper is one that people get drawn into because it reaches them ln some way.As for me WW11 to me, I think of the holocaust and the effect it had on the survivors, their families and those who stood by and did nothing until it was too late.