FORMULA ELIMINAR FILAS

11/03/2005 - 00:29 por GREYES | Informe spam
QUE TAL. QUISIERA SABER SI EXISTE UNA FORMULA QUE DE UN RANGO ESPECIFICO SI
UNA FILA NO TIENE NINGUN DATO LA ELIMINE O LA OCULTE? PERO QUIERO QUE ESTO LO
HAGA AUTOMATICAMENTE EXISTE ALGUNA FORMULA?
GRACIAS
 

Leer las respuestas

#1 KL
11/03/2005 - 14:23 | Informe spam
Hola Greyes,

Aunque no es del todo cierto q las formulas no pueden cambiar propiedades de
celdas o incluso introducir objetos en la hoja (vease un ejemplo aqui:
http://j-walk.com/ss/excel/usertips/tip077.htm), la mayoria absoluta de
ellas no son capaces de hacer otra cosa sino devolver valores en la celda(s)
donde se ponen.

La posible solucion para tu caso podria ser el uso de los macros
(programacion en Visual Basic for Applications). Abajo te pongo un codigo q
podrias depositar en el modulo VBA de la hoja en cuestion y se dispararia
cada vez q se introduzcan cambios de datos en la hoja (siempre y cuando
esten los macros habilitatdos). Para ello tienes q hacer lo siguiente:

1) Abre el fichero y activa la hoja con el rango a limpiar.
2) Haz clic derecho sobre el nombre de la hoja q aparece en una de las
pestanas en la parte inferior izquierda de la ventana de Excel.
3) Del menu contextual q aparece a continuacion selecciona "Ver codigo" y se
abrira el Editor VBA.
4) En la ventana mas grande a la derecha copia el siguiente codigo:

'--Inicio Codigo
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
uFila = ActiveSheet.Cells(65536, 1).End(xlUp).Row
Application.ScreenUpdating = False
For Fila = uFila To 1 Step -1
If Application.CountA(Rows(Fila)) = 0 Then Rows(Fila).Delete
Next Fila
End Sub
'--Fin Codigo

5) Pulsa Alt+F11 para volver a la hoja.
6) Prueba cambiar datos en la hoja.

Saludos,
KL

"GREYES" wrote in message
news:
QUE TAL. QUISIERA SABER SI EXISTE UNA FORMULA QUE DE UN RANGO ESPECIFICO
SI
UNA FILA NO TIENE NINGUN DATO LA ELIMINE O LA OCULTE? PERO QUIERO QUE ESTO
LO
HAGA AUTOMATICAMENTE EXISTE ALGUNA FORMULA?
GRACIAS

Preguntas similares