J'ai créé une fonction afin de faire un calcul.

Lorsque je choisis une valeur dans une comboBox appelé "remise", je récupère la valeur associée dans une feuille Excel et je la stocke dans une variable de type Variant.
Cependant ma variable est toujours vide.
Par contre, le début du code fonctionne, Je peux stocker cette valeur dans une TextBox de type:

Code : Sélectionner tout - Visualiser dans une fenêtre à part
  Me.TextBox12 = .Cells(Nom.Row, 2)
Cependant,
Code : Sélectionner tout - Visualiser dans une fenêtre à part
total = Cells(Nom.Row, 2).Value
ne fonctionne pas. D'ou ma question, comment dois-je ajuster mon code pour insérer cette valeur dans ma variable "total" et non pas dans un textBox.

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
 
Private Sub Calculer_prixfinalHT()
 
Dim total As Variant
 
 
    If Not ((TextBox7.Text = "") Or (quantite.Text = "") Or (remise.Text = "")) Then
        With ThisWorkbook.Sheets("BaseTarifaire")
        For Each Nom In .Range("A9:A" & .[A65000].End(xlUp).Row)
            If CStr(Nom) = CStr(Me.remise.Value) Then
               total = Cells(Nom.Row, 2).Value
             End If
        Next
        End With
    End If
 
End Sub