2015-03-18 7 views
0

Я воспользовался приведенным ниже кодом, чтобы скопировать диапазон excel.VB.NET Копирование диапазона 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 

Любые идеи, как я могу сделать это?

Спасибо,

ответ

2

Я думаю, что вы ищете является Cells собственности. Оттуда, лучше всего это делать resize

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

попробовать:

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 
+0

Хотя это может ответить на этот вопрос, это всегда хорошая идея, чтобы поставить некоторые текст в ответ объяснить, что вы» сделав. Прочитайте [как написать хороший ответ] (http://stackoverflow.com/help/how-to-answer). – jurgemaister

+0

Я очень торопился, если он не понял, я дам им полный пример. Но сначала я думаю, что это личное усилие, чтобы попытаться понять. – CristiC777

Смежные вопросы