Qlik Community

QlikView Scripting

Discussion Board for collaboration on QlikView Scripting.

Announcements
QlikView Fans! We’d love to hear from you.
Share your QlikView feedback with the product team… Click here to participate in our 5-minute survey.
Rules, plus terms and conditions, can be found here.
Not applicable

Macro to add "Clear Field" actions to a Text Object

   Hi all -

I'm attempting to write a macro that will add a "Clear Field" action to a specified text object for every field that exists within a particular table in my qvw (the Calendar table in the below example).  The below code works in the following scenarios:

1. I create a new text object and run the macro.  The initial run of the macro works, however subsequent runs add only the first and last field in my table.

2. I add a message box to the code below to display k for each value of the index

3. I run this macro via an external program that opens the QVW, runs the macro, and then closes the QVW.

Does anyone have any thoughts on additional things to try?

sub ButtonActionsFields

set flds=ActiveDocument.GetFieldDescriptions

fldcount=0

for i=0 to flds.count-1

set fld=flds.item(i)

if not fld.IsSystem then

  fldTableCount=ubound(fld.SrcTables)+1

  tables=fld.SrcTables

  fldTables=""

  for j=lbound(tables) to ubound(tables)

   fldTables=fldTables & tables(j) & ";"

  next

end if

if instr(fldtables,"Calendar") then

  fldcount=fldcount+1

  'k=fldcount-1

  call AddClearFieldAction2(fld.name)

end if

next

end sub

sub AddClearFieldAction2(field)

  set Button1= ActiveDocument.GetSheetObject("TX1001")

  set prop1 = Button1.GetProperties

  set actions1 = prop1.Layout.ActionItems

  actions1.Add

  k = actions1.count - 1

  'msgbox(k)

  'ActiveDocument.GetApplication.Sleep 2000

  actions1.Item(k).Type = 36

  actions1.Item(k).Parameters.Add

  actions1.Item(k).Parameters.Item(0).v = "[" & field & "]"

  Button1.SetProperties prop1

  set Button1 = nothing

  set prop1 = nothing

  set actions1 = nothing

  set k = nothing

end sub

Community Browser