Bonjour, lors d'u export vers excel 2007 toutes mes données sont précédées d'un "'".

Voici mon code de connection :
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim Cn As ADODB.Connection
Dim Cd As ADODB.Command
Dim Rst As ADODB.Recordset
Dim Fichier As String


Cn = New ADODB.Connection
Cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & Fichier & ";" & _
"Extended Properties=""Excel 8.0;HDR=No;"";")

Cd = New ADODB.Command
Cd.ActiveConnection = Cn


Cd.CommandText = "SELECT * FROM " & "[" & liaison & "$" & mar2 & "]"

Rst = New ADODB.Recordset
Rst.Open(Cd, , CursorTypeEnum.adOpenKeyset, LockTypeEnum.adLockOptimistic)

Rst(0).Value = "texte1"

Rst.Update()

Cn.Close()
Cn = Nothing
Cd = Nothing
Rst = Nothing

''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''

Résultat dans mon fichier excel: 'texte1

Pouvez-vous m'aider?

Si j'utilise une connection avec createobject........., je n'ai pas ce probleme mais c'est beaucoup plus long


Merci d'avance