$$Excel-Macros$$ Re: One Cell Data - Seperate to different columns

2009-07-17 Thread swati
hi, just copy the data in column A1 then take the curser in another cell , then right click to curser , press paste special then select transpose then enter ok after these steps u get that data in differnt columns regards, swati On Thu, Jul 16, 2009 at 6:36 PM, TAlgo wrote: > > _ Sept. 15, d

$$Excel-Macros$$ Re: One Cell Data - Seperate to different columns

2009-07-16 Thread Mahesh
Hi Taigo, You can use text to columns command from Data tab. Data--->text to columns>Delimited-->comma-->enter. Hope this will help you friend. Mahesh On Thu, Jul 16, 2009 at 6:36 PM, TAlgo wrote: > > _ Sept. 15, down 504.48 at 10,917.51. > > > > > Hello, > > I have above data in cell A1

$$Excel-Macros$$ Re: One Cell Data - Seperate to different columns

2009-07-16 Thread TAlgo
got it..thanks guys On Jul 16, 11:01 am, TAlgo wrote: > Dilip. > > How do I use text to column feature of 07? > > On Jul 16, 10:36 am, "Daniel" wrote: > > > Hi. > > Try : > > > Sub test() > > Dim txt As String, Tabl > > txt = [A1] > > txt = Application.Substitute(txt, "_", "") > > txt = Applica

$$Excel-Macros$$ Re: One Cell Data - Seperate to different columns

2009-07-16 Thread Michael
Find replace " Down " with "xDownx" Find replace " at " with "x" Then delimit the columns using "x" as the character. I have used this method hundreds of times. Basically you just Find Replace everything until it can be delimited properly. On Jul 16, 9:06 am, TAlgo wrote: > _ Sept. 15, down

$$Excel-Macros$$ Re: One Cell Data - Seperate to different columns

2009-07-16 Thread TAlgo
Dilip. How do I use text to column feature of 07? On Jul 16, 10:36 am, "Daniel" wrote: > Hi. > Try : > > Sub test() > Dim txt As String, Tabl > txt = [A1] > txt = Application.Substitute(txt, "_", "") > txt = Application.Substitute(txt, ",", "") > txt = Left(txt, Len(txt) - 1) > txt = Right(txt,

$$Excel-Macros$$ Re: One Cell Data - Seperate to different columns

2009-07-16 Thread Daniel
Hi. Try : Sub test() Dim txt As String, Tabl txt = [A1] txt = Application.Substitute(txt, "_", "") txt = Application.Substitute(txt, ",", "") txt = Left(txt, Len(txt) - 1) txt = Right(txt, Len(txt) - 1) Tabl = Split(txt, " ") [B1] = Tabl(0) & " " & Tabl(1) [C1] = Tabl(2) [D1] = Tabl(3) * 1 [E1] =

$$Excel-Macros$$ Re: One Cell Data - Seperate to different columns

2009-07-16 Thread TAlgo
Awesome..you da man...Thanks On Jul 16, 10:16 am, Thierry wrote: > You can use some fancy string manipulation. I got this to work: > >     'input is "_ Sept. 15, down 504.48 at 10,917.51." in cell A1 > >     Dim sInput, sDate, sDown, sFirstNumber, sSecondNumber As String > >     sInput = Range(

$$Excel-Macros$$ Re: One Cell Data - Seperate to different columns

2009-07-16 Thread Dilip Pandey
Hi, If you have the same data type, huge in size, then you should use Text - To - Column feature of Ms-Excel. if not then a combination of nested functions can be developed Thanks & Regards, DILipandey (Back from HOlidays) -- DILIP KUMAR PANDEY MBA-HR,B COM(Hons.),BCA Mobile: +91 9810929744 di

$$Excel-Macros$$ Re: One Cell Data - Seperate to different columns

2009-07-16 Thread Thierry
You can use some fancy string manipulation. I got this to work: 'input is "_ Sept. 15, down 504.48 at 10,917.51." in cell A1 Dim sInput, sDate, sDown, sFirstNumber, sSecondNumber As String sInput = Range("A1") sDate = Left(sInput, InStr(sInput, ",") - 1) sDate = Right(sDate