Discriminant de colonne dans formule variable

Résolu/Fermé
shaar - 8 oct. 2015 à 17:43
 Shaar - 13 oct. 2015 à 10:36
Bonjour,

Je dois transcrire un document excel en macro. Ce document contient de nombreuses formules que je dois replacer pouvoir insérer en les écrivant dans la macro.

Le problème c'est que je dois courament passer par des variables pour écrire mon programme. Je m'en sortais jusqu'à présent en utilisant la fonction Chr()

Voici un exemple de code que j'utilise :
For i = 1 to End
Cells(i, derncolonne+1) = "=" & chr(derncolonne + 66) & i & ""+" & chr(derncolonne + 67) & i-1
Next i

Je sais que c'est moyen mais ça m'a permis d'avancer jusqu'à aujourd'hui.

Le problème va se poser quand je vais devoir aller sur les cellules à double lettre (AA, AB, AC...)

Auriez vous une idée de résolution plus "pro" que celle-ci ?

Merci,
Cordialement,


A voir également:

2 réponses

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
9 oct. 2015 à 14:46
Bonjour,

For i = 1 To x
    'la lettre de la colonne
    Lcol1 = Split(Cells(8, derncolonne + 66).Address, "$")(1)
    Lcol2 = Split(Cells(8, derncolonne + 67).Address, "$")(1)
    Cells(i, derncolonne + 1) = "=" & Lcol1 & i & "" + " & Lcol2 & i-1"
Next i
0
Merci c'est nikel, exactement dont j'avais besoin !
0