Supprimer une liste de noms

Fermé
sylla.junior2 - 11 juil. 2020 à 22:43
yg_be Messages postés 23400 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 décembre 2024 - 12 juil. 2020 à 08:35
Bonjour,
j'ai une classe d'eleves de 6ème j'ai pu faire un petit petit programme avec acces qui comprend matricule_eleve , nom_eleve, moyennes_annuelles je voudrais à partir d'un code vba ou autres methodes supprimer automatiquement tous les lignes des eleves dont la moyenne annuelle ≤ 8.50.
j'ai essaye ça :
Sub suprimer()
Dim i As Integer
For i = 350 To 2 Step -1
If Worksheets("moyennes_annelles").Range("Q" & i).Value <= 8.5 Then Rows(i).Delete
Next i
End Sub

mais ça marche pas à merci à tous
A voir également:

2 réponses

f894009 Messages postés 17206 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 22 novembre 2024 1 711
12 juil. 2020 à 07:42
Bonjour,

Vous avez un code VBA Excel et vous parlez d'un code Acces. C'est l'un ou l'autre.
0
yg_be Messages postés 23400 Date d'inscription lundi 9 juin 2008 Statut Contributeur Dernière intervention 18 décembre 2024 Ambassadeur 1 557
12 juil. 2020 à 08:35
bonjour, peux-tu utiliser les balises de code? https://codes-sources.commentcamarche.net/faq/11288-les-balises-de-code
"ça marche pas": que se passe-t'il?
il est préférable de préciser dans quelle feuille doit se faire le delete:
If Worksheets("moyennes_annelles").Range("Q" & i).Value <= 8.5 Then
    Worksheets("moyennes_annelles").Rows(i).Delete
end if
0