Visual Basic - DataReport encabezado grupo sin el dataenvironment

Como se agrega un encabezado de grupo en un datareport?
Cuando lo pongo y le pongo dentro de el un campo, al ejecutar me da el siguiente error:
"Secciones del informe no coinciden con el origen de datos"
Como tengo que diseñar el encabezado de grupo?

Nota: Los campos que tengo en Detalle se me muestran perfectamente.

' Abro la base de datos COMPANIA para saber la ubicacion del directorio de trabajo
Compania.Conexion.Open
Dim RstCompania As ADODB.Recordset
Set RstCompania = Compania.Conexion.Execute("SELECT * FROM Compania")
nCRutaDat = RstCompania!CRutaDat
Compania.Conexion.Close

' Ya sabiendo el directorio de trabajo, procedemos a abrir la base de datos
Set SiExport = New ADODB.Connection
SiExport.Provider = "Microsoft.Jet.OLEDB.4.0"
SiExport.ConnectionString = "User ID=Admin;Data Source=" & nCRutaDat & "SiExport.mdb"
SiExport.Open

ahora quiero hacer un datareport con la base de datos abierta sin un dataenvironment..

Private Sub Imprimir_Click()
Dim RstFacturas As ADODB.Recordset
Set RstFacturas = New ADODB.Recordset
Set RstFacturas = SiExport.Execute("Select Efact.IdFolio, MovFact.IdProducto From Efact, MovFact where MovFact.IdFolio = EFact.IdFolio")
Set DataReport4.DataSource = RstFacturas
DataReport4.Show
End Sub

hasta ahora todo esta bien ya que en el diseño de mi datareport lo unico que le pongo en
el datafield = IDFOLIO y asi por cada campo que quiero que aparezca y funciona

lo malo es que cuando le agrego un encabezado de grupo todo sale mal y no me reconoce
mi recordset, me sale este error "las secciones del informe no coenciden con e