Calculer la moyenne par une macro
Bonjour encore une fois,
Je viens vers vous pour demander un coup d main concernant mon programme pour calculer la moyenne des notes des étudiants , il m'affiche incompatibilité de type et je comprend pas pourquoi , svp je suis bloquée et j'arrive pas à avancer avec ces erreurs qui se suivent
Le beug est au niveau de la ligne qui calcule la moyenne.
Merci beaucoup d'avance
Bonjour
Vos notes sont sous forme de texte d'où le bug ...
Bonjour,
Un début de réponse.
Attention au format des notes (texte) lors de la saisie des notes !...
A te relire.
Cdlt.
Mercii beaucoup à vous le prog a bien marché
Mercii beaucoup à vous le prog a bien marché
Bonjour,
pour info je penses qu'une autre erreur c'est glissée dans votre prog. il y a deux fois alimentation par la textbox Math.
il y aura un décalage de colonne du coup.
Private Sub Ajout2_Click()
Sheets("Notes des ?tudiants").Activate
With Sheets("Notes des ?tudiants").ListObjects(1)
.ListRows.Add
.DataBodyRange.Cells(.ListRows.Count, 1).Select
End With
ActiveCell = TBnumetud
ActiveCell.Offset(0, 1).Value = TBnomPr?nom
ActiveCell.Offset(0, 2).Value = TBMaths
ActiveCell.Offset(0, 3).Value = TBMaths
ActiveCell.Offset(0, 4).Value = TBCompta
ActiveCell.Offset(0, 5).Value = TBhg
ActiveCell.Offset(0, 6).Value = TBPhilo
ActiveCell.Offset(0, 7).Value = TBFran?ais
ActiveCell.Offset(0, 8).Value = TBAng@Xmenpl Merci pour la correction , j'ai remarqué ça aussi et j l ai fait corrigé . merci encore une fois