VALIDAR SI UN RANGO ESTA VACIO O NO

18/04/2006 - 22:36 por Marvin | Informe spam
Que tal GRUPO,

Una consulta, cómo puedo validar si el rango que estoy tomando contiene
valores o no?.. es decir estoy utilizando un par de instrucciones que al
filtrar mis datos elimine las celdas visibles, pero ahora quiero que si las
celdas visibles no tienen datos simplemente que no se ejecute la instrucción
de ELIMINAR... Mi codigho es el siguiente... GRCS

Sub ECV()
Dim R As Range
If R.Value = "" Then
Exit Sub
Else
Set R = ActiveCell.CurrentRegion.Offset(1)
R.SpecialCells(xlCellTypeVisible).EntireRow.Delete
End If
End Sub
 

Leer las respuestas

#1 Héctor Miguel
20/04/2006 - 01:25 | Informe spam
hola, Marvin !

... como puedo validar si el rango que estoy tomando contiene valores o no?
... estoy utilizando un par de instrucciones que al filtrar mis datos elimine las celdas visibles
... quiero que si las celdas visibles no tienen datos simplemente que no se ejecute la instruccion de ELIMINAR
Sub ECV()
Dim R As Range
If R.Value = "" Then
Exit Sub
Else
Set R = ActiveCell.CurrentRegion.Offset(1)
R.SpecialCells(xlCellTypeVisible).EntireRow.Delete
End If
End Sub



1) el codigo que expones [segun se aprecia] -> es llamado 'a posteriori' de otro procedimiento [p.e. luego de un autofiltro] -?-
2) [por lo anterior]... seria 'conveniente' que expongas-tambien- el criterio que hubieras utilizado para los autofiltros -?-
3) y ya... 'de pasadita'... algun otro detalle que se te hubiera 'quedado en el tintero' :))

saludos,
hector.

Preguntas similares