Hi Prashant,

I would like to do it in 3 steps.

1. Run this code:

Sub Macro1()
        ActiveWorkbook.SaveAs Filename:="D:\tmp\Book1.txt",
FileFormat:=xlText, _
        CreateBackup:=False
End Sub

(sure, you can change path "D:\tmp\Book1.txt" to your own)

2. Open "D:\tmp\Book1.txt" in text editor, for example Notepad.exe
Remove quotes and save file.

3. Run this code:

Sub Macro2()
    Workbooks.OpenText Filename:="D:\tmp\Book1.txt", Origin:=866,
StartRow:=1 _
        , DataType:=xlFixedWidth, FieldInfo:=Array(0, 1),
TrailingMinusNumbers:= _
        True
End Sub

Please tell me does it work for you.


On 9 Лип, 15:36, Prashant Pednekar <prashant...@gmail.com> wrote:
> Hi all
> I want to convert on Text in each cell to rows ?
> In each Cell has 50 + numbers one below one.
> e.g.
> 09:51:18
> 09:51:31
> 09:52:04
> There are five such columns.
> Can any one help me to convert to rows?
>
> Regards.
> prashant

-- 
----------------------------------------------------------------------------------
Some important links for excel users:
1. Follow us on TWITTER for tips tricks and links : 
http://twitter.com/exceldailytip
2. Join our LinkedIN group @ http://www.linkedin.com/groups?gid=1871310
3. Excel tutorials at http://www.excel-macros.blogspot.com
4. Learn VBA Macros at http://www.quickvba.blogspot.com
5. Excel Tips and Tricks at http://exceldailytip.blogspot.com
 
To post to this group, send email to excel-macros@googlegroups.com

<><><><><><><><><><><><><><><><><><><><><><>
HELP US GROW !!

We reach over 7000 subscribers worldwide and receive many nice notes about the 
learning and support from the group.Let friends and co-workers know they can 
subscribe to group at http://groups.google.com/group/excel-macros/subscribe

Reply via email to