This is even more weird! I just found out that the error was given if the FIRST field was empty, so I changed:
strText = RS!CONTENEDOR
with this
strText = "" & RS!CONTENEDOR
Now it works!!!
I'm gonna try to make this module with 3 arguments, TABLE, CONCATENATED FIELD and GROUP BY, actually...