Visual Basic et excel

Comments je peux fusionner les cellules Excel à partir de mon application VB 6?

Code:

---

1 2 3 4 5

Dim DocExcel As Excel.Application ... ... ... DocExcel.Range("A1:G1").MergeCells = True

---