Wordのスタイルを設定するには？

クリエイ 2009-09-19 16:04:57 No: 142550

VB2008で、Wordの指定した文字の行にスタイル（段落）を設定したいと考えています。
以下のようにして、"あいうえお"という文字のある行のスタイルを"見出し 2"にしたいと思っていますが、以下の部分で
System.Runtime.InteropServices.COMException (0x800A173A): 'Style' は参照プロパティではありません。
という例外が発生します。

Dim oWord As Object
Dim oWordDoc As Object

Try
oWord = GetObject(, "Word.Application")
Catch ex As Exception
oWord = CreateObject("Word.Application")
End Try

oWord.Documents.Open(（存在するファイル名）)
oWordDoc = oWord.ActiveDocument

oRange = oWordDoc.Content
oRange.Find.Execute(FindText:="あいうえお", Forward:=True)
If oRange.Find.Found Then
oSel = oWord.Selection
oSel.Style = oWordDoc.Styles("見出し 2") '←ここで例外発生
End If

どのようにすればよいでしょうか？
なお、現在試しているのはWord2007ですが、Word2003でも動かしたいです。
宜しくお願い致します。