Lovera, veja se algum dos exemplos ajudam, é só fazer as adaptações:

Questionario é possivel ??
viewtopic.php?f=10&t=3093&p=14026&hilit=checkbox#p14026

CAIXA DE SELEÇÃO
viewtopic.php?f=23&t=2702&p=12044&hilit=checkbox#p12044

[]s

Mauro, boa tarde.

O 1º pelo que entendi conseguiram resolver sem o uso de VBA. Não consegui adaptar nada.
O 2º me ajudou a vincular a Cheeckboxes.

Cheguei a seguinte situação e olha que venho apanhando mesmo nesses dias.

Para acrescentar a Checkboxes automaticamente pelo VBA utilizei o seguinte:

Sub Selecao()
Dim cell As Range

For Each cell In Range("E5:E100")
With ActiveSheet.CheckBoxes.Add(cell.Left, _
cell.Top, cell.Width, cell.Height)
.LinkedCell = cell.Offset(, 1).Address(External:=True)
.Caption = ""

End With
Next

With Range("E5:E100")
.Rows.RowHeight = 15
End With
End Sub

Ele preenche celula por celula com uma cheekbox indo da linha 5 até a 100 da coluna E.

1.O que posso colocar para que ele entenda a coluna inteira a partir da linha 5? Eu coloquei o intervalo máximo do Excel de da linha 5 até a 65536 e o meu pc travou bonito! Hehe!

2. Ainda não consegui condicionar essas checkboxes a partir da coluna B da linha 5 em diante. Se a linha da coluna B estiver preenchida, então inserir a checkbox na coluna E. Alguma dica?

Lovera, não sei se compreendi corretamente, então criei um exemplo basico, veja se é isto :

Adicionar CheckBox conforme celulas preenchidas.

Qualquer duvida retorne.

[]s

Maurão com todo respeito "Tu é foda mermão!"
Obrigado!

Agora estou empacado com a parada de transferir aquilo que foi selecionado ao clicar na checkbox para outra planilha. Cheguei na seguinte situação e preciso de alguma correção no meu codigo para que aquilo que desejo copiar apareça a partir da linha 12 da outra planilha. O codigo que fiz copia a partir da mesma linha.

Agradeço a ajuda.

Sub selecionadosdia()

Sheets(2).Cells.Clear
For Each coche In ActiveSheet.Shapes
If coche.Name Like "Check*" Then
If coche.ControlFormat.Value = 1 Then
Range("A" & coche.TopLeftCell.Row).Copy Sheets(2).Range("C" & coche.TopLeftCell.Row)
Range("B" & coche.TopLeftCell.Row).Copy Sheets(2).Range("D" & coche.TopLeftCell.Row)
Range("C" & coche.TopLeftCell.Row).Copy Sheets(2).Range("E" & coche.TopLeftCell.Row)
End If
End If
Next
Sheets(2).Select
End Sub

Consegui depois de um tempo.

Obrigado

alguém poderia me enviar o arquivo checbox.rar pois estou tentando baixar mas so da arquivo corrompido.

Se ninguem tiver uma cópia, mais tarde verifico em casa se ainda tenho e atualizo