topic Copy Cycle Group in QlikView

Copy Cycle Group

Thu, 14 Jul 2011 10:09:26 GMT

Hello

I have to create 6 cycle groups for a large multi-way table. The need to contain the same 40 variables in the same order. Is there a way to copy one cycle group to make the others, rather than having to make them all manually, it's a bit of a pain!

Thanks.

Copy Cycle Group

d_pranskus — Thu, 14 Jul 2011 14:04:00 GMT

You can use macro for that:

Sub CopyGroup (SrcName, DstName)
    Set SrcGrp = ActiveDocument.GetGroup(SrcName)
    Set SrcProps = SrcGrp.GetProperties
    Set DstGrp = ActiveDocument.CreateGroup(DstName)
    Set DstProps = DstGrp.GetProperties
    DstProps.FieldDefs.CopyFrom SrcProps.FieldDefs
    DstProps.IsCyclic = SrcProps.IsCyclic
    DstProps.Labels = SrcProps.Labels
    DstProps.Present = SrcProps.Present
    DstProps.SortCriterias.CopyFrom SrcProps.SortCriterias
    DstGrp.SetProperties DstProps
End Sub

Calling:

Sub DoCopying
    CopyGroup "ExistingGroupName", "NewGroupName"
End Sub

Cheers

Darius

Copy Cycle Group

Mon, 05 Sep 2011 10:18:34 GMT

This is very useful. Thanks Darius!

Copy Cycle Group

Mon, 19 Mar 2012 19:57:25 GMT

Exteremely useful!

Copy Cycle Group

d_pranskus — Thu, 24 May 2012 13:47:02 GMT

New version of the script. If destination group exists, it replaces it's contents.

Sub CopyGroup (SrcName, DstName)

Set SrcGrp = ActiveDocument.GetGroup(SrcName)

Set SrcProps = SrcGrp.GetProperties

Set DstGrp = ActiveDocument.GetGroup(DstName)

If DstGrp Is Nothing Then

Set DstGrp = ActiveDocument.CreateGroup(DstName)

Else

Set DstProps = DstGrp.GetProperties

for i = 1 to DstProps.FieldDefs.Count

DstGrp.RemoveField 0

End If

Set DstProps = DstGrp.GetProperties

DstProps.FieldDefs.CopyFrom SrcProps.FieldDefs

DstProps.IsCyclic = SrcProps.IsCyclic

DstProps.Labels = SrcProps.Labels

DstProps.Present = SrcProps.Present

DstProps.SortCriterias.CopyFrom SrcProps.SortCriterias

DstGrp.SetProperties DstProps

End Sub

' Calling

Sub DoCopying

CopyGroup "grp1", "grp2"

End Sub

Cheers Darius

Re: Copy Cycle Group

Thu, 17 Sep 2015 05:55:32 GMT

Hi Darius,

This was so useful I registered just to say thank you. Thank You!

Re: Copy Cycle Group

NickP_DF — Sun, 10 Nov 2019 15:52:57 GMT

Excellent solution Darius,

you make me gain a lot of time!

Thank you!