Saltar al contenido

Pasar a tabla CheckBox con Caption

publicado

Buenas tardes. Necesito cargar estos CheckBox en una tabla pero solo si están "check". De no ser así la celda debería quedar vacía. Se entiende?

Desde ya muchas gracias por cualquier ayuda o aporte.

         .Cells(NuevaFila, 33).Value = Me.Comp35.Caption
        .Cells(NuevaFila, 34).Value = Me.Comp85.Caption
        .Cells(NuevaFila, 35).Value = Me.Comp205.Caption
        .Cells(NuevaFila, 36).Value = Me.Comp206.Caption
        .Cells(NuevaFila, 37).Value = Me.Comp207.Caption
        .Cells(NuevaFila, 38).Value = Me.Comp329.Caption

Featured Replies

publicado

Buenas, seria algo así:

Range("a1").Value = IIf(Me.CheckBox1.Value, Me.CheckBox1.Caption, "")
Range("a2").Value = IIf(Me.CheckBox2.Value, Me.CheckBox2.Caption, "")

Saludos

publicado
  • Autor

PERFECTO!

Archivado

Este tema está ahora archivado y está cerrado a más respuestas.