Probléme calcul suite scanne code barre intégré dans une formule

Pour remplir un tableau de suivi je scanne un code barre (une date) sous excel, impossible de changer format de la cellule et comme j'utilise cette date dans une formule je ne peux pas analyser les données du tableau.

Cordialement.

7 réponses

  1. Bonjour

    Comment est affichée votre date dans la cellule sur Excel ?
    En texte 25/12/2014 en nombre 41998 ou au format date 25/12/2014
    Si vous ne pouvez pas l'utiliser il doit être en texte
    Il y a peut être des espaces en début et fin de date
    Utiliser la fonction =SUPPRESPACE(cellule contenant la date)
    0
    1. la cellule est sous ce format 11 DEC 2014 alors que je voudrais 11/12/2014.

      Cordialement.
      0
      1. Bonjour
        donne un modele avec tous les mois car la dans ton cas il faut faire une macro

        A+

        Maurice
        0
        1. Bonjour,

          Il te suffit de mettre -- devant l'appel de ta date dans ta formule.

          Ça te transformera automatiquement ta date (qui doit être en format texte) dans le format numérique kivabien.

          Tu peux aussi remplacer les -- par 1*

          Sinon, quand tu passes en format date dans ta cellule qui contient "11 DEC 2014" et que tu la revalides, la cellule ne passe-t-elle pas en format date?

          cdlt
          0
          1. Bonjour

            Utiliser la formule pour convertir la date

            =GAUCHE($A$1;2)&"/"&RECHERCHEV(DROITE(GAUCHE($A$1;6);3);J1:K12;2;FAUX)&"/"&2000+DROITE($A$1;2)

            Il vous faut une liste des mois abrégés pour la rechercheV dans mon exemple de J1 à K12
            J1 =Jan K1=1
            J2 =Fev K2=2 ainsi de suite
            0
            1. Bonjour,
              voici l'image du fichier , les dates qui me pose problème sont en jaune

              Cordialement.

              0
              1. Bonjour

                je peux pas faire gran chose avec un Image

                bon voila du code et a toi de faire les modif

                Sub TestDate()
                   Mdate = Replace(Range("A" & L).Value, "DEC", "Déc")
                   Range("A" & L).Value = DateValue(Mdate)
                   Range("A" & L).NumberFormat = "m/d/yyyy"
                End Sub
                

                A+
                Maurice
                0