Fonctions ou BVA
Bonjour
Je souhaiterais à l'aide d'une liste déroulante en CQ49 (Feuil2:qui exécute déjà un graph et commentaires) d'aller copier en
Feuil1 lune ligne de plusieurs colonnes et la coller en BV58
Plus facile à comprendre en ouvrant la pièce jointe!
Merci d'avance
Crdlt
Nonno
je ne suis pas sure que la pièce jointe suive!!??
Bonjour Nonno,
Pour un code VBA je te propose ci-dessous:
Sub GraphLig()
Zone = "Feuil1!A" & [CQ49] & ":AW" & [CQ49]
Range(Zone). Copy Range("BV58")
Application.CutCopyMode=False
Range("BV58").select
End SubCe code je l'ai insérer dans ton module 18. Et j'ai par clic droit sur la zone haute gauche de ton graphique choisi Affecter une macro, donc celle-ci. Afin de laisser le choix, soit de n'avoir que la sortie graphique après liste déroulante. Ou après par clic sur le graphique ressortir ensuite la ligne dévolue à l'élève. Mais tout directement est possible aussi.
Bons tests, bonne continuation.
MERCI de ton aide,
je ne vois pas de pièce jointe dans ta réponse donc j'ai pris la piéce joint dans mon 1er message
et ne trouve pas "ta macro".
Ais-je omis quelque chose (n'étant pas très habitué à ce site)
Cdlmt
Nonno
A nouveau,
Vu le peu de lignes de la macro. Je n'ai pas renvoyé ton fichier. J'ai laissé cette macro affichée dans mon précèdent message.
Il suffit de l'intégrer dans un de tes modules.
A suivre...
Encore moi!
Désolé je ne sais pas faire (a part petites "macros" a l'aide de l'assistant")
Si tu pouvais m'envoyer le fichier modifier ça m'arrangerait et peut être comprendre la manœuvre.
Merci
Nonno
Suite,
En fichier joint la macro intégré en premier en haut du module 18 ou il existait d'autres macros.
Tu peux après choix dans la liste déroulante cliquer sur le haut du graphique. Ou appeler cette macro dans le menu d'Excel. Cela aura le même effet.
Aussi, avec ALT F11 tu accèdes à l'éditeur VBA si tu souhaites voir l'ensemble des macros existantes.
Bonne soirée.
Merci
Exactement ce que je voulais, "sauf que si je remplace (dans liste déroulante) les chiffres par les noms d'élèves
ça coince!:Zone = "Feuil1!A" & [CQ49] & ":AW" & [CQ49]
Range(Zone).Copy Range("BV58")
Application.CutCopyMode = False
Range("BV58").Select
End Sub
Bonjour Nonno,
Voici ton fichier modifié prenant en compte le changement voulu; nom au lieu de numéro.
Voir notes sur la feuille et sur la macro du module 18.
Bons tests, bonne continuation.
Formidable! ça a l'air si simple pour toi.
Merci encore
Cordialement Nonno
A nouveau,
Ravi de t'avoir aidé.
N'oublie pas de cliquer pour fermer le sujet. Merci.
Me revoila!
que c'est-il passé? fonction trés bien sur mon pc"bureau" mais sur portable un message
(Erreur d’exécution 91 Variable objet de bloc with non définie. ???)
Désolé
Crdlt
Nonno
A nouveau,
Où le message d'erreur apparaît-il?
Il n'y a pas de bloc with dans la macro!
Après le message d'erreur, faire débogage et voir la ligne qui pose souci. Sur test sur mon PC pas de problème. Il ressort les notes alpha de l'élève.
À suivre...
C reparti Mystère!!?
Merci et bonne soirée;
Je te laisse tranquille
Cordialement
Nonno