21/12/2007, 05:54
|
| | | Fecha de Ingreso: septiembre-2007 Ubicación: Badajoz City
Mensajes: 126
Antigüedad: 17 años, 3 meses Puntos: 0 | |
| Re: EXCEL Borrar solo datos
Usa esta macro. A ver que tal
Sub Macro1()
'
' Macro1 Macro
' Macro grabada el 21/12/2007 por *
'
'
ActiveCell.SpecialCells(xlLastCell).Select
a = Selection.Address
c = Range(a).Column
f = Range(a).Row
For i = 1 To f
For j = 1 To c
valor = Left(Cells(i, j).Formula, 1)
If valor <> "=" Then
D = Cells(i, j).Address
Range(D).ClearContents
DoEvents
End If
Next j
DoEvents
Next i
End Sub |