Incluir en una macro "distinto de 0 o distinto de blanco"

[Jise]

Buenas noches,

A continuación inserto la macro que tengo en la que me funciona "distinto de 0" pero además me gustaría añadirle "distinto de blanco", pero no doy con la solución.
¿Sabéis cómo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Jose BN]

Buenas noches,

A continuación inserto la macro que tengo en la que me funciona "distinto de 0" pero además me gustaría añadirle "distinto de blanco"...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Jise]

Prueba así :
If comentario <> "0" Or "" Then .AddComment...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Goldfinger]

trata con if comentario><0 or comentario><"" then .addcomment
o
con if comentario><0 or comentario><empty then .addcomment

 

[Erik Lopez]

if len(comentario) <> 0 then ...

 

[FGV]

Hola @Jise,
Puedes adaptar un código de este tipo a tu archivo:

Sub CheckForComment()
Dim Rng As Range, Celda As Range, Comentario As String
Set Rng = Range("A1:A5")...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí

 

[Macro Antonio]

If comentario <> "0" And _
   comentario <> "" Then .AddComment comentario

 

[Leopoldo Blancas]

If comentario <> "0" And  comentario <> "" And Not IsEmpty(comentario) Then .AddComment comentario

 

[Jise]

Muchas gracias por vuestra ayuda @Goldfinger , @Erik Lopez , @FGV , @Macro Antonio y @Leopoldo...

Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes iniciar sesión aquí