VBA
Fermé
khalissy
Messages postés
1
Date d'inscription
lundi 20 juin 2016
Statut
Membre
Dernière intervention
20 juin 2016
-
20 juin 2016 à 21:52
jordane45 Messages postés 38437 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 23 février 2025 - 21 juin 2016 à 22:20
jordane45 Messages postés 38437 Date d'inscription mercredi 22 octobre 2003 Statut Modérateur Dernière intervention 23 février 2025 - 21 juin 2016 à 22:20
Bonsoir,
J'aurais besoin d'aide sur un programme VBA.
Le but de mon fichier est le suivant:
J'ai un tableau qui vient répertorier des compétences à chaque compétences est attribué un pourcentage.
Ce que j'aimerai faire est de venir sélectionner plusieurs lignes de compétences et d'avoir la moyenne de ces compétences.
Merci de votre aide
J'aurais besoin d'aide sur un programme VBA.
Le but de mon fichier est le suivant:
J'ai un tableau qui vient répertorier des compétences à chaque compétences est attribué un pourcentage.
Ce que j'aimerai faire est de venir sélectionner plusieurs lignes de compétences et d'avoir la moyenne de ces compétences.
Merci de votre aide
2 réponses
ThauTheme
Messages postés
1442
Date d'inscription
mardi 21 octobre 2014
Statut
Membre
Dernière intervention
29 juillet 2022
160
21 juin 2016 à 17:08
21 juin 2016 à 17:08
Bonsoir Khalissy, bonsoir le forum,
Et... Tu veux combien de sucres dans ton café ?!...
Et... Tu veux combien de sucres dans ton café ?!...
jordane45
Messages postés
38437
Date d'inscription
mercredi 22 octobre 2003
Statut
Modérateur
Dernière intervention
23 février 2025
4 737
21 juin 2016 à 22:20
21 juin 2016 à 22:20
Bonjour,
Voici de quoi commencer ton code :
..
Pour le reste .. je te laisse faire (et chercher un minimum).. ne sachant rien de la structure de ton fichier !
Voici de quoi commencer ton code :
Sub test() Dim ligne_deb As Long Dim ligne_fin As Long Dim rng As Range ' fenetre de selection de la plage de cellules à traiter Set rng = Application.InputBox("Select a range", "Obtain Range Object", Type:=8) 'on determine la ligne de début et de fin ligne_deb = rng.Row ligne_fin = ligne_deb + rng.Rows.Count - 1 'on fait une boucle sur les lignes... For l = ligne_deb To ligne_fin ' ici tu fais ton calcul... Next End Sub
..
Pour le reste .. je te laisse faire (et chercher un minimum).. ne sachant rien de la structure de ton fichier !