Phileufeu@yahoo.fr
XLDnaute Nouveau
Bonjour à tous,
Avant de vous exposer mon problème, merci à tous les créateurs du site, à toutes les personnes qui apportent des solutions à nos problèmes. A chaque fois que j'ai eu un souci sur excel, j'ai toujours trouvé ici, en un temps record, une solution complète et efficace.
Trêve de compliments:
Je travaille sur un tableau comportant des noms de joueurs de foot en ligne et des informations concernant ces joueurs en colonnes (voir pj).
Je rencontre un petit souci avec une macro qui me permet de faire en sorte que lorsque je rentre le nom d'un joueur qui a déjà été entré dans le tableau, les informations concernant ce joueur se remplissent automatiquement en ligne.
Voilà à quoi ça ressemble:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
If Target.Column > 1 Then Exit Sub
With ActiveSheet.Range("A2:A" & Target.Offset(-1, 0).Row)
Set c = .Find(Target.Value, LookIn:=xlValues, lookat:=xlWhole)
If Not c Is Nothing Then
Application.EnableEvents = False
Target.Range("B1:H1").Value = c.Range("B1:H1").Value
Application.EnableEvents = True
Target.Offset(1, 0).Select
End If
End With
End Sub
La macro marche très bien. Le seul problème est que pour compléter ce tableau, je colle dans mon tableau des infos récupérées sur le net (comme dans la pj). Mais la ligne ne se remplit automatiquement que si je vais double-cliquer sur la cellule contenant le nom du joueur.
Serait-il possible de faire quelque chose (de modifier la formule par exemple) pour que le remplissage automatique se fasse sans avoir à double cliquer sur la cellule ?
Ca peut paraître un détail, mais j'ai au moins 10.000 joueurs à entrer dans mon tableau, donc ça me ferait gagner pas mal de temps...
Merci d'avance.
Philippe.
Avant de vous exposer mon problème, merci à tous les créateurs du site, à toutes les personnes qui apportent des solutions à nos problèmes. A chaque fois que j'ai eu un souci sur excel, j'ai toujours trouvé ici, en un temps record, une solution complète et efficace.
Trêve de compliments:
Je travaille sur un tableau comportant des noms de joueurs de foot en ligne et des informations concernant ces joueurs en colonnes (voir pj).
Je rencontre un petit souci avec une macro qui me permet de faire en sorte que lorsque je rentre le nom d'un joueur qui a déjà été entré dans le tableau, les informations concernant ce joueur se remplissent automatiquement en ligne.
Voilà à quoi ça ressemble:
Private Sub Worksheet_Change(ByVal Target As Range)
Dim c As Range
If Target.Column > 1 Then Exit Sub
With ActiveSheet.Range("A2:A" & Target.Offset(-1, 0).Row)
Set c = .Find(Target.Value, LookIn:=xlValues, lookat:=xlWhole)
If Not c Is Nothing Then
Application.EnableEvents = False
Target.Range("B1:H1").Value = c.Range("B1:H1").Value
Application.EnableEvents = True
Target.Offset(1, 0).Select
End If
End With
End Sub
La macro marche très bien. Le seul problème est que pour compléter ce tableau, je colle dans mon tableau des infos récupérées sur le net (comme dans la pj). Mais la ligne ne se remplit automatiquement que si je vais double-cliquer sur la cellule contenant le nom du joueur.
Serait-il possible de faire quelque chose (de modifier la formule par exemple) pour que le remplissage automatique se fasse sans avoir à double cliquer sur la cellule ?
Ca peut paraître un détail, mais j'ai au moins 10.000 joueurs à entrer dans mon tableau, donc ça me ferait gagner pas mal de temps...
Merci d'avance.
Philippe.
