Backspace キーに割り当てるマクロを作ってみました（VBS がよくわからないので試行錯誤してやっとできましたが、やってることは単純）ので、使ってみてください。

'選択範囲のあるなしで動作を変えて消去
function backspace
if ActiveDocument.Selection.Text = "" then
DeleteBack
else
DeleteChar
end if
end function