Saber la cantidad de pic box generados en base al index y obtener el valor

[ComprasDesdeCasa]

Perfecto, entonces supongo que lo que necesitas es procesar esa última sentencia en un for:

Código vb:

for i =botonprods.LBound To botonprods.UBound
botonprods(i).Top = -l
next i
 

Aunque supongo que ya lo habrás comprobado, no?

Era el resultado que esperabas?

Saludos.