Userform VBA - rappel de ligne et gestion BDD

Résolu
Bonjour,

J'ai un gros probleme sur Excel,

J'ai 2 Userform, le 1er "formulaire" qui marche très bien, et le 2eme "Budget" qui ne fonctionne pas...
Pourtant les 2 Userform ont la meme logique...
Le 1er a été fait par un membre du forum, j'ai essayé de reprendre son code en l'adaptant mais rien n'y fait...

Quelqu'un serait me dire ou est le probleme...

En vous remerciant :)

Voila le doc:
https://www.cjoint.com/c/FDeow5YRWHC

3 réponses

  1. Bonjour,

    Vous avez deux fois

    Private Sub UserForm_Initialize()


    !!!!!!!!!!!!!!!!!!!!!!
    0
    1. Je dois tout mettre dans le meme code pour mes 2 userform??
      0
    2. Contributeur
      Teddyygalère ne tolère pas que je ne lui réponde pas tout de suite

      donc,

      Teddygalère----> blacklist
      0
    3. Non non pas du tout Michel...

      Je demandai juste autre part pour avoir plus de visibilité...

      Puis tu as peut être autre chose à faire

      Comme j'avais marqué le sujet en résolu, je ne savais pas si tu allais recevoir la réponse!
      0
    4. @TeddyGalereRe,

      Par UF vous ne devez avoir qu'un seul evenement
      Private Sub UserForm_Initialize()


      dans votre code UF Budget y en a deux
      0
    5. Ah oui exact...
      Merci beaucoup :)
      0
  2. Bonjour,

    on m'affiche "incompatibilité de données" Vos textboxs sont renseignees ou vides ??
    0
    1. Bonjour,
      En effet c'est quand elles sont vide...
      Mais le but est justement de pouvoir remplir l'userform en plusieurs fois...
      Comment faire pour que le message d'erreur n'apparaisse pas lorsque les textbox sont vide?
      0
    2. @TeddyGalereRe,

      Vous devez tester si ces textboxs ne sont pas vide pour faire ces operations, parce que un vide + un vide ok ca passe mais un vide * par un vide: non

      je n'arrive pas a faire marcher le code de michel... Vous pouvez me raffraichir la memoire, ou est ce code ??
      0
    3. ce code est dans l'userform "Budget".

      Donc en gros je devrai faire un truc du genre:
      If TextBox_nbp =""And TextBox_nbp="" Then
      Sheets("Saisie budgétaire").Cells(36, 3) =""
      Else Sheets("Saisie budgétaire").Cells(36, 3) = TextBox_nbp * TextBox_nbj
      0
    4. @TeddyGalereRe,

      je devrai faire un truc du genre: Oui

      ce code est dans l'userform "Budget". Tout a fait Thierry, mais plus precisement !!!!!!!!!!!!!!!!!!!!!!
      0
  3. Re,

    Prendre la premiere ligne libre d'un onglet pour ecrire dans un autre, n'est-ce pas la le probleme ???????????????????????

    With Sheets("suivi budgétaire")
    n_ligne = Sheets("Recap").Range("a50000").End(xlUp).Row + 1
    .Cells(n_ligne, 1) = ComboBox_nom
    0
    1. et du coup quand j'appuie sur valider, il faudrait également que je puisse faire un copier-coller valeur de ma cellule
      Sheets("Saisie budgétaire").Cells(40, 4)
      dans la cellule
      Sheets("suivi budgétaire").Cells(n_ligne,4)
      0
    2. @TeddyGalereRe,

      Vous pouvez me la refaire, car actuellement votre code ne fait pas ca du tout !!!!!!
      onglet Suivi budgétaire
      Qu'est-ce que ce tableau A3:AF3 qui fout la zone ???
      0
    3. Normal que le code ne le fasse pas du tout pour le moment...
      Je ne l'ai pas encore codé :)

      le tableau A3:AF3, a pour vocation a etre caché...
      cette ligne me permet juste de copié la mise en formue et les calculs à toutes les lignes qui viendront se greffer en dessous...

      Je ne sais pas par quel miracle mais finalement tout a l'air de marché après quelques modifs....
      Il ne me reste reste plus que la formule pour faire du copier-coller valeur et tout devrait être parfait...
      Jusqu' a ce qu'on me réclame une nouvelle mise a jour et de nouvelles fonctionnalités
      (Vive l’absence de cahier des charges fixes)
      0