Hola a todos,

No es una maravilla de la programación, pero puede ser útil. He montado un pequeño código que acumula entradas en una variable (entradas=líneas separadas, ítems) y permite crear una lista según se marquen los checkboxes en la hoja. Ideal para pasar lista y obtener una relación de todos los participantes en un evento, o para inventarios, o lo que mejor os vaya, cada uno le dará el uso que más le convenga

Un saludo.

lista segun checkboxes.xls

Hola shadowjuan,

Perdon por mi intromision, te dejo aqui una manera de recorrer los checkbox dinamicamente:

Private Sub CommandButton1_Click()

    Dim chk As OLEObject

    Dim asist As String

    asist = "Ha asistido:"

    For Each chk In ActiveSheet.OLEObjects

        If chk.progID = "Forms.CheckBox.1" And chk.Object.Value Then asist = asist & Chr(10) & "-" & Cells(chk.TopLeftCell.Row, 1)

    Next

    Range("F1") = asist

End Sub[/CODE]

Saludos

Gracias por la intromisión. Sinceramente, hay cosillas de ese código que no acabo de entender (no llego a tanto y nunca me meto con los objetos en sí directamente), pero sí imagino que comprobará cuántos checkboxes hay e irá ciclando (con el next) entre ellos para ir ampliando la variable. Como veis, yo soy más simplón en la creación de código, voy más paso a paso

Gracias por el aporte