que no borre formulas

12/05/2004 - 11:10 por o.q. | Informe spam
Hola

Tengo una hoja en donde tengo que borrar toda una fila, consigo mediante un
boton de comando que al pulsar me la borre, el problema es que ME BORRA LAS
FORMULAS, ¿como se hace para que no borre las fórmulas y que solo borre el
contenido?.

saludos

Preguntas similare

Leer las respuestas

#6 Héctor Miguel
12/05/2004 - 19:00 | Informe spam
hola, o.q. !

Si protego las celdas que tienen formulas no funcionara no?



desconociendo 'como' la has venido solucionando [antes de la consulta]...
- SI protejes =>la hoja/el libro<= SIN 'liberar' [primero] 'esas' celdas...
necesitaras en el modulo de codigo del libro [algo +/- como lo siguiente]:
==Private Sub Workbook_Open()
Worksheets("Hoja1").Protect UserInterfaceOnly:=True
End Sub

¿comentas?
saludos,
hector.
Respuesta Responder a este mensaje
#7 Héctor Miguel
12/05/2004 - 19:02 | Informe spam
hola, o.q. !

Esto es lo que tengo para borrar:
Sub Borrar_Datos()
Range("A11:A22").Select
Selection.ClearContents
Range("D11:E19").Select
Selection.ClearContents
Range("A11").Select
End Sub



prueba la siguiente instruccion [manteniendo la consulta 'original']...
Range("a11:a22,d11:e19").SpecialCells(xlCellTypeConstants).ClearContents

saludos,
hector.
Respuesta Responder a este mensaje
#8 o.q.
12/05/2004 - 19:13 | Informe spam
OK, tambien va así.

saludos


"Héctor Miguel" escribió en el mensaje
news:
hola, o.q. !

> Esto es lo que tengo para borrar:
> Sub Borrar_Datos()
> Range("A11:A22").Select
> Selection.ClearContents
> Range("D11:E19").Select
> Selection.ClearContents
> Range("A11").Select
> End Sub

prueba la siguiente instruccion [manteniendo la consulta 'original']...
Range("a11:a22,d11:e19").SpecialCells(xlCellTypeConstants).ClearContents

saludos,
hector.
Respuesta Responder a este mensaje
#9 o.q.
12/05/2004 - 19:19 | Informe spam
Pues voy a probarlo así a ver

nota: de la otra manera que me comentaste funcion ok, gracias

saludos


"Héctor Miguel" escribió en el mensaje
news:
hola, o.q. !

> Si protego las celdas que tienen formulas no funcionara no?

desconociendo 'como' la has venido solucionando [antes de la consulta]...
- SI protejes =>la hoja/el libro<= SIN 'liberar' [primero] 'esas'


celdas...
necesitaras en el modulo de codigo del libro [algo +/- como lo


siguiente]:
==> Private Sub Workbook_Open()
Worksheets("Hoja1").Protect UserInterfaceOnly:=True
End Sub

¿comentas?
saludos,
hector.

email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida