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

If '12345

is in the active Cell

Sub aaa()
ActiveCell.NumberFormat = "General"
ActiveCell.Value = ActiveCell.Value

End Sub

--
Regards,
Tom Ogilvy


"MACRE0" <(E-Mail Removed)> wrote in
message news:(E-Mail Removed)...
>
> 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
>

I appreciate it, thanks.


--
MACRE0
------------------------------------------------------------------------
MACRE0's Profile: http://www.excelforum.com/member.php...o&userid=10848
View this thread: http://www.excelforum.com/showthread...hreadid=478087