VBA Macro error on Text to Columns

[heytherejem]

Hi,

I've recorded a macro which transforms some raw data into a reportable format and this includes separating out a column within a table range which holds both a date and an attribute into two columns.

When I recorded this step, I used fixed width to separate out the two columns, because the date is in numerical value format e.g. 42736.

When I ran the macro through to see if it worked, it got stuck on this process. Below is the VBA code, any suggestions on how to modify this to work??

Selection.TextToColumns Destination:=Range("Table1_2[[#Headers],[Attri]]"), _
DataType:=xlFixedWidth, FieldInfo:=Array(Array(0, 1), Array(5, 1)), _
TrailingMinusNumbers:=True

p/s I checked the table name as I figured it might have specified the table name from my recording but it's not - the table is called Table1_2.

[TMS]

... it got stuck on this process.

What does that mean?

Post a sample workbook and instructions on how you run the macro.

[heytherejem]

It's ok I figured out what was wrong.

[TMS]

Ok, good. Might be worth sharing the solution for the benefit of others.