Actualizar formulas

hola, Alice !

... problema con la actualizacion de... todas formulas... en mi libro... las cambie a formato de texto y las copie
ya las regrese al formato numerico pero tengo que darle F2 para que me actualize celda por celda, de lo contrario no lo hace.
Recuerdo que hay en menu una funcion para que lo haga, pero no estoy segura y no la he encontrado...

1) cuando cambias el formato ya aplicado de texto a uno numerico/general/normal/...
NO entra en accion sino hasta en tanto re-editas/entras la formula en la/s celda/s [re]formateadas

2) como estas hablando de formulas, es probable que multiplicar por 1 no sea *suficiente* [incluso podria fallar] :-(

3) El siguiente ejemplo 'corrige' valores/formulas [dentro de un rango seleccionado] 'saltando' las celdas que NO tengan formato de texto.

Sub Corregir_FTexto()
Dim Celda As Range, LaFormula As String
For Each Celda In Selection
With Celda
If .NumberFormat = "@" Then
.NumberFormat = "0" ' o cualquier otro formato numerico de tu preferencia, indicado como texto '
If Left(.Text, 1) = "=" Then
LaFormula = Mid(.Text, 2)
.FormulaLocal = "=" & LaFormula
Else: Celda = Celda * 1
End If
End If
End With
Next
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

Hola buenas tardes:

Héctor, no entendí lo de la fórmula, se supone que ahorita tengo todo en
formato numerico y tengo que actualizar con F2 celda por celda para que me
quite las formulas que anterioriormente tenia en formato de texto, me
interesa que con una sola funcion pueda actualizar toda la hoja en excel.
No tengo mucha experiencia en excel.
Te agradezco mucho y saludos


"Héctor Miguel" escribió:

hola, Alice !

> ... problema con la actualizacion de... todas formulas... en mi libro... las cambie a formato de texto y las copie
> ya las regrese al formato numerico pero tengo que darle F2 para que me actualize celda por celda, de lo contrario no lo hace.
> Recuerdo que hay en menu una funcion para que lo haga, pero no estoy segura y no la he encontrado...

1) cuando cambias el formato ya aplicado de texto a uno numerico/general/normal/...
NO entra en accion sino hasta en tanto re-editas/entras la formula en la/s celda/s [re]formateadas

2) como estas hablando de formulas, es probable que multiplicar por 1 no sea *suficiente* [incluso podria fallar] :-(

3) El siguiente ejemplo 'corrige' valores/formulas [dentro de un rango seleccionado] 'saltando' las celdas que NO tengan formato de texto.

Sub Corregir_FTexto()
Dim Celda As Range, LaFormula As String
For Each Celda In Selection
With Celda
If .NumberFormat = "@" Then
.NumberFormat = "0" ' o cualquier otro formato numerico de tu preferencia, indicado como texto '
If Left(.Text, 1) = "=" Then
LaFormula = Mid(.Text, 2)
.FormulaLocal = "=" & LaFormula
Else: Celda = Celda * 1
End If
End If
End With
Next
End Sub

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

hola, Alice !

... ahorita tengo todo en formato numerico y tengo que actualizar con F2 celda por celda
para que me quite las formulas que anterioriormente tenia en formato de texto
me interesa que con una sola funcion pueda actualizar toda la hoja en excel.
No tengo mucha experiencia en excel...

-> el procedimiento que te sugiero/recomiendo/propongo/... es un procedimiento por macros
para completarlo tienes que hacer +/- lo siguiente:

a) abres el editor de vba: atajo de teclado: -> {Alt}+{F11}
b) insertas un modulo de codigo: [menu] insertar / modulo
c) copias/pegas las lineas del mensaje anterior en la ventana grande del modulo recien creado [modulo1 ?]
d) cierras vba y regresas a excel: atajo de teclado: - {Ctrl}+Q
e) en excel, pulsas {F8}, seleccionas la macro [Corregir_FTexto] y pusas el boton [ejecutar]

si cualquier duda [o informacion adicional]... comentas ?
saludos,
hector.

> ... problema con la actualizacion de... todas formulas... en mi libro... las cambie a formato de texto y las copie
> ya las regrese al formato numerico pero tengo que darle F2 para que me actualize celda por celda, de lo contrario no lo hace.
> Recuerdo que hay en menu una funcion para que lo haga, pero no estoy segura y no la he encontrado...

1) cuando cambias el formato ya aplicado de texto a uno numerico/general/normal/...
NO entra en accion sino hasta en tanto re-editas/entras la formula en la/s celda/s [re]formateadas

2) como estas hablando de formulas, es probable que multiplicar por 1 no sea *suficiente* [incluso podria fallar] :-(

3) El siguiente ejemplo 'corrige' valores/formulas [dentro de un rango seleccionado] 'saltando' las celdas que NO tengan formato de texto.

Sub Corregir_FTexto()
Dim Celda As Range, LaFormula As String
For Each Celda In Selection
With Celda
If .NumberFormat = "@" Then
.NumberFormat = "0" ' o cualquier otro formato numerico de tu preferencia, indicado como texto '
If Left(.Text, 1) = "=" Then
LaFormula = Mid(.Text, 2)
.FormulaLocal = "=" & LaFormula
Else: Celda = Celda * 1
End If
End If
End With
Next
End Sub