XL 2019 Problème avec ma fonction max

MJD001

XLDnaute Nouveau
Bonjour le forum
J’ai un souci avec la réponse de ma fonction max…
En effet j’ai un classeur qui contient une feuille et un formulaire, la feuille contient les notes de différentes matières qui sont insérées depuis mon formulaire. J’ai également un autre endroit sur la même feuille qui me permet de connaître les meilleurs notes de chaque matière mais en utilisant la fonction max ça me donne toujours 0 comme si elle ne reconnaît pas les valeurs qui sont dans mon tableau.
Donc j’aimerais que cette fonction donne réponses exactes à chaque fois que j’insère les notes depuis mon formulaire

Ci-joint le fichier
 

Pièces jointes

  • Max.xlsm
    20.6 KB · Affichages: 8
Solution
Bonjour @MAPOLA
Tu inscrit du texte dans tes cellules.
Sans trop chercher le pourquoi du comment, avec
VB:
FeuilM.Cells(Y, 3).Value = TxM * 1
FeuilM.Cells(Y, 4).Value = TxP * 1
FeuilM.Cells(Y, 5).Value = TxF * 1
FeuilM.Cells(Y, 6).Value = TxH * 1
FeuilM.Cells(Y, 7).Value = TxA * 1
Tu as des nombres reconnus par MAX.

Cordialement

vgendron

XLDnaute Barbatruc
bonjour

Ton tableau notes ne contient pas de nombre, mais du texte.... issue de textbox...
pour régler le problème
VB:
Private Sub CmdValider_Click()
Dim X As Long
Dim Y As Long

X = FeuilM.Range("B" & Rows.Count).End(xlUp).Row

For Y = 6 To X
    If FeuilM.Cells(Y, 2).Value = TxCherché.Text Then
        FeuilM.Cells(Y, 3).Value = CDbl(TxM)
        FeuilM.Cells(Y, 4).Value = CDbl(TxP)
        FeuilM.Cells(Y, 5).Value = CDbl(TxF)
        FeuilM.Cells(Y, 6).Value = CDbl(TxH)
        FeuilM.Cells(Y, 7).Value = CDbl(TxA)
    End If
Next Y
Unload Me
UserForm1.Show
End Sub
 

Efgé

XLDnaute Barbatruc
Bonjour @MAPOLA
Tu inscrit du texte dans tes cellules.
Sans trop chercher le pourquoi du comment, avec
VB:
FeuilM.Cells(Y, 3).Value = TxM * 1
FeuilM.Cells(Y, 4).Value = TxP * 1
FeuilM.Cells(Y, 5).Value = TxF * 1
FeuilM.Cells(Y, 6).Value = TxH * 1
FeuilM.Cells(Y, 7).Value = TxA * 1
Tu as des nombres reconnus par MAX.

Cordialement
 

Discussions similaires