J'ai une macro qui agrege via ADO des classeurs fermes.
Le porbleme c'est que mes champs dates sont precedes d'un ' à l'agregation si un champ sur une des lignes du dessus n'est pas rempli sur le fichier à copier.
Du coup mon champ n'est plus considere comme un champ date...
J'ai trouve ca pour supprimer ces ' :
Code:
For Each cell In ActiveSheet.UsedRange
If cell.PrefixCharacter <> "" Then
cell.Formula = cell.Formula
End If
Next cell
Le probleme c'est que maintenant la prise en compte du nouveau format en date est aleatoire, certaines cellules sajustent automatiquement d'autres doivente etre cliquees pour cela (completement nimp).
Quelqu'un sait comment resoudre ce probleme par Macro ?
Une piste
Tester avec Isdate pour savoir si le texte est une date et ensuite appliquer le format date en utilsant .NumberFormat="dd/mm/yyyy;@" ou autre.