excel跨行相减

使用以下代码，发现如果相隔行数不一致，会导致一些漏计算
求助大佬帮忙看看怎么改代码
Function Chcx0x1826f456(rng1 As Range, rng2 As Range)
If rng1.Value = "0x1826f456" And rng2.Value = "0x1826f456" Then
Chcx0x1826f456 = (rng1.Offset(0, -2) - rng2.Offset(0, -2))
Else
Chcx0x1826f456 = ""
End If
End Function