Userform VBA - rappel de ligne et gestion BDD

Résolu
TeddyGalere Messages postés 77 Statut Membre -  
TeddyGalere Messages postés 77 Statut Membre -
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.
    f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    Vous avez deux fois 

    Private Sub UserForm_Initialize()


    !!!!!!!!!!!!!!!!!!!!!!
    0
    1. TeddyGalere Messages postés 77 Statut Membre
       
      Je dois tout mettre dans le meme code pour mes 2 userform??
      0
    2. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
       
      Teddyygalère ne tolère pas que je ne lui réponde pas tout de suite

      donc,

      Teddygalère----> blacklist
      0
    3. TeddyGalere Messages postés 77 Statut Membre
       
      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. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > TeddyGalere Messages postés 77 Statut Membre
       
      Re,

      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. TeddyGalere Messages postés 77 Statut Membre
       
      Ah oui exact...
      Merci beaucoup :)
      0
  2. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    Bonjour,

    on m'affiche "incompatibilité de données" Vos textboxs sont renseignees ou vides ??
    0
    1. TeddyGalere Messages postés 77 Statut Membre
       
      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
      1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > TeddyGalere Messages postés 77 Statut Membre
         
        Re,

        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
    2. TeddyGalere Messages postés 77 Statut Membre
       
      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
      1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > TeddyGalere Messages postés 77 Statut Membre
         
        Re,

        je devrai faire un truc du genre: Oui

        ce code est dans l'userform "Budget". Tout a fait Thierry, mais plus precisement !!!!!!!!!!!!!!!!!!!!!!
        0
  3. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717
     
    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. TeddyGalere Messages postés 77 Statut Membre
       
      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
      1. f894009 Messages postés 17417 Date d'inscription   Statut Membre Dernière intervention   1 717 > TeddyGalere Messages postés 77 Statut Membre
         
        Re,

        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
    2. TeddyGalere Messages postés 77 Statut Membre
       
      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

Discussions similaires

Actif ou en ligne.
Belette54 -
Belette54 -

2 réponses
Mots de passe Google divulgués en ligne
Guiem -
Jean20B -

1 réponse
Statut « en ligne » alors que non
GgBono -
Slickk -

1 réponse