vba - Word VBAで2つの範囲を組み合わせる

Question

ドキュメントの 2 つの範囲を結合して、別の範囲にしたいと考えています。Unionメソッドを使用しました。しかし、その

wordrange2.Find.Execute ("years ")
Set range1 = wordobj.ActiveDocument.Range(0, wordrange2.Start)
Set range2 = wordobj.ActiveDocument.Range(wordrange2.End, wordobj.ActiveDocument.Content.End - 1)
Set wordrange2 = Union(range1, range2)

最後の行で、そのことわざ

型の不一致

wordrange2はRangeオブジェクトですが、型の不一致と言っています