Cadê seu arquivo de exemplo???
Assim fica difícil!!!

Por favor , para que possamos ajudá-lo coloque a planilha de exemplo

Grato

Na planilha que anexei eu gostaria de fazer fazer a classificação de valor de vendas, do maior para o menor mas quando faço isto as imagens não seguem junto.

No meu computador funcionou perfeitamente a classificação. Estou usando Excel 2013. Qual a sua versão?

O meu é o 2013 também, os filtros funcionam bem.

No entanto qdo faço a classificação no caso de maior venda em valor para menor venda as fotos não seguem as referências dos produtos ou caem uma sobre a outra.

Tente em outro computador. Pode ser que o problema esteja nisso. Se funcionar, creio que a solução seja reinstalar o Office.

Testei aqui e vi que realmente vc tem razão, algumas das imagens se sobrepõe às outras (ficam "encavaladas", né?). Eu imaginei que pudesse ser a propriedade "Mover e dimensionar com células", mas todas as imagens estão com essa opção ativada, então teoricamente deveriam se comportar igual... Continuemos a procurar uma solução então...

Depois da mensagem do Edson, creio que consegui ver o problema. Era no item de referência C800107, certo? Movi este um pouco para cima e funcionou.

Suggos, pode ser que seja isto mesmo. Reduzi todas as imagens e centralizei nas células e parece que deu certo. Pode ser que algumas fotos estavam um pouco grandes, invadindo a outra célula, por isso misturavam. Vou fazer novos testes e aviso vocês se deu certo.

Diminuí as fotos, mas não deu certo. Na hora de fazer a classificação as fotos não movem com as linhas.

Continuo buscando uma dica para saber como inserir as fotos na planilha para que seja possível utilizar a classificação e as fotos moverem junto com as linhas, sem bagunçar.
Por favor quem puder me ajudar...

Em seu modelo, reduzi as figuras para 90% do tamanho original, e "setei" a propriedade mover com a celula .
Utilizei a rotina abaixo:

Sub AlteraImagem()
'Altera tamanho da imagem para 90% do tamanho original, e "seta" propriedade mover com celula
Dim sh As Shape
With Sheets("VENDA")
    For Each sh In ActiveSheet.Shapes
        sh.Select
        Selection.ShapeRange.ScaleHeight 0.9, msoFalse, msoScaleFromTopLeft
        Selection.Placement = xlMoveAndSize
    Next
Range("A1").Select
End With
End Sub

Depois alterei os nomes das imagens conforme a celula "B"

Sub RenomeiaImagem()
'Altera nome da figura, conforme celula da coluna "B", caso seja necessário reordenar as imagens.
Dim sh As Shape
With Sheets("VENDA")
    For Each sh In ActiveSheet.Shapes
        sh.Select
        sh.Name = .Cells(Selection.TopLeftCell.Row, 2).Value
    Next
Range("A1").Select
End With
End Sub

Por fim centralizei as imagens nas celulas

Sub AjustaCentro()
'Ajusta/Ancora imagem centralizado na Celula
Dim OverCells As Range, Shp As Shape
Dim x As Integer
For Each Shp In ActiveSheet.Shapes
    ActiveSheet.Shapes.Range(Array(Shp.Name)).Select
    x = Selection.TopLeftCell.Row
    Set OverCells = Range("A" & x)
    With OverCells
        Shp.Left = .Left + ((.Width - Shp.Width) / 2)
        Shp.Top = .Top + ((.Height - Shp.Height) / 2)
    End With
Next
Range("A1").Select
End Sub

Então ao reordenar a planilha as imagens seguiram normais. Teste