Bonjour,
je débute dans les macros. Et en fait en cherchant des cas similaires, je me rends un peu compte que chaque cas est presque particulier.
Voila en fait j'ai crée un bouton de commande dans feuille 1. Et j'aimerai utiliser des nombres dans des cellules d'une feuille 2, calculer une somme et afficher le resultat dans feuille 1.

Voici le code:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
Private Sub CommandButton1_Click()
Dim cond As Variant
Dim avant_achat As Worksheet
Dim i As Variant
Dim j As Variant
Dim nb_actions As Variant
Dim prix_action As Variant
Dim ligne As Variant
Dim k As Variant
Dim nom_action As Variant

'Vérification des valeurs prises en compte dans le capital
'c'est une évaluation
k = 0
For i = 5 To 200
Worksheets("avant_achat").Activate' 
j = Cells(i, 1) (En fait j'aimerai que la valeur cell(i,1) soit prise dans la sheet "avant achat". Et il me l'a prend dans la page active du bouton)
If j = 1 Then
nom_action = Cells(i, 3)
nb_actions = Cells(i, 4)
prix_action = Cells(i, 6)
frais = Cells(i, 5)
ligne = (nb_actions * prix_action) + frais
k = k + 1
Worksheets("feuille_temp").Activate idem ici
Cells(i, 2) = nom_action
Cells(i, 5) = nb_actions
Cells(i, 6) = ligne
Else
End If
Next

End Sub