ARRAY DE CONTROLES VBA EXCEL

ARRAY DE CONTROLES VBA EXCEL

Un par de cosas o tres:

lo primero es que para que esto funcione hay que añadir una referencia a Microsoft visual basic for applications extensibility

lo segundo:

como el bucle va a crear varios controles, no pueden estar todos en el mismo sitio, así que por ejemplo altera su posición en vertical

tampoco se pueden llamar igual, así que altera su nombre.

a ver qué tal así:

Dim mynewform As Object
Dim mycheckbox As Object
Dim i
      
        Set mynewform = Application.VBE.ActiveVBProject.VBComponents.Add(vbext_ct_MSForm)
      ' Add a checkbox to the new UserForm.
      For i = 1 To 10  ' diez o los que sean
          Set mycheckbox = mynewform.Designer.Controls.Add("Forms.CheckBox.1")
          ' With the new checkbox...
          With mycheckbox
             .Name = "Check" & i   'no puede haber varios con el mismo nombre
             .Caption = "Check here"
             .Left = 10
             .Top = 10 * i  'para separarlo en vertical
             .Height = 20
             .Width = 60
          End With
      Next

------

SHARE

Oscar perez

Arquitecto especialista en gestion de proyectos si necesitas desarrollar algun proyecto en Bogota contactame en el 3006825874 o visita mi pagina en www.arquitectobogota.tk

• 
• 
• 
• 
•