Bienvenue! Identification Créer un nouveau profil

Recherche avancée

résultat de fonction incohérent

21/10/14 11:55
Bonjour,

j'ai ecrit cette fonction que me permet de convertir un champs de type AAAAMMJJ en date

mais le resultat est null. je n'arrive pas a voir ce qui coince, avez vous une idée?

Merci d'avance

Bien cordialement,
A.

Langage: Visual Basic
Function CalculDate(DateOrigine As String)   'Les formats des dates du PVE est de type AAAAMMJJ le but de la fonction est de la convertire en date Dim DateConv As Date If Val(Left(DateOrigine, 2)) = 0 Then DateConv = 0 Else DateConv = Right(DateOrigine, 2) & "/" & Mid(DateOrigine, 5, 2) & "/" & Left(DateOrigine, 4) End If   End Function



Modifié 1 fois. Dernière modification le 21/10/14 11:55 par gabrieel.
SujetAuteurEnvoyé le

résultat de fonction incohérent

gabrieel21/10/14 11:55

Re: résultat de fonction incohérent

Hervé Inisan21/10/14 12:38

Re: résultat de fonction incohérent

gabrieel21/10/14 14:33

Re: résultat de fonction incohérent

Hervé Inisan21/10/14 15:31

Seuls les utilisateurs enregistrés peuvent poster des messages dans ce forum.

Cliquez ici pour vous connecter