How to format a Spreadsheet control 9.0 at userform init?

[vicber]

Good day all,

I have this :

Dim R As Integer, C As Integer
With Spreadsheet1
For R = 1 To 30
For C = 1 To 10
.Cells(R, C).Value = Worksheets("PendingNO").Cells(R, C).Text
.Cells(1, C).Font.Bold = True ' Bold row 1
.Cells.AutoFitColumns ' obvious
.Cells.HAlignment = 2 ' center text in all cells
.Cells(1, 1).Select
Next C
Next R

@ the UserForm_Initialize sub
It does work well, but I want now to get spreadsheet1.[E1:I1] merged

I tried
Me.Spreadsheet1.Range("E1:I1").Select
Selection.Merge

I tried to
Dim SPM as Range
set SPM = [E1:I1] (as well as Me.Spreadsheet1. etc...)
SPM.Select
Selection.Merge

I tried
.cells(1,[6:10]).Select
Selection.Merge

no way!!!!!

I tried to record a macro to capture the steps generated with the PropertyToolBox (where we can merge a selection in the spreadsheet),but it
does not capture it

I'm lost here! can anyone help?

Thanks
Bernard