Problema con macro IF Range

preguntado 2017-03-13 22:16:11 +0100

Imagen Gravatar de jordi_cs

Necesito ayuda para el siguiente macro para libreoffice Calc. en excel me funciona pero con Calc no. ¿Me podeis ayudar?

Sub ocu_mos() If Range("a3") = "MANUAL" Then Rows("5:6").EntireRow.Hidden = True Rows("9:10").EntireRow.Hidden = True Rows("7:8").EntireRow.Hidden = False Rows("11:12").EntireRow.Hidden = False Else Rows("5:6").EntireRow.Hidden = False Rows("9:10").EntireRow.Hidden = False Rows("7:8").EntireRow.Hidden = True Rows("11:12").EntireRow.Hidden = True End If End Sub

Me sale Error de tiempo de ejecución del BASIC. No se ha definido el subprocedimiento o el procedimiento de la función

edit re-etiquetar marcar como ofensivo cerrar fusionar delete