vbaで範囲名の消去

質問

VBAで頭にrのついた範囲名をすべて消去するにはどのように記述したらいいのでしょうか。教えてください。

回答No.1

Wendy02 · ベストアンサー

範囲名というのは、ワークシート上の名前で定義した範囲のことでしょうか？

それなら、このようになります。
Sub Test1()
Dim nm As Variant
For Each nm In Application.Names
　If nm.Name Like "r*" Then
　　nm.Delete
　End If
Next nm
End Sub

お礼

ありがとうございました。ワイルドカードを使った記述の仕方が分からなかったので、助かりました。