Visual Basic - DataReport encabezado grupo sin el dataenvironment

' 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 el origen
de datos"

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