Split Text

[slinky192001]

Hello

I have a list of cells in column A as follows:

9h 2m
104h 32m
etc

There is always a space between the hours and minutes so i would like to split the hours and minutes into seperate columns.
I know i have done this before but cant think for the life of me how.

Any help is greatly appreciated.

Thanks

 

[Sektor]

Sub Separate()

    Dim i As Long, arr As Variant
    
    For i = 1 To Cells(Rows.Count, "A").End(xlUp).Row
        arr = Split(Cells(i, 1))
        Cells(i, 2) = arr(0)
        Cells(i, 3) = arr(1)
    Next
    
End Sub

 

[Arcticwarrio]

try text to columns in the Tools menu using a space as Delimeter

 

[Ruddles]

Text to Columns is probably best if it's a one-off task, but here are the worksheet formulae if you need them:-

=TRIM(LEFT(A1,FIND(" ",A1&" ")-1))
=TRIM(MID(A1,FIND(" ",A1&" ")+1,255))

(assuming that your data is in A1)

 

[slinky192001]

Thank you Text to Columns was perfect.

 

[slinky192001]

Ah yes, the trim way was how i used to do it.

Again thank you for your help.