Help!!!! Estou atualizando minha planilha no excel, logo peço pra ordenar por uma determinada coluna.... Meu PROBLEMA É ESSE... Ele simplesmente não quer ordenar.. Como faço pra fazer essa ordenação??? Segue meu codigo... Sub Atualiza() Dim Con1 As Object Dim Dados As Object '## SGR Sheets("SGR").Range("B2").Value = "Posição em " & Dados("data") Sheets("DadosSGR").Range("A1").QueryTable.Refresh Sheets("SGR").Range("B5:E45").Sort key1:=Sheets("SGR").Range("C5"), Order1:=xlDescending '## MPE Sheets("MPE").Range("B2").Value = "Posição em " & Dados("data") Sheets("DadosMPE").Range("A1").QueryTable.Refresh Sheets("MPE").Range("B5:J46").Sort key1:=Sheets("MPE").Range("G5"), Order1:=xlDescending '## MGE Sheets("MGE").Range("B2").Value = "Posição em " & Dados("data") Sheets("DadosMGE").Range("A1").QueryTable.Refresh Sheets("MGE").Range("B5:L46").Sort key1:=Sheets("MGE").Range("G5"), Order1:=xlDescending MsgBox ("Planilhas Atualizadas com Sucesso") End Sub Desde já Agradeço!!!
