Unless I can see the workbook, I can't tell you why it fails. That code is not using Usedrange, it uses Currentregion.