Excluindo linha em branco

Geralmente eu faço um código bem maior e lento que vai excluindo linha em branco na planilha, mas eu descobri a função abaixo e vale apena divulgar.

Com o código abaixo possibilitará deletar todas as células em branco que estiverem na coluna D

Codigo Excluindo linha em branco

Sub DelBlankRows()

range(“d:d”).specialcells(xlcelltypeblanks).entirerow.delete

End Sub