Forum Discussion
Split data from one column without using text to column
Hi, I have some data(Invoice Nos) in a col A in a text format separated with"/", i want to split the same with using a formula (NOT TEXT TO COLUMN) coz if new data is added I'll need to go throug...
Thank you for this but want to split this data into 4 cells VERTICALLY and not horizontally. Pls see attach for example
then you use this code below.
lets say your data is in Cell A1
Sub Test()
Dim X As Variant
X = Split(Range("A1").Value, Chr(10))
Range("A1").Resize(UBound(X) - LBound(X) + 1).Value = Application.Transpose(X)
End Sub
lets say your data is in Cell A1
Sub Test()
Dim X As Variant
X = Split(Range("A1").Value, Chr(10))
Range("A1").Resize(UBound(X) - LBound(X) + 1).Value = Application.Transpose(X)
End Sub