If '12345
is in the active Cell
Sub aaa()
ActiveCell.NumberFormat = "General"
ActiveCell.Value = ActiveCell.Value
End Sub
--
Regards,
Tom Ogilvy
"MACRE0" wrote in
message ...
Anyone have a simple macro that converts a number in a cell that was
formatted as text or proceeded by an apostrophe?
Or a work around
Coverting " 12345 - xyz"
Selection.Copy
ActiveCell.Offset(0, 1).Range("A1").Select
ActiveSheet.Paste
ActiveCell.Offset(0, -1).Range("A1").Select
Application.CutCopyMode = False
ActiveCell.FormulaR1C1 = "=MID(RC[1],3,7)"
ActiveCell.Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues
to "12345" such that a vlookup can then match this to "12345" that's
formatted as a number already.
Thanks for any and all help!
--
MACRE0
------------------------------------------------------------------------
MACRE0's Profile:
http://www.excelforum.com/member.php...o&userid=10848
View this thread: http://www.excelforum.com/showthread...hreadid=478087