Bonjour,
J'ai essayé de faire un programme sur excel pour fournir automatiquement une masse volumique dès qu'on fournit le code du produit ( dans la feuille il y'a un tableauavec les produits (leur code) ainsi que leur masse volumique) Cependant je ne comprends pas pourquoi çà ne marche pas.
Voici mon 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
 
Sub Macro1()
'
' Macro1 Macro
'
 
'
Dim e As Integer
Dim j As Integer
Dim code As String
e = 0
j = 29
code = InputBox("Tapez le code Béton", "Titre")
While e = 0 And j <= 40
 
If Cells(j, 1) = code Then e = 1
 
End If
j = j + 1
 
Wend
j = j - 1
Cells(27, 7) = Cells(j, 2)
End Sub
Après avoir taper ceci dans l'éditeur, j'ai inséré un bouton dans la feuille, cependant lorsque je clique dessus rien ne se produit ( normalement c'est censé afficher une fenêtre)
Où est le problème?
N.B:Je reçois aussi ce message lorsque je veux fermer la page excel :
Nom : Capture.PNG
Affichages : 133
Taille : 10,2 Ko
Merci d'avance
Merci d'avance