Código:
Public Sub cabeceraEmpresa(informe As String, seccion As String)
El error está en que estás pidiendo un parámetro de tipo texto. En vez de eso debería ser un Object o directamente un DataReport. Así:
Código:
Public Sub cabeceraEmpresa(informe As Object, seccion As String)