Problème d'incrémentation

Bonjour,
j'ai créer mon fichier a partir d'une base, j'ai une feuille avec une validation de données saisie manuellement et en cliquant sur un bouton de commande.
Quand je ckick sur le enregistrer, la validation des données se fait dans ma base de données, par contre le problème est que la donnée antérieur est effacée alors que j'ai besoin de celle-ci.
pouvez vous me dire pourquoi n'est elle pas à la suite de l'autre.
Merci d'avance

1 réponse

  1. Bonjour,

    Nous n'avons pas de boule de cristal,
    sans le code et / ou sans le fichier,
    les réponses seraient hypothétiques !
    0
    1. je suis novice et je n'ai fait que reprendre un fichier que l'on m'à créer et je ne sais pas pourquoi je n'arrive plus à alimenter le fichier de recap
      merci à tous
      et si quelqu'un peut m'expliquer comment le fichier à été créer je l'en remercie d'avance
      0
    2. Bonjour,

      Il manque la 3ème ligne de code dans Private Sub btEnregistrer1_Click() :
        With Sheets(nomFR)
          .Cells(liFR, 1).Value = Range(nom1).Value
          .Cells(liFR, 2).FormulaLocal = "=GAUCHE(A" & liFR & ";6)"
          .Cells(liFR, 3).Value = Range(ndp1).Value
      
      Ajoutes la !

      Cordialement
      Patrice
      0
    3. @Patrice33740Merci
      Super ca marche c'est surtout la ligne 2 qui faisait défaut car j'avais une formule que le VB ne prenait pas.
      Merci encore
      0