Alors, c'est correct que ta variable soit en string
.
La date saisie dans la cellule, c'est une date ou du texte?
Si c'est une date, tu devras la convertir en texte pour respecter le format de stockage de la date dans la base.
Je suppose que le format de stockage est AAAAMMJJ et que la date saisie en A2 est une date (au sens Excel du terme). Si c'est le cas, tu dois passer la saisie de la cellule à la variable comme ceci
Date1 = format(Sheets("Date").Range("A2").Value,"YYYYMMDD")
et tu peux alors concaténer comme ceci
1 2
| sql = "SELECT DISTINCT publi.publication FROM " & _
"(SELECT ctlo.CODE_ISIN FROM PERF.T_CTL_OPCVM ctlo MINUS SELECT o.CODE_ISIN FROM PERF.T_OPCVM o WHERE o.D_DATE = '" & date1 & "') T1, " & _ |
Partager