如何在VSTO中使用InputBox来选取区域？

作者：绿色风分类：时间：2022-08-18 浏览：125

楼主
wise

Q：如何在VSTO中使用InputBox来选取区域？
A：在VBA中使用InputBox来选取区域很常见，但是在VSTO里面是怎么样的？在本例子中，可以发现其差别并不大。

Private Sub ThisWorkbook_Startup() Handles Me.Startup
Dim MySelection As Excel.Range
'定义一个单元格类型的MySelection 变量
MySelection = Application.InputBox(Prompt:="请选择单元格区域", Title:="随机数", [Default]:=CType(Application.Selection, Excel.Range).Address, Type:=8)
'把InputBox选择的区域值赋予给MySelection,并且其显示的名称是请选择单元格区域，该对话框的Title为随机数，默认显示值为选择单元格区域的地址。
MySelection.Value = "=Rand()"
'赋予该选择区域的值为随机数
MySelection.BorderAround2(Excel.XlLineStyle.xlDouble, Excel.XlBorderWeight.xlMedium, Excel.XlColorIndex.xlColorIndexAutomatic)
'选择的区域边框为双线类型，设置字体为中型字，并设置当前调色板中的索引值
End Sub

2楼
eliane_lei

进来学习！谢谢分享

免责声明

有感于原ExcelTip.Net留存知识的价值及部分知识具有的时间限定性因素，经与ExcelTip.Net站长Apolloh商议并征得其同意，现将原属ExcelTip.Net的知识帖采集资料于本站点进行展示，供有需要的人士查询使用，也慰缅曾经的论坛时代。所示各个帖子的原作者如对版权有异议，可与本人沟通提出，或于本站点留言，我们会尽快处理。在此，感谢ExcelTip.Net站长Apolloh的支持，感谢本站点所有人**绿色风（QQ:79664738)**的支持与奉献，特此鸣谢！
------本人网名**KevinChengCW（QQ:1210618015)**原ExcelTip.Net总版主之一

评论列表