Как обьеденить ячейки Excel из VB ?

Формулировка задачи:

Всем здравствуйте !!!
Есть шаблон готовый в Excel.
Туда експортирую данные с Грида.
Нужно в конце отчета обьеденить несколько ячеек.
Каким способом можно это сделать средствами VB ???
Спасибо.

ex_Click()
 n  , n1  
 i  
 Dat   , Ret  , Er  
 Rut  
 objExcel  Excel.Application

 objExcel =  Excel.Application
   
MousePointer = vbHourglass
objExcel.Workbooks. ()

n1 =  
 i =   VSFlexGrid1.Rows - 
n1 = n1 + 
 n =   
objExcel.Cells(n1, n).Value = VSFlexGrid1.Cell(flexcpText, i, n - )
 n
 i

objExcel.Cells(n1 + , ).
objExcel.Selection.Font.Bold = True
objExcel.Cells(n1 + , ) = 

 MousePointer = vbDefault
 objExcel.Visible = True
  objExcel = 

MousePointer = vbDefault
:
MsgBox ( & Err.Description)

 

Решение задачи: «Как обьеденить ячейки Excel из VB ?»

textual
                            Листинг программы 
                        
                            objExcel.Range(<font color="teal">"A1"</font>).<font color="blue">Select</font>    <font color="#00AA00">'отметить</font>
objExcel.Selection.Merge       'обьеденить