Discussion :

[Fred4345]

Bonjour.
Je débute en VBA pour EXCEL.
Je suis sur un problème très complexe pour moi ou j’aurai besoin de votre aide s.v.p..
Je vais tâcher de vous expliquer ce que je souhaite au fur et à mesure, en essayant d’avancer difficulté par difficulté pour bien comprendre.
Tout d’abord, je souhaiterai utiliser un Userform dans une feuille de calcul, qui viendra incrémenter des chiffres qui s’additionneront dans une cellule de tableau dans une autre feuille. Le tout dans le même classeur. Les valeurs seront saisies par l’utilisateur. Le total devra se faire au fur et à mesure en reprenant l’ancienne valeur.
D’avance merci pour votre aide.

[Edaine]

Bonjour !

J'ai démarré y'a peu aussi avec les macros,

et aujourd'hui j'ai fait mon premier userform ! ^^


je me suis servis des tutos qui sont sur developpez et ils sont géniaux

http://silkyroad.developpez.com/VBA/UserForm/
http://silkyroad.developpez.com/VBA/ControlesUserForm/

Ca devrait pouvoir t'aider fortement !

[Fred4345]

Je les connais. Je les ai même imprimés. Mais j'ai beau chercher, je sèche vraiment.
Merci de ton aide

[Edaine]

En faite ton userform,

Il doit juste te servir à rentrer des "nombres" ?


Genre tu rentres un nombre, il se met en cellule A1 puis t'en rentres un autre il se met en A2 ?

[Fred4345]

Désolé de ne pas t’avoir répondu plus tôt.
J’ai réussi à créer l’userform. J’ai donc 2 listbox et un texbox. Un bouton commande pour valider et un autre pour annuler. Mes 2 listbox sont alimentées par des cellules en colonne. Voici ce que je n’arrive pas à faire. Je veux lorsque je choisi un premier critère dans une listbox et un deuxième dans l’autre listbox, à l’intersection des 2 colonnes, à l’aide du textbox je puisse entrer une valeur qui s’incrémentera au fur et à mesure.
Il s’agit de renseigner un tableau en fonction des paramètres choisis dans les listbox.

je joins le fichier pour que tu vois ou je suis bloqué!

[luca.donati]

Bonjour Fred4345. Il me semble qu'il te manque toute une partie, que je commence juste à te suggérer:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub CommandButton_Click()
    calcule
End Sub
 
Sub calcule()
Dim CL As Variant
'1: à travers le croisement de ListBox et ListBox1, déterminer la cellule concernée
'(c'est la partie que je n'ai pas encore étudiée) -> renseigner variable CL
 
'2: récupérer la valeur de la cellule et l'augmenter de la quantité provenant de TextBox;
'essayons sans passer par d'autres variables:
CL.Value = CL.Value + TextBox.Value
End Sub

Sur la partie 2, si elle ne marche pas comme-ça, il faudra récupérer toutes les valeurs dans des variables, les sommer, puis les mettre dans la cellule. On pourrait par ex. utiliser une variable 'Quant As Integer' ou bien '...as Double' si tu veux utiliser des décimaux.
Pour la partie 1, par contre, il faut y réfléchir; par ex. il doit y avoir une fonction "intersection" que j'ai vue un jour et que je ne retrouve plus; on pourrait l'utiliser en même temps que les propriétés .Column et .Row, mais je pense qu'il faut d'abord chercher et localiser la bonne période/semaine... Enfin, il faut y travailler un peu.
Continue de ton côté, je réfléchirai aussi.
A +.