'requête permettant de récupérer le nom du schéma
Set Rs = Cnx.Execute("SELECT Link_train_diagram FROM Main_table WHERE project='" & choice_model & "'")
Sheets("search").[C26].CopyFromRecordset Rs
'partie permettant de convertir le nom du schéma en lien hypertexte
Range("C26").Select
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:= _
"Link\ & Range("C26").Value"