Excel Check Boxes via VBA

I am attempting to add check boxes to a worksheet using VBA. I have a couple of variations of the code, which achieve the same result. While the first few check boxes are aligned within the active cell, after a few rows the check boxes sink lower and lower, eventually appearing in the next row down. How can I resolve this issue.

.CheckBoxes.Add(Left:=.Cells(ToRow, "B").Left, Top:=.Cells(ToRow, "B").Top, Width:=.Cells(ToRow, "B").Width, Height:=.Cells(ToRow, "B").Height).Select

Excel Check Boxes