如何在每個行的Excel電子表格中向單元格添加表單控件

Question

我如何在Excel中添加表單控件到單元格，我知道我可以繪制它，但我需要使它成為每一行的成員，並且它的值附加到該單元格/行。

Answer 1

有幾種方法可以做到這一點，但最簡單的，假設Excel 2007是：

Set cb = MyWorkSheet.CheckBoxes.Add(left, top, width, height)
cb.LinkedCell = "$A$1"
cb.Display3DShading = True

您必須對放置進行一些實驗，因為我認為沒有直接的方法將控件與特定單元格對齊。 另一種方法是使用工作表的Shapes集合：

Set shape = MyWorkSheet.Shapes.AddFormControl(xlCheckBox, l, t, w, h)

但是，請記住，上面的方法返回一個Shape對象而不是CheckBox對象，因此您無法直接操作其屬性。 有類似的方法，如使用OLEObjects集合，但這只是增加了更多的痛苦。