Addition vba impossible

[kalmia]

bonjour,

J'ai un soucis avec des données dates qui ne sont pas vraiment reconnues comme des dates.
Je rencontre parfois ce type de problème selon la façon dont je récupère les données et le contourne en multipliant par 1 ou additionnant par 0
ici, impossible de faire bouger les dates (elles restent tjs collées à gauche et restent inutisables) alors que l'opération marche très bien en faisant l'opération à la main : CE QUE JE NE COMPRENDS PAS DU TOUT??

J'ai donc besoin de votre aide car c'est trop fort pour moi :
Il faut en vba faire bouger le contenu de ces satanées dates pour que je puisse les exploiter par la suite (mais que les dates car il y a des données numériques avec des vides qu'il faut garder - sont remplacés par des 0 sinon-)
Je pensais chercher les cellules contenant un "/" et opérer une opération -que je n'arrive pas faire - pour valider ces cellules en format date ou numérique je m'en arrangerai après...

Comment faire?

Merci pour votre aide

 

[pierrejean]

Re : Addition vba impossible

Bonjour kalmia

teste ceci

Sub test()
For n = 1 To Range("A65536").End(xlUp).Row
 If IsDate(Range("A" & n)) Then Range("A" & n) = CDate(Range("A" & n))
Next n
End Sub

 

[kalmia]

Re : Addition vba impossible

Incroyable!

Quelle aide fulgurante!!

merci bcp PierrejEAN