XL 2016 Variable de nom de feuille dans une formule R1C1

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

mathieu42400

XLDnaute Nouveau
Bonjour à tous,

j'ai une macro qui créée une nouvelle feuille en y collant un tableau copié d'une autre feuille.
Dans une cellule du tableau de la nouvelle feuille créée, je voudrais rentrer une formule avec une valeur se trouvant dans de la feuille de base.
Cepedandant; je prévois l'éventualité où la feuille de base changerai de nom, et je voudrais donc dans ma formule utiliser une variable contenant le nom de la feuille de base.

Voici mon code que j'ai commencé à faire mais qui ne fonctionne pas :

'récupération du nom de la feuille de base
Dim Nom
Nom = ActiveSheet.Name

'Formule pour écrire dans la cellule C9 de la nouvelle feuille créée
Range("C9").Select
ActiveCell.FormulaR1C1 = "=""Moy Pu " & Nom & "!R[-1]C"

Le débogeur m'indique que c'est à la ligne de la formule R1C1 que le code ne fonctionne plus.
J'ai cherché sur pas mal de forum relatifs à ce problème mais je n'ai toujours pas trouvé de réponse.

Je m'en remet donc à vous

Merci d'avance pour votre aide et vos conseils.
 
Bonjour,
Je m'en remet donc à vous
Seulement nous n'avons ni la science infuse ni de boule de cristal pour savoir d'où provient l'erreur.
Sans fichier exemple, reproduisant l'erreur, difficile de vous répondre.

Mais peut-être que ActiveCell.FormulaR1C1 = "='Moy Pu " & Nom & "'!R[-1]C" fonctionnerait mieux.
Guillemets simple(') pour entourer TOUT le nom de la feuille.

A bientôt
 
Re,

Dans votre fichier .xlsx il n'y a pas la macro dont vous parliez 'j'ai une macro qui créée une nouvelle feuille en y collant un tableau copié d'une autre feuille.'

Si vous ne donnez que la moitié des informations, cela va être difficile de vous aider.

Bonne soirée
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
3
Affichages
50
Réponses
4
Affichages
233
Réponses
2
Affichages
301
Retour