Discussion :

[ouskel'n'or]

Je suis content si tu as pu résoudre ton problème mais j'en étais encore à réfléchir sur le principe que tu avais utilisée pour créer tes boutons afin de leur affecter la macro qui aurait marché pour incrémenter tes fichiers et les copier...

ET JE VENAIS DE TROUVER !

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
            Set Bouton = ActiveSheet.Buttons.Add(Left:=butLeft, Top:=butTop, Width:=butWidth, Height _ 
            :=butHeight * 2) 
            With Bouton 
                .OnAction = "SaveFiles" 
                'Join(Split(XlsFiles(i), " "), "") 
                x = Split(XlsFiles(i), ".") 
                .Name = x(0) 
                .Caption = .Name 
            End With

Selon ce principe, le code que je t'ai donné aurait fonctionné. Mais bon, puisque tu ne veux pas de ma solution... tant mieux si tu en as une autre qui te simplifie la vie.
Il n'empêche que j'ai appris plein de choses et que je n'ai pas perdu mon temps.
Quand tu as un autre problème tordu, n'hésite pas...

A+

NB - Pense à mettre Résolu, le bouton en bas et à gauche

[ogenki]

mouarf pas de soucis

desolé de t'avoir donné tent de mal

ps: je plante toujour sur la copie avec le special paste...

[ouskel'n'or]

Je réponds sur l'autre post