Move all components in z-direction

Hello,

I tried to create a macro that moves all components in an assembly a special z-value. 

Unfortunatelly I didn't get that far. I only was abled to start the "movecomponent" Feature. 

Can sombody help me?

Attached you find my effort.

Thanks

SolidworksApi/macros