Checkboxes in Excel

[yogeshCR7]

Hello

I have two workbook PR & DB. I have few checkboxes in PR workbook.

My requirement is whenever a user clicks on any checkbox, the checkbox name should get reflected in workbook DB in a particular column. If the user unticks the checkbox, the value should disappear

I tried the following code but it didnt help
Set targetColumn = ws2.Range("A:A")
For Each checkbox In ws1.CheckBoxes
Dim checkboxName As String
checkboxName = checkbox.Name

Dim emptyCell As Range
Set emptyCell = targetColumn.Cells(targetColumn.Cells.Count).End(xlUp).Offset(1)

Next checkbox

Set targetWorksheet = Nothing
Set sourceWorksheet = Nothing
Set wb1 = Nothing
Set checkbox = Nothing
wb2.Save

 

[Rijnsent]

Hi Yogesh,

What is currently happening? "I tried the following code but it didnt help" -> what does it do? And can you please put it in code brackets so it's easier readable?:

Thanks,
Koen

Set targetColumn = ws2.Range("A:A")
For Each checkbox In ws1.CheckBoxes
Dim checkboxName As String
checkboxName = checkbox.Name

Dim emptyCell As Range
Set emptyCell = targetColumn.Cells(targetColumn.Cells.Count).End(xlUp).Offset(1)

Next checkbox

Set targetWorksheet = Nothing
Set sourceWorksheet = Nothing
Set wb1 = Nothing
Set checkbox = Nothing
wb2.Save