de referencias relativas a referencias absolutas

11/10/2006 - 14:33 por Diana | Informe spam
Hola grupo,
Tengo una planilla con más de 90 fórmulas y funciones.
Ahora bien, necesito cambiar el diseño de la planilla y mover estas fórmulas
a otros lugares de la planilla pero me encuentro con el problema de que
todas están configuradas con referencias relativas.
Hay alguna forma de convertir todas las fórmulas en referencias absolutas en
un solo paso? (de A1 a $A$1)?
Gracias,
Diana

Preguntas similare

Leer las respuestas

#6 KL
14/10/2006 - 00:58 | Informe spam
El bucle no es necesario ;-)

Sub test3()
Selection.Formula = _
Application.ConvertFormula(Selection.Formula, xlA1, xlA1, xlAbsolute)
End Sub

Saludos,
KL


"Alexander Chacin" wrote in message news:

Diana pueds usar esta macro

Sub Macro1()
Dim Celda As Range
For Each Celda In Selection
Celda.Formula = Application.ConvertFormula(Celda.Formula, xlA1, xlA1, xlAbsolute)
Next
End Sub

"Diana" escribió en el mensaje news:
Hola grupo,
Tengo una planilla con más de 90 fórmulas y funciones.
Ahora bien, necesito cambiar el diseño de la planilla y mover estas fórmulas a otros lugares de la planilla pero me encuentro con
el problema de que todas están configuradas con referencias relativas.
Hay alguna forma de convertir todas las fórmulas en referencias absolutas en un solo paso? (de A1 a $A$1)?
Gracias,
Diana







Respuesta Responder a este mensaje
#7 KL
14/10/2006 - 01:06 | Informe spam
Huy, perdon! Si que lo es :-)

Saludos,
KL


"KL" wrote in message news:
El bucle no es necesario ;-)

Sub test3()
Selection.Formula = _
Application.ConvertFormula(Selection.Formula, xlA1, xlA1, xlAbsolute)
End Sub

Saludos,
KL


"Alexander Chacin" wrote in message news:

Diana pueds usar esta macro

Sub Macro1()
Dim Celda As Range
For Each Celda In Selection
Celda.Formula = Application.ConvertFormula(Celda.Formula, xlA1, xlA1, xlAbsolute)
Next
End Sub

"Diana" escribió en el mensaje news:
Hola grupo,
Tengo una planilla con más de 90 fórmulas y funciones.
Ahora bien, necesito cambiar el diseño de la planilla y mover estas fórmulas a otros lugares de la planilla pero me encuentro
con el problema de que todas están configuradas con referencias relativas.
Hay alguna forma de convertir todas las fórmulas en referencias absolutas en un solo paso? (de A1 a $A$1)?
Gracias,
Diana










Respuesta Responder a este mensaje
#8 Alexander Chacin
14/10/2006 - 20:10 | Informe spam
Las alternativas posibles son: xlAbsolute, xlRelative, xlAbsRowRelColumn,
xlRelRowAbsColumn. Es decir se puede cambiar a cualquier combinación de
referencias de celdas

Saludos
Alexander Chacin



"Alexander Chacin" escribió en el mensaje
news:

Diana pueds usar esta macro

Sub Macro1()
Dim Celda As Range
For Each Celda In Selection
Celda.Formula = Application.ConvertFormula(Celda.Formula, xlA1, xlA1,
xlAbsolute)
Next
End Sub

"Diana" escribió en el mensaje
news:
Hola grupo,
Tengo una planilla con más de 90 fórmulas y funciones.
Ahora bien, necesito cambiar el diseño de la planilla y mover estas
fórmulas a otros lugares de la planilla pero me encuentro con el problema
de que todas están configuradas con referencias relativas.
Hay alguna forma de convertir todas las fórmulas en referencias absolutas
en un solo paso? (de A1 a $A$1)?
Gracias,
Diana








Respuesta Responder a este mensaje
#9 MarianoB
16/10/2006 - 11:49 | Informe spam
...y para evitar que se muestren errores del tipo #¡VALOR!:

Sub Macro1()
Dim Celda As Range
For Each Celda In Selection
Celda.Formula = Application.ConvertFormula(Celda.Formula, xlA1,
xlA1, xlAbsolute)
If IsError(Celda.Value) = True Then
Celda.Formula = ""
End If
Next
End Sub
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una pregunta AnteriorRespuesta Tengo una respuesta
Search Busqueda sugerida