Error 1004 when pasting a long formula in Macro

I need to use a macro for a long formula but I keep getting a 1004 error when i try to use the Macro. The formula works fine when i enter it into a cell manually. When i click debug everything from "Selection.FormulaR1C1" to the end of the formula gets highlighted yellow.

Sub Macro1()
'
' Macro1 Macro
' aa
'
' Keyboard Shortcut: Ctrl+Shift+U
'
    Range(Selection, Selection.End(xlDown)).Select
    Selection.FormulaR1C1 = _
        "=SQRT((((SQRT((R2C[-81]-R2C[-72])^2+(R2C[-79]-R2C[-71])^2))+(SQRT((R2C[-81]-RC[-90])^2+(R2C[-79]-RC[-88])^2))+(SQRT((R2C[-72]-RC[-90])^2+(R2C[-71]-RC[-88])^2)))/2)*((((SQRT((R2C[-81]-R2C[-72])^2+(R2C[-79]-R2C[-71])^2))+ (SQRT((R2C[-81]-RC[-90])^2+(R2C[-79]-RC[-88])^2)) +(SQRT((R2C[-72]-RC[-90])^2+(R2C[-71]-RC[-88])^2)))/2) -(SQRT((R2C[-81]-R2C[-72])^2+(R2C[-79]-R2C[" & _
        "))*((((SQRT((R2C[-81]-R2C[-72])^2+(R2C[-79]-R2C[-71])^2)) +(SQRT((R2C[-81]-RC[-90])^2+(R2C[-79]-RC[-88])^2)) +(SQRT((R2C[-72]-RC[-90])^2+(R2C[-71]-RC[-88])^2)))/2) -(SQRT((R2C[-81]-RC[-90])^2+(R2C[-79]-RC[-88])^2)))*((( (SQRT((R2C[-81]-R2C[-72])^2+(R2C[-79]-R2C[-71])^2))+(SQRT((R2C[-81]-RC[-90])^2+(R2C[-79]-RC[-88])^2))+(SQRT((R2C[-72]-RC[-90])^2+(R2C[-71]-RC[-88])^" & _
        "SQRT((R2C[-72]-RC[-90])^2+(R2C[-71]-RC[-88])^2))))"
End Sub

I can't enter that formula by hand.
There seems to be something missing in your first line break
The first line ends with
R2C[
But the next line begins with
))*

So that would become R2C[))
Something is missing between [ and )

Can you post the actual formula you put in the cell by hand while you were recording the macro ?

=sqrt((((sqrt((j$2-j$3)^2+(l$2-l$3)^2))+(sqrt((j$2-a2)^2+(l$2-c2)^2))+(sqrt((j$3-a2)^2+(l$3-c2)^2)))/2)*((((sqrt((j$2-j$3)^2+(l$2-l$3)^2))+ (sqrt((j$2-a2)^2+(l$2-c2)^2)) +(sqrt((j$3-a2)^2+(l$3-c2)^2)))/2) -(sqrt((j$2-j$3)^2+(l$2-l$3)^2)))*((((sqrt((j$2-j$3)^2+(l$2-l$3)^2)) +(sqrt((j$2-a2)^2+(l$2-c2)^2)) +(sqrt((j$3-a2)^2+(l$3-c2)^2)))/2) -(sqrt((j$2-a2)^2+(l$2-c2)^2)))*((( (sqrt((j$2-j$3)^2+(l$2-l$3)^2))+(sqrt((j$2-a2)^2+(l$2-c2)^2))+(sqrt((j$3-a2)^2+(l$3-c2)^2)))/2)-(sqrt((j$3-a2)^2+(l$3-c2)^2))))

=sqrt((((sqrt((j$2-j$3)^2+(l$2-l$3)^2))+(sqrt((j$2-a2)^2+(l$2-c2)^2))+(sqrt((j$3-a2)^2+(l$3-c2)^2)))/2)*((((sqrt((j$2-j$3)^2+(l$2-l$3)^2))+ (sqrt((j$2-a2)^2+(l$2-c2)^2)) +(sqrt((j$3-a2)^2+(l$3-c2)^2)))/2) -(sqrt((j$2-j$3)^2+(l$2-l$3)^2)))*((((sqrt((j$2-j$3)^2+(l$2-l$3)^2)) +(sqrt((j$2-a2)^2+(l$2-c2)^2)) +(sqrt((j$3-a2)^2+(l$3-c2)^2)))/2) -(sqrt((j$2-a2)^2+(l$2-c2)^2)))*((( (sqrt((j$2-j$3)^2+(l$2-l$3)^2))+(sqrt((j$2-a2)^2+(l$2-c2)^2))+(sqrt((j$3-a2)^2+(l$3-c2)^2)))/2)-(sqrt((j$3-a2)^2+(l$3-c2)^2))))

Here's the working code resulting from the Macro Recorder when I enter that formula by hand.

Sub Macro1()
'
' Macro1 Macro
'

'
    ActiveCell.FormulaR1C1 = _
        "=SQRT((((SQRT((R2C[3]-R3C[3])^2+(R2C[5]-R3C[5])^2))+(SQRT((R2C[3]-R[-9]C[-6])^2+(R2C[5]-R[-9]C[-4])^2))+(SQRT((R3C[3]-R[-9]C[-6])^2+(R3C[5]-R[-9]C[-4])^2)))/2)*((((SQRT((R2C[3]-R3C[3])^2+(R2C[5]-R3C[5])^2))+ (SQRT((R2C[3]-R[-9]C[-6])^2+(R2C[5]-R[-9]C[-4])^2)) +(SQRT((R3C[3]-R[-9]C[-6])^2+(R3C[5]-R[-9]C[-4])^2)))/2) -(SQRT((R2C[3]-R3C[3])^2+(R2C[5]-R3C[5])^2)))*((((S" & _
        "QRT((R2C[3]-R3C[3])^2+(R2C[5]-R3C[5])^2)) +(SQRT((R2C[3]-R[-9]C[-6])^2+(R2C[5]-R[-9]C[-4])^2)) +(SQRT((R3C[3]-R[-9]C[-6])^2+(R3C[5]-R[-9]C[-4])^2)))/2) -(SQRT((R2C[3]-R[-9]C[-6])^2+(R2C[5]-R[-9]C[-4])^2)))*((( (SQRT((R2C[3]-R3C[3])^2+(R2C[5]-R3C[5])^2))+(SQRT((R2C[3]-R[-9]C[-6])^2+(R2C[5]-R[-9]C[-4])^2))+(SQRT((R3C[3]-R[-9]C[-6])^2+(R3C[5]-R[-9]C[-4])^2)))/2)-(SQRT(" & _
        "(R3C[3]-R[-9]C[-6])^2+(R3C[5]-R[-9]C[-4])^2))))" & _
        ""

End Sub

When i replace my formula with that I just get 0s. I think im just putting it in the wrong cell because of the difference in RC. But if it owrk by hand is the problem the copy and pasting?

It's going to depend on where you put the formula (i.e. what is ActiveCell or Selection)

The range references are all written with mixture of absolute and relative styles.
So it will end up different in J10 than it did in say G2.

So when you're using the macro recorder, make not of which cell you actually have active when you manually type the formula.
Then when you run the resulting macro, it has to put the formula into the same cell.

Is there a way I can paste the formula without having it cut off like shown in my first post so i dont have to do it by hand?

Just for future reference.

If you have a working formula in a cell and you want it in code, do as follows:

Select the cell with the working formula.
Developer, Record Macro, yes to the suggested macro name
F2
Enter
Developer, Stop recording.

Go to your macro that you just recorded and you'll see the formula in code.