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

Siga el debate

9 respuestas

Tengo una respuesta

Preguntas similare

Mostrar todos los temas similares

Leer las respuestas

#1 Héctor Miguel

12/05/2004 - 11:23 | Informe spam

hola, o.q. !

... tengo que borrar toda una fila ... el problema es que ME BORRA LAS FORMULAS
¿... para que no borre las fórmulas y que solo borre el contenido?.

'suponiendo' que por 'contenido' [NO formulas] te refieres a 'entradas directas'... valores 'constantes'... etc.
un ejemplo ==Sub No_Borrar_Formulas()
Range("a1:c30").SpecialCells(xlCellTypeConstants).ClearContents
End Sub

saludos,
hector.

Responder a este mensaje

#2 Cheeky

12/05/2004 - 12:03 | Informe spam

Muy bueno, Héctor Miguel. No conocía esa solución.
Esto es una de las muchas ventajas de las news, una pregunta bien plantada,
una
respuesta perfecta, MUCHOS BENEFICIADOS.

Saludos.

From: "Héctor Miguel"
Newsgroups: microsoft.public.es.excel
Sent: Wednesday, May 12, 2004 11:23 AM
Subject: Re: que no borre formulas

Responder a este mensaje

#3 o.q.

12/05/2004 - 13:19 | Informe spam

Si protego las celdas que tienen formulas no funcionara no?

saludos

"Héctor Miguel" escribió en el mensaje
news:

hola, o.q. !

> ... tengo que borrar toda una fila ... el problema es que ME BORRA LAS

FORMULAS

> ¿... para que no borre las fórmulas y que solo borre el contenido?.

'suponiendo' que por 'contenido' [NO formulas] te refieres a 'entradas

directas'... valores 'constantes'... etc.

un ejemplo ==> Sub No_Borrar_Formulas()
Range("a1:c30").SpecialCells(xlCellTypeConstants).ClearContents
End Sub

saludos,
hector.

Responder a este mensaje

#4 o.q.

12/05/2004 - 13:21 | Informe spam

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

saludos

"Héctor Miguel" escribió en el mensaje
news: