Issue with macro, the columns are not sort

[Naval_JOR]

Hi Guys,
I just came to this forum out of millions of Excel forums, I'm quite new with VBA because I dont use that much. Well , here is my issue. I have a macro which is reading angles degrees from 0 to 360 , increment 15 degrees. The macro is reading well the file but somehow is given me

150
165
180
195
210
225
240
255
270
285
300
315
330
345
360
25
0
15
30
45
60
75
90
105
120

<tbody>
</tbody>

which is incorrect I would prefer from 0-360 from small value to great value. Could you please give me a help, I have spent some hours trying to find a solution in google but not luck

part of the macro below

' Convert strings to numbers and seperate








Range("Z12:Z200").Select

Selection.TextToColumns , _
Destination:=Range("Z12:Z200"), DataType:=xlDelimited, _
TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=True, _
Semicolon:=False, Comma:=False, Space:=True, Other:=False, FieldInfo _
:=Array(Array(1, 1), Array(2, 1)), TrailingMinusNumbers:=True



End Sub

the issue occurs from Range ("Z12:Z200").Select , I believe the selectiontext to Columns needs to be able to recognise the angles from 0 to 360 and sort them out wisely


Kind Regards

 

[Jerry Sullivan]

Welcome to MrExcel,

How many columns of data do you have after the text is split into columns?

What is an example value for cell Z12 before running the macro?

 

[Naval_JOR]

Welcome to MrExcel,

How many columns of data do you have after the text is split into columns?

What is an example value for cell Z12 before running the macro?

Hi, I have only 2 columns of data as you can see below ,

0	8.69E-01
15	8.69E-01
30	8.69E-01
45	8.69E-01
60	8.69E-01
75	8.69E-01
90	8.69E-01
105	8.69E-01
120	8.69E-01
135	8.69E-01
150	8.69E-01
165	8.69E-01
180	8.69E-01
195	8.69E-01
210	8.69E-01
225	8.69E-01
240	8.69E-01
255	8.69E-01
270	8.69E-01
285	8.69E-01
300	8.69E-01
315	8.69E-01
330	8.69E-01
345	8.69E-01
360	8.69E-01

<colgroup><col width="64" span="2" style="width:48pt"> </colgroup><tbody>
</tbody>

but then the macro is not reading properly the columns and is messing up like this

150	0.86868
165	0.86868
180	0.86868
195	0.86868
210	0.86868
225	0.86868
240	0.86868
255	0.86868
270	0.86868
285	0.86868
300	0.86868
315	0.86868
330	0.86868
345	0.86868
360	0.86868
25	0
0	0.86868
15	0.86868
30	0.86868
45	0.86868
60	0.86868
75	0.86868
90	0.86868
105	0.86868
120	0.86868

<colgroup><col width="64" span="2" style="width:48pt"> </colgroup><tbody>
</tbody>

 

[Jerry Sullivan]

To clarify, I'm wanting to understand the exact text in Column Z, before the Text To Columns process runs.

I'm assuming that you have only one Column of data before the Text To Columns runs.
Cell Z12 might hold a value like one of these...
0 0.86868
0 8.69E-01
"0" "0.86868"
"0" "8.69E-01"
"0 0.86868"
"0 8.69E-01"

or something similar.

Also, please check that a stand alone Sub that uses just the code you posted in Post #1 , exhibits that same behavior (ensuring the problem isn't due to another part of your code you haven't posted).