Column Z difference for repeats

In my worksheet Column Y contains multiple duplicates and Column Z contains values associated with each duplicate. I want to check every row in Column Y for multiple duplicates then find the difference between their associated Column Z values.

ActiveSheet.Range("Y:Z").Duplicates Columns:=25, Header:= _ xlYes