Bonjour cp4.
Merci pour l'aide. Peux tu me dire pourquoi tu me conseilles plutôt d'utiliser le code :
Tfinal(1, j) = Mid(Tsource(i, 13), InStr(Tsource(i, 13), "_") + 1, InStr(Tsource(i, 13), ".") - InStr(Tsource(i, 13), "_") - 1)
Plutôt que celui-ci
Tfinal(1, j) = Replace(Tsource(i, 13), ".spc", " ")
Tfinal(1, j) = Mid(Tfinal(1, j), 22, 17)
Le résultat est le même au final. Merci de m'éclairer et à mieux comprendre VBA