Bonjour

Si dans l'exemple suivant, je remplace "a" par Mid(racine,1,1) (par exemple), ça marche, alors que dans le cas présent, ça plante en signalant : Runtime error BASIC. Valeur de propriété incorrecte.

Pour moi, tout devrait être bon, j'avoue que je suis planté !

function conjugue (determinant as string, racine as string,forme as string) as string dim chaine as string dim place as integer

place=InStr(forme,"</i><i>") if determinant="je" then chaine=Mid(racine,1,1) if chaine="a" then ' or c="e" or c="ê" or c="é" or c="è" or c="i" or c="o" or c="u" chaine="j'"