Yes its possible but TOC's are bound to styles and if we don't know which styles you're using then it won't be so easy to write you some code...
This should do what you want:[VBA]
Sub CustomToc()
With ActiveDocument
.Styles("TOC 1").ParagraphFormat.LineSpacingRule = wdLineSpaceDouble
.Styles("TOC 2").ParagraphFormat.LineSpacingRule = wdLineSpaceDouble
'Add more modifications
.TablesOfContents.Add Range:=Selection.Range
.TablesOfContents(1).TabLeader = wdTabLeaderDots
.TablesOfContents.Format = wdIndexIndent
End With
End Sub
[/VBA]
Later