Problema con macro

hola, Marco !

He probado con el codigo que me sugeriste y no me funciona, cuando ejecuto la macro el pc se me queda colgado
creo que es problema de que la matriz que estoy trabajando es demasiado grande.
Tengo que darle vueltas... he buscado alternativas... y encontre una forma muy util de solucionar mi duda [...]

1) de tu consulta anterior, hay una 'partecilla' que no me fue posible 'adivinar' cual pudier ser su 'condicion real' :((
la parte donde dices: -> '... eliminar... las filas que tengan un valor determinado en una columna (U)... '
es decir, no me fue posible acertar cual seria el -> 'valor determinado' que mencionas :))

2) con las bases [+/- 'ciertas'] de tu consulta anterior, el codigo propuesto aplica autofiltros a la columna 'U'...
-> usando un 'criterio' para el filtro que es una suposicion, y por lo mismo, debieras 'adaptarla' a tu condicion 'real' ;)
la parte de codigo donde dice: -> Columns("u:u").AutoFilter Field:=1, Criteria1:="pon aqui el criterio"
-> es necesario que tu 'pongas/adaptes' cual es TU criterio 'real, sustituyendo > "pon aqui el criterio" :))

3) el codigo que encontraste 'hace' +/- lo mismo que el sugerido... solo que aplicado al rango 'A1:A100'
y aplicando como criterios para el filtrado, lo que establezcas en la matriz 'myArray' [es decir]...
esta filtrando el ranto 'A1:A100' 3 veces: "A", "B" y "C"

comentas 'que pasa' si adaptas uno u otro codigo con tus criterios de filtrado 'reales' ?
y si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

__ el codigo 'encontrado' __

Sub Delete_with_Autofilter_Array()
Dim Rng As Range
Dim I As Long
Dim myArr As Variant
myArr = Array("A", "B", "C")
For I = LBound(myArr) To UBound(myArr)
ActiveSheet.Range("A1:A100").AutoFilter Field:=1, Criteria1:=myArr(I)
With ActiveSheet.AutoFilter.Range
Set rng = Nothing
On Error Resume Next
Set Rng = .Offset(1, 0).Resize(.Rows.Count - 1, 1) _
.SpecialCells(xlCellTypeVisible)
On Error GoTo 0
If Not Rng Is Nothing Then Rng.EntireRow.Delete
End With
Next I
ActiveSheet.AutoFilterMode = False
End Sub
Seguire dando la paliza por estas news, la verdad es que es increible lo que se aprende..