Split formula in cell

[Dannyh1]

Hi,

Is there a way I can split formula in cells

e.g C1 = A1+B1

I want to be

C1 = A1

i.e seperated by the '+'

Many Thanks

 

[VoG]

Do you mean

=A1&"+"&B1

 

[Dannyh1]

Hi Peter,

Bascially I have numerous cells which currently have addition formula's (adding 2 cells together).

I no longer want the addition part of the formula.

e.g's
C1 = A1+B1

I now want to be C1 = A1

D3 = C2+D2

I now want to be D3 = C2

etc..

Thanks

 

[VoG]

Hi. Try this - select the range then run the macro

Sub ModFormula()
Dim c As Range
For Each c In Selection
    With c
        .Formula = Left(.Formula, InStr(.Formula, "+") - 1)
    End With
Next c
End Sub

 

[Dannyh1]

Perfect - thanks Peter