[VBA] Formule en valeur absolue

Résolu/Fermé
Palteza Messages postés 79 Date d'inscription mercredi 2 décembre 2009 Statut Membre Dernière intervention 6 septembre 2014 - Modifié par Palteza le 23/06/2010 à 11:49
Palteza Messages postés 79 Date d'inscription mercredi 2 décembre 2009 Statut Membre Dernière intervention 6 septembre 2014 - 24 juin 2010 à 10:08
Bonjour à tous,

Je dois imputer, par VBA, à certaines cellules, des formules faisant référence à une feuille différente. J'ai cru un moment que de passer par des formules en valeur absolue serait possible. Ainsi j'ai tenté le code qui suit, peut-être innocemment, qui ne marche pas (sachant que mon Colonne1 récupère bel et bien une lettre) :

xlSheet2.Range("B8").Value = "=Données_Tous_Découpages'!$" & Colonne1 & "$2"

Y a-t'il moyen de garder cette méthode, en trouvant les parties qui clochent, ou alors est-ce tout simplement impossible de la sorte?

Si c'est impossible, comment opérer au + facile (toujours en gardant la méthode valeur absolue si possible)? ... je pense à Cells(x,y).Address ... mais si vous connaissez plus court.

Merci d'avance.

4 réponses

thev Messages postés 1851 Date d'inscription lundi 7 avril 2008 Statut Membre Dernière intervention 15 avril 2024 681
23 juin 2010 à 14:05
xlSheet2.Range("B8").Value =
"=" & Sheets("Données_Tous_Découpages").Columns(colonne1).Rows(2).Address(1, 1, 1, 1)
0