Converting Formulas

Converts cell references in a formula between the A1 and R1C1 reference styles, between relative and absolute references, or both. Variant.

This example converts a SUM formula that contains R1C1-style references to an equivalent formula that contains A1-style references, and then it displays the result.

Dim sFormula As String 
Dim sChangedFormula As String

sFormula = "=SUM(R10C2:R15C2)"
sChangedFormula = Application.ConvertFormula (Formula:=sFormula, _
                                              FromReferenceStyle:=xlReferenceStyle.xlR1C1, _

sChangedFormula = "=SUM($B$10:$B$15)"

Formula - Required Variant. A string that contains the formula you want to convert. This must be a valid formula, and it must begin with an equal sign.
FromReferenceStyle - The reference style of the formula.
ToReferenceStyle - The reference style you want returned. If this argument is omitted, the reference style isn't changed; the formula stays in the style specified by FromReferenceStyle.
ToAbsolute - Specifies the converted reference type. If this argument is omitted, the reference type isn't changed.
RelativeTo - Optional Variant. A Range object that contains one cell. Relative references relate to this cell.

Dim sFormula As String 

sFormula = "=SUM(R10C2:R15C2)"
Application.ConvertFormula (Formula:=sFormula, _
                            FromReferenceStyle:=xlReferenceStyle.xlR1C1, _
                            ToReferenceStyle:=xlReferenceStyle.xlA1, _
                            ToAbsolute:=xlReferenceStyle.xlR1C1, _
                            RelativeTo:=Range("D4") )

© 2024 Better Solutions Limited. All Rights Reserved. © 2024 Better Solutions Limited TopPrevNext