如何制作控件表（Excel VBA）

Question

我希望你在享受你的周末！

我在这里询问是否有办法初始化用户窗体框架内的表格或列表布局。并且，如果可能的话，我是否可以将控件（文本框和标签）放入单元格而不是文本字符串。

提前感谢您的回答/评论。

*编辑：跟进问题。假设在Excel VBA中可以实现上述功能，我是否还可以根据控件的宽度和高度设置表格（只有一列）或列表的尺寸？

Answer 1

您可以嵌入Microsoft Office电子表格。转到工具箱中的其他控件。

您可以像访问Excel工作表一样访问。

  

Spreadsheet1.Range（＆＃34; A1＆＃34）   您还可以使用Private WithEvents来挂钩它的事件。在这里我在Userform中做到了，但是，如果我愿意，我可以从类模块中完成它。

     

Private WithEvents MySpreadsheet1 As OWC11.Spreadsheet

选项明确 Private WithEvents MySpreadsheet1 As OWC11.Spreadsheet

Private Sub UserForm_Initialize（）     设置MySpreadsheet1 = Spreadsheet1 结束子

Private Sub MySpreadsheet1_BeforeContextMenu（ByVal x As Long，ByVal y As Long，ByVal Menu as OWC11.ByRef，ByVal Cancel as OWC11.ByRef）

End Sub

Private Sub Spreadsheet1_BeforeContextMenu（ByVal x As Long，ByVal y As Long，ByVal Menu As OWC11.ByRef，ByVal Cancel as OWC11.ByRef）

End Sub 它没有完整的功能，但你可以做很多。 How To Use the Spreadsheet Web Component with Visual Basic  您可以隐藏列和行，但实际上它太慢了。

Spreadsheet1.Columns("E:ZZZ").EntireColumn.Hidden = True
Spreadsheet1.Rows("10:262144").EntireRow.Hidden = True