InputBox pur un nom de Feuille

Bonjour le forum,

J'ai une macro qui me permet d’effectuer un collage spécial entre un convertisseur et des feuilles résultats via ces lignes de code:

Dim C as Range
My Range.Select
For each C In Selection
         Sheets("AFD").Range(C.Address).value = C.Value
Next C

Pour chaque feuille résultat, je dois changer manuellement le nom de la feuille dans la macro.

J'ai donc pensé à intégrer une inputbox de la forme:

Dim Feuille As String
Feuille = InputBox("Feuille de destination?")

Puis changer la ligne en mettant la valeur de l'inputbox dans Sheets():

 Sheets(Feuille).Range(C.Address).value = C.Value

Mais pour le moment mon idée ne fonctionne pas,

Merci d'avance pour votre aide,

Pour plus d'informations sur ma macro:

https://forum.excel-pratique.com/excel/translation-d-une-selection-multiple-vers-la-droite-t81723.html

Simple problème de syntaxe.

Bonjour,

Merci de joindre le fichier avec la macro et précise le résultat que tu veux obtenir. Une demande en vrac comme ça ne sert pas à obtenir une aide complète.