Caracter comodin.

30/09/2009 - 19:30 por Angel O. | Informe spam
Hola amigos. Tengo Excel 2003 y Xp.



Si quiero eliminar todos los nombres definidos que empiecen por consulta
debería hacer algo parecido a esto:





Sub Macrox()

'

ActiveWorkbook.Names.Add Name:="Consulta*", RefersToR1C1 _

:="=Entrada!R25C6:R34C8"



End Sub



¿Pero no me funciona. Hay algún carácter comodín para decirle esto? he
puesto el asterisco pero no va.



Gracias.



Àngel O.
 

Leer las respuestas

#1 Cacho
30/09/2009 - 22:26 | Informe spam
Hola! Ángel. Intenta con:
________________________

Sub EliminaLosConsulta()
Dim Nomb As Name
For Each Nomb In ActiveWorkbook.Names
If InStr(Nomb.Name, "Consulta") > 0 Then Nomb.Delete
Next Nomb
End Sub

________________________

Saludos, Cacho.

Preguntas similares