Pour tester, il va falloir nous occuper de l'événement Click() sur le CommandButton. Pour cela, dans le menu "général" choisir: CommandButton1.
Je passe en 4-2-3-1 offensif avec Fékir milieu offensif central. Cordialement #8 Petite modif pour que cela fonctionne dès l'affichage du Userform4 (avant toute recherche) Remplacez la procédure Private Sub UserForm_Initialize() par la suivante: VB: Private Sub UserForm_Initialize() Dim t, i With Sheets("Répertoire") = anspose(("a1:f1")) t = ("a1:g" & (, "a")(xlUp)) For i = 1 To UBound(t): t(i, 7) = i: Next = t End With End Sub 59 KB · Affichages: 24 #9 Bien reçu, je fais ça de suite merci. Cependant pour la partie changement d'emplacement, j'arrive à selectionner une ligne mais c'est les emplacements de tout une colonne qui sont modifiés... Auriez-vous une idée afin d'améliorer cette fonctionnalité? Moteur de recherche vba excel userform examples. Merci d'avance. 50. 6 KB · Affichages: 14 #10 Re, Pas bien compris ce que vous désirez faire pour un changement d'emplacement. Est-ce remplacer tous les emplacements (par exemple A9) par un autre remplacement (par exemple par A27)? Est-ce remplacer seulement l'emplacement pour une ligne donnée (soit une seule référence) -> dans ce cas il ne faut aucun doublon dans les références)?
Voilà, à ce stade je ne sais pas si cela est faisable et encore moins comment le réaliser... Donc si quelqu'un souhaite ce pencher sur mes demandes je lui en serais reconnaissant! Bien cordialement