Vincular una selección de casillas de verificación a celdas de otra columna en las mismas filas
Publicado por Inma Gonzalez (1 intervención) el 13/04/2023 14:21:59
Tengo varias hojas excel con una columna A con casillas de verificación, algunas de las cuales tiene un valor en otra columna B y otras no tienen valor. Quiero vincular todas las casillas de verificación a otras celdas en otra columna C, pero solo las que tienen valor en B.
He encontrado este código VBA, pero no me sirve, pues vincula todas las casillas de todas las filas.
Sub LinkChecks()
'Update by Extendoffice
Dim xCB
Dim xCChar
i = 2
xCChar = "B"
For Each xCB In ActiveSheet.CheckBoxes
If xCB.Value = 1 Then
Cells(i, xCChar).Value = True
Else
Cells(i, xCChar).Value = False
End If
xCB.LinkedCell = Cells(i, xCChar).Address
i = i + 1
Next xCB
End Sub
He encontrado este código VBA, pero no me sirve, pues vincula todas las casillas de todas las filas.
Sub LinkChecks()
'Update by Extendoffice
Dim xCB
Dim xCChar
i = 2
xCChar = "B"
For Each xCB In ActiveSheet.CheckBoxes
If xCB.Value = 1 Then
Cells(i, xCChar).Value = True
Else
Cells(i, xCChar).Value = False
End If
xCB.LinkedCell = Cells(i, xCChar).Address
i = i + 1
Next xCB
End Sub
Valora esta pregunta


0