// Index_PageBolder.jsx  
  
//===============================================================  
myCS = app.documents[0].characterStyles.item( "<bold>" );  
//===============================================================  
  
myIndex = app.documents[0].indexes[0]  
for ( i = 0; i < myIndex.allTopics.length; i++ )  
	checkTopic( myIndex.allTopics[i] );  
	  
function checkTopic( aTopic )  
{  
	for ( k = 0; k < aTopic.pageReferences.length; k++ )  
		checkPageRef( aTopic.pageReferences[k] );  
}  
  
function checkPageRef( aPRef )  
{  
	if (aPRef.properties.parent.name == "boldp") 
		{ 
			aPRef.parent.parent.pageReferences[0].pageNumberStyleOverride = myCS; 
			aPRef.remove(); 
		} 
} 

// Index_PageBolder.jsx  
  
//===============================================================  
myCS = app.documents[0].characterStyles.item( "<bold>" );  
//===============================================================  
  
myIndex = app.documents[0].indexes[0]  
for ( i = 0; i < myIndex.allTopics.length; i++ )  
	checkTopic( myIndex.allTopics[i] );  
	  
function checkTopic( aTopic )  
{  
	for ( k = aTopic.pageReferences.length-1; k >= 0 ; k-- )  
		checkPageRef( aTopic.pageReferences[k] );  
}  
  
function checkPageRef( aPRef )  
{  
		$.writeln(aPRef.parent.name); 
		if (aPRef.parent.name.slice(-7)  == "#boldp#") 
			{ 
				aPRef.pageNumberStyleOverride = myCS; 
				aPRef.parent.name = aPRef.parent.name.slice(0,-7); 
			} 
} 

Sub IndexBoldKodieren() 
' 
' IndexBoldKodieren Makro 
' 
' 
    Selection.Find.ClearFormatting 
    Selection.Find.Replacement.ClearFormatting 
    With Selection.Find 
        .Text = """ \b" 
        .Replacement.Text = "#boldp#^034" 
        .Forward = True 
        .Wrap = wdFindContinue 
        .Format = False 
        .MatchCase = False 
        .MatchWholeWord = False 
        .MatchWildcards = False 
        .MatchSoundsLike = False 
        .MatchAllWordForms = False 
    End With 
    Selection.Find.Execute Replace:=wdReplaceAll 
End Sub