Looking for help with a sub(s) which can assist in clearing the ranges above
& below a "diagonal" running from bottom left to top right.

Say I have a populated range D13:G16
where the diagonal cells from bottom left to top right are D16, E15, F14,
G13

I would like to run a sub to clear the range above the diagonal,
ie clear D15, D14:E14, D13:F13

and another sub/option to clear the range below the diagonal,
ie clear G14, F15:G15, E16:G16

Any insights appreciated, thanks