Definir nombre con condiciones

Pienso que la forma más rápida de hacerlo es usando VBA:

Sub prueba()
With Worksheets("Hoja1")
.Columns(1).AutoFilter Field:=1, Criteria1:="a" 'Poner el criterio que se necesite
Names.Add Name:="prueba", RefersTo:=.Range("A1:A" & .Range("A65536").End(xlUp).Row).SpecialCells(xlCellTypeVisible)
.Columns(1).AutoFilter
End With
End Sub

Un saludo.


Fernando Arroyo
MS MVP - Excel

"Lorenzo" escribió en el mensaje news:

Hola amigos.

Tengo la necesidad de definir un nombre (para hacer referencia a un conjunto
de celdas) añadiendo al mismo solo las filas que tengan un determinado
contenido en la columna A. No se si es posible, pero se que si es posible
hay suficiente nivel en este foro como para que lo averiguemos.

Gracias a todos por vuestra ayuda.-

Lorenzo / Malaga / España