2010-05-13 2 views
2

Как объединить ячейки с использованием Cell и не Range в vb.netMerge Cell в Excel

Попробую этот код, но он не работает

excelSheet.Cells(1, 10).Merge() 

Может кто-нибудь мне помочь ..

ответ

17

Свойство ячеек рабочего листа относится к одной ячейке. Таким образом, вы пытаетесь объединить только ячейку на A10. Как его уже одна ячейка, это ничего не делает. Я не уверен, что вы можете сделать это только с помощью свойства Cells, поскольку оно всегда будет только одной ячейкой. Почему вы избегаете Range?

Это использует диапазон, но будет по-прежнему использовать свойство клеток для целевого ограничения диапазона

excelSheet.Range(excelSheet.Cells(1, 1),excelSheet.Cells(1, 10)).Merge 

Кроме того, я думаю, что команда Merge, не Merge(), по крайней мере, когда я запускаю его.

Извините, если это не поможет, сообщите нам более подробную информацию, и я буду выглядеть сложнее, если это не сработает для вас.

+0

Оо !! Спасибо goggin .. Это работает !! :) – Mark

+6

Это тот момент, когда вы нажимаете «ЗЕЛЕНУЮ ИККУНУЮ ИККУНУЮ ИКОНУ» и отдавайте вкладчикам. – Andrew

0

Другое решение - исправить их значениями

ActiveCell.Value = Range("G8") & Range("H8") 
0

Попробуйте это. Он может использоваться только для диапазона. Я не знаю, как объединить ячейки.

Dim xlsApp As New Excel.Application 
xlsApp .Visible = True 
Dim xlsWorkbook As Excel.Workbook = xlsApp.Workbooks.Open("..\TestWorkbook.xls") 
Dim xlsWorkSheet As Excel.Worksheet = DirectCast(xlsWorkbook.Worksheets("Sheet1"), Excel.Worksheet) 
xlsWorkSheet.Range("A1:D1").MergeCells = True 

Не забывайте импортировать необходимые библиотеки.