Hi All.......

I need a macro, if you please, that will put a Concatenation formula in the
active cell that will Concatenate the cell to the left of the active cell
and the three cells to the right of the active cell, with _underscore_
separations.

Like in B1 =A1&"_"&C1&"_"&D1&"_"&E1 except when I try it I get
hardcoded cell addresses.

I want to be able to highlight any cell in the column, run the macro, and
get the desired results from that row.

Then, I would like the result to be as though it was Copy Paste special
Value (ie text only, no formula)

I then have a macro that will turn that text into a link, (it works fine but
leaves the cell value as a formula if it was one to begin with). I would
like to merge the two into one macro.

Sub makeLinks()
'Takes whatever text is in ActiveCell and turns it into a link
Dim lnk As String
lnk = ActiveCell.Text
ActiveSheet.Hyperlinks.Add anchor:=Selection, Address:=lnk
End Sub



TIA
Vaya con Dios,
Chuck, CABGx3