Unlock a world of possibilities! Login now and discover the exclusive benefits awaiting you.
hola, estoy queriendo desactivar una hoja en qlikview adicional a ello estoy manejando por botones multiples selecciones , lo que quiero realizar desde mi boton para ello mediante una macro :
-seleccionar variables y activar en otra hoja la cual es el detalle de mi seleccion
sUB irHoja()
SET sh = ActiveDocument.ActiveSheet
FOR i = 0 to sh.NoOfSheetObjects-1
SET obj = sh.SheetObjects(i)
IF obj.GetObjectType = 5 THEN
IF obj.IsActive THEN
SET v = ActiveDocument.Variables("Choice")
CASE "Area de Transportes, Cascos y Aviación"
ActiveDocument.activatesheet("DETALLE DE BSC").activate
ActiveDocument.fields("VALOR_AREA"). select "2"
ActiveDocument.fields"VALOR_DIVISION"). select "3"
CASE "AREA"
ActiveDocument.activatesheet("DETALLE DE BSC").activate
ActiveDocument.fields("VALOR_AREA"). select "3"
ActiveDocument.fields"VALOR_DIVISION"). select "3"
END SELECT
ELSE
END IF
END IF
NEXT
END SUB
please su ayuda
Hola,
it would be heplful to describe your problem in english ![]()
Greets
SUB macro()
SET sh = ACTIVEDOCUMENT.ActiveSheet
FOR i = 0 to sh.NoOfSheetObjects-1
SET obj = sh.SheetObjects(i)
fr = obj.GetProperties
IF obj.GetObjectType = 5 THEN
IF obj.IsActive THEN
fr.Frame.BorderEffect = 1
a = obj.GetText
SELECT CASE a
CASE "Detalle Riesgos Patrimoniales"
ACTIVEDOCUMENT.SHEETS("SH02").Activate
ACTIVEDOCUMENT.Fields("VALOR_AREA").select "13"
ACTIVEDOCUMENT.Fields("VALOR_DIVISION").select "3"
CASE "Area de Transportes,Cascos y Aviación"
ACTIVEDOCUMENT.SHEETS("SH02").Activate
ACTIVEDOCUMENT.Fields("VALOR_AREA").select "2"
ACTIVEDOCUMENT.Fields("VALOR_DIVISION").select "3"
END SELECT
ELSE
fr.Frame.BorderEffect = 2
END IF
obj.SetProperties fr
END IF
NEXT
END SUB