Erro Macro Excel

Question

Olá,

Já uso uma macro há algum tempo e nos últimos tempos ele começou a retornar o erro:

"Erro em tempo de execução 1004: Para você fazer isto, todas as células mescladas precisam ser do mesmo tamanho".

A macro serve para ordenar por ordem de data uma lista de despesas com descrições em várias colunas. 3 destas colunas estão mescladas, em todo a área escolhida, e isto está gerando o erro já que se eu tiro a mesclagem, o erro some, porém, desconfigura totalmente minha planilha.

Por ter surgido somente agora no Office 2016, existe alguma nova configuração ou correção na macro para ele aceitar que contenha células mescladas na seleção? Segue macro abaixo:

Sub Classificar_Colunas()

'

' Classificar_Colunas Macro

'

'

    ActiveWindow.SmallScroll Down:=6

    Range("C12:K49").Select

    ActiveWorkbook.Worksheets("Relatório").Sort.SortFields.Clear

    ActiveWorkbook.Worksheets("Relatório").Sort.SortFields.Add Key:=Range( _

        "C13:C49"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _

        xlSortNormal

    With ActiveWorkbook.Worksheets("Relatório").Sort

        .SetRange Range("C12:K49")

        .Header = xlYes

        .MatchCase = False

        .Orientation = xlTopToBottom

        .SortMethod = xlPinYin

        .Apply

    End With

End Sub

Answer 1

Olá , tudo bem?

Obrigada por entrar em contato com a Comunidade Microsoft.

Meu nome é Valéria sou orientadora independente e farei o possível para ajudar.

Para obter maiores esclarecimentos sobre o seu questionamento, peço a gentileza de acessar o link abaixo que vai direcioná-lo ao MSDN que é um fórum especialmente destinado para desenvolvedores e profissionais em TI para tratar está questão.

https://social.msdn.microsoft.com/Forums/pt-BR/....

Para criar uma nova pergunta no fórum MSDN, acesse:

https://social.msdn.microsoft.com/Forums/pt-BR/....

Basta logar com a sua conta Microsoft.

Espero ter ajudado, até mais!