Else sin If (Error de Compilación): VBA
Tengo este código de una macro.. El único error que tengo es que al ejecutarlo, me sale "Error de Compilación: Else sin If".. Busque en muchas respuestas en Internet, pero no he dado con ninguna correcta.
Sub ocultarRow()
Range("D4").Select
palabra = InputBox("N/S")
Do While ActiveCell <> Empty
If ActiveCell.Value = palabra Then
ActiveCell.EntireRow.Hidden = True
ActiveCell.Offset(1, 0).Select
Else
ActiveCell.Offset(1, 0).Select
End If
Loop
End Sub
1 Respuesta
Respuesta de Dante Amor
1
Ya probé tu código y no me aparece ese error.
¿Estás seguro que tienes en vba el mismo código?
Te anexo el mismos código que probé, tal vez tienes algún caracter raro en tu código que está ocasionando el error
Sub ocultarRow()
Range("D4").Select
palabra = InputBox("N/S")
Do While ActiveCell <> Empty
If ActiveCell.Value = palabra Then
ActiveCell.EntireRow.Hidden = True
ActiveCell.Offset(1, 0).Select
Else
ActiveCell.Offset(1, 0).Select
End If
Loop
End SubPrueba y me comentas.
O envíame tu archivo para revisarlo
Mi correo [email protected]
En el asunto del correo escribe tu nombre de usuario “Leandro Gabriel Ayala”
