Cosi'
Private Function MiaFunc(ByValr MiaCN as ADODB.Connection.....)
SI'

..ma cosi'
MiaFunction(Dim MiaCn as ADODB.Connection)
no
Cmq l'importante e' aver risolto il problema
Ciao.