Excel - Fijar contenido de celdas

Que tal gente?

Mi pregunta es si sabrian ayudarme a hacer una cosilla...

Quiero que se fije el contenido de una celda. Es decir, ciertas celdas contienen codigo, y suman todo un rando de celdas mediante el "suma(...)", y me aparece la suma. Luego, lo que quiero hacer es que ese numero que es la suma, se quede hay, es decir que se fije el numero y desaparezca la formula "que hay debajo". Total, que la celda esta de la suma, se quede sin codigo y solo quede el numero que habia escrito.

Me sabrina decir si se puede hacer?

Gracias gente

Buenas. no estoy claro. talvez esto es correcto.
te doy los siguientes pasos:
1- seleccionar el menu "herramientas", luego escoge el submenu "Opciones"
2- escoge la ficha "ver"
3- quitar la casilla "formula" (esquina abajo y izquierda)

Un saludo desde Ambato, Ecuador
SCM

Gracias compañero, pero no me referia a eso.

Lo que quiero es que el valor que muestra la formula, se quede ahi, es decir que el valor aparezca como si lo hubieras escrito a mano, que desparezca la formula de "debajo" pero que se quede el valor.

Saludos

Si quieres copiar para que pongas pegar en otra celda?
SCM

Usa pegado especial y valores, si este procedimiento es repetitivo puedes crear con la grabadora de macros una de ellas para hacerlo por ejmplo sobre la celda activa.

Solucionado!

Gracias por todo!

Saludos compañeros,

ya hrabe el macro, y le añadi lo de ejecutarse si se pulsa una celda...

""

Sub format()
If Target.Address = "$AI$4" Then
Range("AI5:AI350").Select
Selection.Copy
Range("AT5:AT350").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If
End Sub

""

El problema es que no funciona, apreto "AI4" y no passa nada.
Le veis algun error?

Saludos y gracias

Lo de arriba no me funciona por que esta medio modificado por mi...

Cuando voy al menu de macros, y le doy al que esta programado

"
Sub format()
Range("AI5:AI350").Select
Selection.Copy
Range("AT5:AT350").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End Sub
"

Me funciona perfectamente, pero quiero que se active al pulsar una celda.

Como lo hago?

Muy agrdecido

Tu código de macro por evento lo debes inciar no con SUB.... sino:


Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$AI$4" Then

No entiendo lo que pasa...

Tengo esto

"
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$O$4" Then
Range("B5:W200").Select
Selection.Sort Key1:=Range("O5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End If
If Target.Address = "$V$4" Then
Range("B5:W200").Select
Selection.Sort Key1:=Range("V5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End If
If Target.Address = "$W$4" Then
Range("B5:W200").Select
Selection.Sort Key1:=Range("W5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End If
End Sub
"

Que es lo que ya tenia la hoja. Entonces, lo modifico y pongo esto:

"
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Address = "$O$4" Then
Range("B5:W200").Select
Selection.Sort Key1:=Range("O5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End If
If Target.Address = "$V$4" Then
Range("B5:W200").Select
Selection.Sort Key1:=Range("V5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End If
If Target.Address = "$W$4" Then
Range("B5:W200").Select
Selection.Sort Key1:=Range("W5"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End If
If Target.Address = "$AI$4" Then
Range("AI5:AI350").Select
Selection.Copy
Range("AT5:AT350").Select
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End If
End Sub
"

Y no funciona....que debo hacer para que funcione? Pulso en AI4 y no pasa nada...

Os lo agradezco de nuevo

Hola Jorge, llevo tiempo buscando la solución que dices tener.

Tengo una celda que en todo momento hace el cálculo de un promedio de ventas, lo que yo quiero es que en otra celda si el día es HOY(), entonces en esa celda se quede el valor y que ya no vuelva a cambiar más.

En otras palabras quiero que el valor que tengo de una fórmula quede como el valor de la celda y que la fórmula desaparezca.

Te agradezco si me compartes. Me sirve Excel o Google Sheets. Gracias

quiero hacer exactamente lo mismo pero con fechas. Deseo que la fecha se quede el contenido digase texto 01-Jan-2010. y no 01/01/2011. Si hago paste special values no funciona pues me coloca el codigo. necesito el texto estatico. Gracias!!! :)