Text to column

Last Edited By Krjb Donovan
Last Updated: Mar 05, 2014 09:57 PM GMT

Question

How can do multiple text to columns? If I need to do text to columns to a 100 columns at the same time?

Answer

I'd record a macro doing the first one and then something like:

Sub ManyTextToColumns()

   Dim lCt as Long
   For lCt = 1 to 100
       RecordedMacroNameGoesHere
       'Select next column
       Activecell.offset(,1).Entirecolumn.Select
   Next

End Sub

Advertisement

©2021 eLuminary LLC. All rights reserved.