InputBox pur un nom de Feuille Le sujet est résolu

Y compris Power BI, Power Query et toute autre question en lien avec Excel
Avatar du membre
Paretoptimal
Jeune membre
Jeune membre
Messages : 13
Inscrit le : 8 août 2016
Version d'Excel : PC 2010 & Mac 2008

Message par Paretoptimal » 17 août 2016, 14:51

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, :D

Pour plus d'informations sur ma macro:
http://forum.excel-pratique.com/excel/t ... 81723.html

Simple problème de syntaxe.
Avatar du membre
Raja
Passionné d'Excel
Passionné d'Excel
Messages : 5'159
Appréciations reçues : 7
Inscrit le : 3 février 2008
Version d'Excel : 2010 à 2016 FR et 2010 EN

Message par Raja » 17 août 2016, 15:02

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.
Cdlt,
Raja
Répondre Sujet précédentSujet suivant
  • Sujets similaires
    Réponses
    Vues
    Dernier message