Sinon, tu peux effectuer ta manipulation en créant des boutons d'opérations.
A l'aide de la barre d'outils "Boîte à outils contrôles", créer un bouton de commande. Double-cliquer dessus afin d'atteindre Visual Basic pour Excel. Une fenêtre affiche :
Private Sub CommandButton1_Click()
End sub
Entrer le code suivant :
Private Sub CommandButton1_Click()
Cells(1, 1).Activate
l = 1
Do Until Cells(l, 1).Value = ""
Cells(l, 3).Value = Cells(l, 1).Value + Cells(l, 2).Value
l = l + 1
Loop
End Sub
Sur la gauche de l'
écran, on voit une fenêtre "Project - VBA project". En dessous, une fenêtre "Propriétés - Comandbutton1". Dans cette deuxième fenêtre, il faut attribuer le texte "Addition" en face de la variable "Caption".
Retourner sous Excel.
A l'aide de la barre d'outils "Boîte à outils contrôles", créer un bouton de commande. Double-cliquer dessus afin d'atteindre Visual Basic pour Excel. Une fenêtre affiche :
Private Sub CommandButton2_Click()
End sub
Entrer le code suivant :
Private Sub CommandButton2_Click()
Cells(1, 1).Activate
l = 1
Do Until Cells(l, 1).Value = ""
Cells(l, 3).Value = Cells(l, 1).Value - Cells(l, 2).Value
l = l + 1
Loop
End Sub
Sur la gauche de l'
écran, on voit une fenêtre "Project - VBA project". En dessous, une fenêtre "Propriétés - Comandbutton2". Dans cette deuxième fenêtre, il faut attribuer le texte "Soustraction" en face de la variable "Caption".
Retourner sous Excel.
A l'aide de la barre d'outils "Boîte à outils contrôles", créer un bouton de commande. Double-cliquer dessus afin d'atteindre Visual Basic pour Excel. Une fenêtre affiche :
Private Sub CommandButton3_Click()
End sub
Entrer le code suivant :
Private Sub CommandButton3_Click()
Cells(1, 1).Activate
l = 1
Do Until Cells(l, 1).Value = ""
Cells(l, 3).Value = Cells(l, 1).Value * Cells(l, 2).Value
l = l + 1
Loop
End Sub
Sur la gauche de l'
écran, on voit une fenêtre "Project - VBA project". En dessous, une fenêtre "Propriétés - Comandbutton3". Dans cette deuxième fenêtre, il faut attribuer le texte "Multiplication" en face de la variable "Caption".
Retourner sous Excel.
A l'aide de la barre d'outils "Boîte à outils contrôles", créer un bouton de commande. Double-cliquer dessus afin d'atteindre Visual Basic pour Excel. Une fenêtre affiche :
Private Sub CommandButton4_Click()
End sub
Entrer le code suivant :
Private Sub CommandButton4_Click()
Cells(1, 1).Activate
l = 1
Do Until Cells(l, 1).Value = ""
Cells(l, 3).Value = Cells(l, 1).Value / Cells(l, 2).Value
l = l + 1
Loop
End Sub
Sur la gauche de l'
écran, on voit une fenêtre "Project - VBA project". En dessous, une fenêtre "Propriétés - Comandbutton4". Dans cette deuxième fenêtre, il faut attribuer le texte "Division" en face de la variable "Caption".
Enregistrer le document et fermer la fenêtre Visual Basic.
A présent, tu disposes de quatre boutons pour réaliser tes opérations
L'opération concernera les colonnes 1 et 2. Le résultat s'affichera dans la colonne 3.
@+