Dúvidas no Excel

[cristiamc]

Galera bom dia!!

Estou com um problema no excel e gostaria da ajuda de vocês.

Tenho uma linha no excel que seus valores são atualizados costantimente, e possui uma colula que quando ela chega ao valor de 90, os dados são zerados, estou precisando que quando essa coluna chegue a 90 e cópia os dados de toda a linha para uma linha abaixo e assim por diante. porém quando faço isso com a formula se os dados acaba dicando todos iguais. segue exemplo

Nº data hora peso agora Peso acum

19 15/05/2013 14:55 90 1498

quando peso agora for 90 tenho que copiar tuda a linha para a linha abaixo.

[zinhovba]

Boa noite!!

Veja se é isso

Private Sub Worksheet_Change(ByVal Target As Range) 
'Caso D2 seja = 90 então os dados da linha 2 será deslocados para baixo
If Target.Address = "$D$2" And Range("D2").Value = 90 Then
               Target.EntireRow.Insert
    End If
End Sub

Obs: Dentro do Editor (Alt + F11), dê dois clicks no código de guias, insira o código