Texto para colunas padrão [Excel]

Question

É possível alterar os padrões de texto para colunas no Excel 2013?

O objetivo é alterá-lo para que sempre seja delimitado e, por Por padrão, o semicolumn é um delimitador "selecionado".

    

Answer 1

 Range(activecell).Select
    Selection.TextToColumns Destination:=Range(activecell), DataType:=xlDelimited, _
        TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=False, Tab:=False, _
        Semicolon:=True, Comma:=False, Space:=False, Other:=False, FieldInfo _
        :=Array(Array(1, 1), Array(2, 1), Array(3, 1), Array(4, 1), Array(5, 1), Array(6, 1), _
        Array(7, 1), Array(8, 1), Array(9, 1), Array(10, 1), Array(11, 1), Array(12, 1), Array(13, 1 _
        ), Array(14, 1), Array(15, 1), Array(16, 1), Array(17, 1), Array(18, 1), Array(19, 1)), _
        TrailingMinusNumbers:=True

Em seguida, use a macro em vez do padrão "Text to Column"