break links selected cells VBA

[samidodger]

Hi there,

in my workbook I have in sheet1 in selected cells links to a file called M11 PMO.xlsx. In sheet2 I also have selected cells (as in P6, P9, P12 and so on) with links to the same file. These are just links no formula in them.

I could go to Data edit links, but that would valuerise the links in sheet one.I could copy and past values, in sheet 2 but this doesnt work on multiple cells. Is there a way through VBA or any other way to break the links in just sheet 2, on just those cells (P6, p9, p12 and so on) and convert the data to values?

Also how would the code change if the cells were random?

using Excel 2007

Long query but at least its challenging.

 

[njimack]

You can convert them to values, but this will overwrite any formulae in your selection to values...

Sub Paste_Value()

Dim r As Range

For Each r In Selection
    r.Formula = r.Value
Next r

End Sub

 

[samidodger]

A major thanks. Tried it and it works.