Text-to-Column Macro

[evanlent]

Hello,

I am trying to record a macro (I dont know how to write them, yet) for "fixed with" text to columns. The data is always the say and the format required is the same as well. When I record the Macro it seems to work only for the first row. Is there a way to fix this?

Thanks in advance.

evanlent

 

[jasonb75]

Welcome to the board!

Your recorded macro will look something like

Selection.TextToColumns Destination:=Range("A1"), DataType:=xlFixedWidth, _
        FieldInfo:=Array(Array(0, 1), Array(5, 1)), TrailingMinusNumbers:=True

Assuming you want to run the code on the selected cell(s), try changing Range("A1") to ActiveCell