[Resolvido]Cancelamento de abertura de relatório em conflito

Copiei esse código do JPaulo para impedir a abertura de um relatório caso fosse vazio.

Private Sub Report_NoData(Cancel As Integer)
MsgBox "Não Tem Dados para Imprimir"
Cancel = -1
End Sub

Porém o comando para abrir e Rel está num botão:

DoCmd.OpenReport "ConsQuantitativoLocalidades2", acViewPreview

E quando o relatório está vazio ele vai para o depurador e realça a de comando do botão:

Como tem que ser?

Obrigado
Caros forumeiros

Caso encerrado!

Muito obrigado