UnionメソッドはNothingを受け取らないため、If rng Is Nothing Thenの分岐を書かないと初回実行時に必ずエラーになります。これをいちいち書かなくて済むよう、Nothingを受け取るUnionメソッドを作りましょう。