如何使用 Visual Basic NET 向 Excel 工作簿传输数据

发布网友 发布时间：2022-04-24 04:51

我来回答

共1个回答

热心网友 时间：2023-11-20 20:44

通过Cells集合引用

例如Cells(i,j)就表示第i行、第j列处的单元格，i、j都是整数。
如果没有指定具体的行号和列号，那么就代表引用整个工作表。如，Rg = Ws.Cells。
如果需要 按位置循环引用单元格区域的各个单元格，那么使用Cells属性是最方便的，例如下面的代码就是将第5-10行、6-20列的所有单元格内容替换为"abc"：

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range
For i As Integer = 5 To 10
For j As Integer = 6 To 20
Rg = Ws.Cells(i,j)
Rg.Value = "abc"
Next
Next
App.Visible = True

热心网友 时间：2023-10-29 19:47

通过Cells集合引用

例如Cells(i,j)就表示第i行、第j列处的单元格，i、j都是整数。
如果没有指定具体的行号和列号，那么就代表引用整个工作表。如，Rg = Ws.Cells。
如果需要 按位置循环引用单元格区域的各个单元格，那么使用Cells属性是最方便的，例如下面的代码就是将第5-10行、6-20列的所有单元格内容替换为"abc"：

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range
For i As Integer = 5 To 10
For j As Integer = 6 To 20
Rg = Ws.Cells(i,j)
Rg.Value = "abc"
Next
Next
App.Visible = True

热心网友 时间：2023-10-29 19:47

通过Cells集合引用

例如Cells(i,j)就表示第i行、第j列处的单元格，i、j都是整数。
如果没有指定具体的行号和列号，那么就代表引用整个工作表。如，Rg = Ws.Cells。
如果需要 按位置循环引用单元格区域的各个单元格，那么使用Cells属性是最方便的，例如下面的代码就是将第5-10行、6-20列的所有单元格内容替换为"abc"：

Dim App As New MSExcel.Application
Dim Wb As MSExcel.WorkBook = App.WorkBooks.Open("D:\Report.xls")
Dim Ws As MSExcel.WorkSheet = Wb.WorkSheets(1)
Dim Rg As MSExcel.Range
For i As Integer = 5 To 10
For j As Integer = 6 To 20
Rg = Ws.Cells(i,j)
Rg.Value = "abc"
Next
Next
App.Visible = True