Visual Basic para Aplicaciones - If Then

Hola
Por favor alguien que me ayude a entender que le falta a esto para funcionar.
No se que le falta (o que le sobra)
Muchas gracias

Error 13 quiere decir que estas compranado tipos diferentes. En este caso estas compraando un string con un numero.
No se si te falta colocar WorkSheets("S2") o "S2" es una variable que le puedes colocar 1 y en ese caso seria solo If S2 = 1 then ...

S2 es la celda S2 donde aparece un 1 o un 0
Le saqué las comillas y tampoco funcionó
Entiendo muy poco de VB.
Lo mio es ensayo y error
Solo soy usuario de excel
gracias

Saludos

Muchas gracias Miguel
Funcionó!