XL 2021 Problème de macro

[Didierpasdoué]

Bonjour,
Je viens de m'inscrire sur ce forum, n'hésitez pas à me dire si je suis au bon endroit pour tenter de résoudre des problèmes avec Excel et vba.

J'ai une macro pour remplir des feuilles de calcul Excel . Une de ces feuilles est nommée: Compte bancaire 2024-2027 , nom figurant sur l'onglet
je l'active avec le code Sheets(" Compte bancaire 2024-2027 ").activate
Je peux aussi l'activer avec les deux codes suivants : Feuil61.activate (correspondant au (name) de l'explorateur vba
Sheets(1).activate (feuille en première position)
Ces trois possibilités fonctionnent , l'avantage des deux dernières est qu'en cas de changement de nom sur l'onglet, la macro reste opérationnelle.

Ce que je recherche, si c'est possible , c'est dans le code suivant:
ActiveCell.FormulaR1C1 = "='Compte bancaire 2024-2027' !RC[231]" remplacé Compte Bancaire 2024-2027 par une référence Feuil61 ou Sheets(1)

(l'objectif est de pouvoir modifié le nom sur l'onglet sans impacter la macro)

J'ai essayé bon nombre de syntaxe mais je n'ai pas réussi à en trouver une qui fonctionne.

Merci d'avance pour vos conseils

 

[TooFatBoy]

Bonjour,

Ce que je recherche, si c'est possible , c'est dans le code suivant:
ActiveCell.FormulaR1C1 = "='Compte bancaire 2024-2027' !RC[231]" remplacé Compte Bancaire 2024-2027 par une référence Feuil61 ou Sheets(1)

Peut-être un truc du genre

ActiveCell.FormulaR1C1 = "='" & Sheets(1).Name & "' !RC[231]"

 

[Didierpasdoué]

Bonjour,


Peut-être un truc du genre

ActiveCell.FormulaR1C1 = "='" & Sheets(1).Name & "' !RC[23]"

Merci beaucoup cela fonctionne très bien
On voit qu'il y a des experts en syntaxe
A tout hasard connait des livres ou autres qui rentrent à ce niveau de détails ?
encore merci

 

[TooFatBoy]

A tout hasard connait des livres ou autres qui rentrent à ce niveau de détails ?

Pas personnellement.

 

[sylvanu]

Bonjour Didier, TooFatBoy,
Une autre approche :
1- Vous nommez la dite cellule, par exemple "toto"
2 En VBA vous faites :

ActiveCell.Formula="=toto"

Quelle que soit la feuille où est cette cellule, alors la formule sera toujours correcte.

 

[Didierpasdoué]

Bonjour Didier, TooFatBoy,
Une autre approche :
1- Vous nommez la dite cellule, par exemple "toto"
2 En VBA vous faites :

ActiveCell.Formula="=toto"

Quelle que soit la feuille où est cette cellule, alors la formule sera toujours correcte.

merci pour ta réponse
j'utilise cette solution lorsque j'ai une ou deux cellule à nommer
dans le cas exposer précédemment (et je ne l'ai pas préciser ) il faudrait que je nomme exactement 4320 cellules.
A nouveau merci d'avoir répondu