Besoin d'aide sur vba Résolu/Fermé

Question

Bonjour,
Dans un tableau excel ayant plusieurs onglets,j'ai créé un bouton dans l'onglet 1 je lui ai ensuite associé un programme qui ouvre une boite de dialogue pour demander le noms d'une personne mon but est que ce nom vienne s'inscrire dans une liste qui se trouve sur un autre onglet.
J'espere avoir été assé clair et que quelq'un me vienne en aide.

Sub JYL()
rep = InputBox("NOM")
Workbooks("FDG 2008.xls").Worksheets("Bilans individuels").Range("b47").EntireRow.Insert
Workbooks("FDG 2008.xls").Worksheets("Bilans individuels").Range("b47").Value = rep


    Rows("23:235").Select
    Selection.EntireRow.Hidden = False
    ActiveWindow.SmallScroll Down:=6
    Range("B24:B100").Select
    Selection.Sort Key1:=Range("B24"), Order1:=xlAscending, Header:=xlGuess, _
        OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
    ActiveWindow.SmallScroll Down:=-3
    Rows("24:100").Select
    Selection.EntireRow.Hidden = True
    Range("I103").Select
    Sheets("Sommaire").Select
If rep = "" Then Exit Sub
End Sub

bounty206 · Answer

qu'est-ce qu'il se passe quand tu exécute la macro exactement ?

japlo · Answer

Désolé j'oubliais un détail qui a surement sont importance une fois le noms arrivée dans la liste je lui demande de la trier automatiquement.

Pour répondre à ta question la boite de dialogue s'ouvre je rentre le nom ensuite le noms s'inscrit dans la liste mais au moment de trier le noms reste en haut avec une erreur de debogage.

Cette partie surligné jaune : Workbooks("FDG 2008.xls").Worksheets("Bilans individuels").Range("b47").EntireRow.Insert


Donc pour etre plus clair je détail
1 ouveture de la boite de dialogue
2 inscription du nom dans la liste
3 afficher la liste
4 trier la liste
5 masquer la liste

japlo · Answer

Probleme résolu

japlo · Answer

....

Besoin d'aide sur vba

4 réponses

Discussions similaires