Macro para mostrar mensaje, si es resultado de la formula es "0"

Tengo un reporte que esta conectado a una consulta para ir agregando la producción del día. Son rollos, y cada rollo debe tener un estándar de producción.

Si no lo tiene aparece en "0"

Esto se agrega en automático al activar una macro que actualiza la consulta, osea el estándar aparece con un "BUSCARV" si no encuentra entandar da 0,

Le puse formato condicional de que si es "0" lo rellena de Rojo,

Como se ve en la imagen

Al ponerle validación de datos mayor que "0" muestre un mensaje de advertencia,

Si lo realiza siempre y cuando yo agrege el valor a mano.

Pero al darle actualizar datos y consulta el valor se agrega por la formula "=SI(ESERROR(BUSCARV(G47,'0'!A:M, 13, FALSO)),"", BUSCARV(G47,'0'!A:M, 13, FALSO))"

Asi no hay valor pues esta en blanco, la finalidad es que se agregre la producción al actualizar .

Pero no logro que muestre un mensaje cuando el estándar este en "0"

No se si lo pueda agregar en la macro de actualizar,, que es la siguiente

Sub Todo()
'
' Todo Macro
'
'
ActiveSheet.Unprotect Password:="decapado2019"
Sheets("0").Select
Range("A2").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("2").Select
Range("A2").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("3").Select
Range("A2").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("4").Select
Range("A2").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("5").Select
Range("B2").Select
Selection.QueryTable.Refresh BackgroundQuery:=False
Sheets("Dia 17").Select
ActiveSheet.Protect Password:="decapado2019", DrawingObjects:=False, Contents:=True, Scenarios:= _
False
End Sub

De ante mano muchas gracias, ya que siempre aprendo algo nuevo de ustedes los colaboradores

Y me han ayudado con muchas dudas

!