VSTO中如何使用Range对象？

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

楼主 wise	Q:VSTO中如何使用Range对象？ A：与VBA比较类似，但必须要注意其选定的工作表，其实例代码如下： Private Sub ThisWorkbook_Startup() Handles Me.Startup With Globals.ThisWorkbook.Sheets("Sheet1") Dim rng1 As Excel.Range = .range("A1") rng1.Value = "A" '给单元格赋值 Dim rng2 As Excel.Range = .range("B2:C3") rng2.Value = "B" '给单元格区域赋值 Dim rng3 As Excel.Range = .Range("D1,D4,D6") rng3.Value = "C" '给不连续的单元格区域赋予值 Dim rng4 As Excel.Range = .range("E1:E3 E2:E10") rng4.Value = "D" Dim rng5 As Excel.Range = .range("F1", "E19") '给单元格区域赋予值 rng5.Value = "E" Dim rng6 As Excel.Range = .rows.item(7) rng6.Value = "F" '给行赋予值 Dim rng7 As Excel.Range = .columns.item(8) rng7.Value = "G" '给列赋予值 End With End Sub
2楼亡者天下	感觉好复杂啊！
3楼纵鹤擒龙水中月	谢谢！学习一下，这东东我也试过，但明明一样的代码，就是不行
4楼 chenguanghui	vsto 什么意思
5楼刘浩	visual studio tools for office

免责声明

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

评论列表