VB.NET复制Excel范围

我已使用下面的代码复制excel范围

oSheetDestination.Range（“A1:A10”）.Value=oSheetSource.Range（“A1:A10”）.Value

但我想使用如下方式复制基于单元格编号位置的范围：

oSheetDestination.Range("1,1:1,10").Value = oSheetSource.Range("1,1:1,10").Value

你知道我该怎么做吗

---

谢谢，

我想你要找的是

单元格

属性。从这里开始，您最好的选择是执行

调整大小

oSheetDestination.Cells(1,1).resize(1,10).Value = _
     oSheetSource.Cells(1,1).resize(1,10).Value

---

我认为您正在寻找的是

单元格

属性。从这里开始，您最好的选择是执行

调整大小

oSheetDestination.Cells(1,1).resize(1,10).Value = _
     oSheetSource.Cells(1,1).resize(1,10).Value

---

我认为您正在寻找的是

单元格

属性。从这里开始，您最好的选择是执行

调整大小

oSheetDestination.Cells(1,1).resize(1,10).Value = _
     oSheetSource.Cells(1,1).resize(1,10).Value

---

我认为您正在寻找的是

单元格

属性。从这里开始，您最好的选择是执行

调整大小

oSheetDestination.Cells(1,1).resize(1,10).Value = _
     oSheetSource.Cells(1,1).resize(1,10).Value

试试看：

Friend Shared Sub TestRangeCells(myworksheet As Worksheet)
Dim myrange As Range = myworksheet.Range(worksheet.Cells(1, 1), myworksheet.Cells(5, 10))
MessageBox.Show(myrange.Address)
End Sub

试试看：

Friend Shared Sub TestRangeCells(myworksheet As Worksheet)
Dim myrange As Range = myworksheet.Range(worksheet.Cells(1, 1), myworksheet.Cells(5, 10))
MessageBox.Show(myrange.Address)
End Sub

试试看：

Friend Shared Sub TestRangeCells(myworksheet As Worksheet)
Dim myrange As Range = myworksheet.Range(worksheet.Cells(1, 1), myworksheet.Cells(5, 10))
MessageBox.Show(myrange.Address)
End Sub

试试看：

Friend Shared Sub TestRangeCells(myworksheet As Worksheet)
Dim myrange As Range = myworksheet.Range(worksheet.Cells(1, 1), myworksheet.Cells(5, 10))
MessageBox.Show(myrange.Address)
End Sub

---

虽然这可以回答问题，但在答案中加入一些文字来解释你在做什么总是一个好主意。我当时很忙，如果他不明白，我就给他们举个完整的例子。。但首先我认为是个人努力尝试和理解……虽然这可能回答了这个问题，但在你的答案中加入一些文字来解释你在做什么总是一个好主意。我当时很忙，如果他不明白，我就给他们举个完整的例子。。但首先我认为是个人努力尝试和理解……虽然这可能回答了这个问题，但在你的答案中加入一些文字来解释你在做什么总是一个好主意。我当时很忙，如果他不明白，我就给他们举个完整的例子。。但首先我认为是个人努力尝试和理解……虽然这可能回答了这个问题，但在你的答案中加入一些文字来解释你在做什么总是一个好主意。我当时很忙，如果他不明白，我就给他们举个完整的例子。。但首先我认为是个人努力去尝试和理解。。