Userform VBA - rappel de ligne et gestion BDD

Résolu/Fermé

TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016 - 5 avril 2016 à 09:52
TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016 - 7 avril 2016 à 16:59

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

A voir également:

Userform VBA - rappel de ligne et gestion BDD
Site de vente en ligne particulier - Guide
Partage de photos en ligne - Guide
Aller à la ligne excel - Guide
Apparaitre hors ligne instagram - Guide
Gps hors ligne - Guide

3 réponses

Réponse 1 / 3

f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
5 avril 2016 à 10:07

Bonjour,

Vous avez deux fois

Private Sub UserForm_Initialize()

!!!!!!!!!!!!!!!!!!!!!!

TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016
5 avril 2016 à 10:44

Je dois tout mettre dans le meme code pour mes 2 userform??

michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 3 310
Modifié par michel_m le 5/04/2016 à 10:55

Teddyygalère ne tolère pas que je ne lui réponde pas tout de suite

donc,

Teddygalère----> blacklist

TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016
5 avril 2016 à 10:58

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!

f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709 > TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016
5 avril 2016 à 11:27

Re,

Par UF vous ne devez avoir qu'un seul evenement

Private Sub UserForm_Initialize()

dans votre code UF Budget y en a deux

TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016
6 avril 2016 à 11:13

Ah oui exact...
Merci beaucoup :)

Réponse 2 / 3

f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
7 avril 2016 à 13:21

Bonjour,

on m'affiche "incompatibilité de données" Vos textboxs sont renseignees ou vides ??

TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016
7 avril 2016 à 13:27

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?

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 ??

TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016
7 avril 2016 à 14:50

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

Re,

je devrai faire un truc du genre: Oui

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

Réponse 3 / 3

f894009 Messages postés 17205 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 19 octobre 2024 1 709
7 avril 2016 à 15:09

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

TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016
7 avril 2016 à 15:13

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)

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 ???

TeddyGalere Messages postés 75 Date d'inscription vendredi 11 mars 2016 Statut Membre Dernière intervention 27 mai 2016
7 avril 2016 à 16:59

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)

Discussions similaires

Que veut dire "correspondant occupé" lors d'un appel ?

Erreur d'exécution 13 Incompatibilité de type

Ligne occupée : pourquoi mon téléphone sonne occupé ?

On me voit connecté sur facebook alors que je n'y suis pas