bonjour ,
voici mon code

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
str = "select email_Tiers from ADHERENT where matricule_Tiers = '" & collec(cpt).mattiers & "' and email_Tiers is not null"
         Set sql = CurrentDb().OpenRecordset(str)
         If sql.RecordCount = 0 Then
            MsgBox "Pas d'email pour l'adhérent :" & collec(cpt).mattiers
        Else
            MsgBox sql!email_Tiers
           collec(cpt).mail = sql!email_Tiers
        End If
        sql.Close
        Set sql = Nothing
Dans la classe qui définit l'objet collec(cpt) ( collec étant une collection d'objet) la variable mail est bien de type hyperlink et dans ma table ADHERENT email_Tiers est bien de type lien hypertexte

Pourtant à l'execution de mon code j'ai l'erreur 91 qui s'active et la ligne

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
collec(cpt).mail = sql!email_Tiers
est surligné en jaune

et la msgbox affiche @#mailto:@#

Quelqu'un a til une idée sur une solution au problème ??

merci d'avance et bonne journée