So Easy, Yet i cant figure it out....!

[ourfear]

Bacically i want to write a Macro that will select each cell one at a time and double click it!!

I think it's supposed to look similar to this:

Sub CleanUp()
Dim TheCell As Range
For Each TheCell In ActiveSheet.UsedRange
With TheCell
ActiveCell.FormulaR1C1 = ""
End With
Next TheCell
End Sub

But i dont think that works at all!! lol


BAsicallyi have an export form one application into Excel and it has hidden it's Carriage Return code in Excel, if you double click a Cell it then becomes visible and can then be imported into a third application : )

Any help would be great!!


Cheers

 

[Andrew Poulsom]

Instead of:

ActiveCell.FormulaR1C1 = ""

try:

.Value = .Value

 

[ourfear]

hmmmm makes logical sense, but the cursor doesnt seem to move.....

Im waiting for a non-tampered with fresh import to try this code on, but in a blank rep, it doesnt budge and i thought it would.....

 

[Andrew Poulsom]

Why do you want to move the cursor?

 

[ourfear]

It was more of a, "if the macro works surely the cursour would move" instead i click run and it just drops back to the spreadsheet!! lol BUT there arent any errors showing, so ill hold tight and see what happens with data in there

 

[Andrew Poulsom]

There is no need to select cells to use their properties. The:

.Value = .Value

should be the equivalent of [F2] Enter.

 

[ourfear]

That seems to have done the trick : )

Many thanks.