Meerdere bereiknamen verwijderen

[Morsyd]

Hallo,

ik twijfel of deze vraag hier moet komen of in het VBA-gedeelte.
Ik probeer hier:

ik heb een tabblad met meerdere (+100) bereiknamen.
Dit tabblad wordt op regelmatige basis verwijderd en vervangen door een nieuw tabblad (met nieuwe bereiknamen).

Bij het verwijderen van het tabblad blijven de bereiknamen echter staan in het overzichtje van "namen beheren", maar met een niet werkende link (gezien het tabblad weg is).
Kunnen deze op eenvoudige allemaal verwijderd worden?

Nu lukt het me enkel om één voor één te verwijderen.

groeten

 

[HSV]

Als je een blad hebt verwijderd zal er in de application.name een verwijzingfout ontstaan (bv. =#VERW!A1:B10)
Met onderstaande code verwijder je alle namen die een # bezitten.

Sub hsv()
Dim nm As Name
 For Each nm In Application.Names
  If InStr(nm, "#") > 0 Then nm.Delete
 Next
End Sub

 

[Morsyd]

Geweldig! Merci HSV!