Comme intégrer une variable numerique d dans FormulaR1C1?
Résolu
nulenvba
Messages postés
6
Date d'inscription
Statut
Membre
Dernière intervention
-
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
ccm81 Messages postés 10909 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai cette fois, un problème d'écriture avec ActiveCell.FormulaR1C1 pour utiliser une variable lettre d même quand elle demeure identique à l'intérieur d'une boucle For Next. Je travaille en valeur relative
Voici le début du programme
ActiveCell.Offset(0, 0).Range("A1").Select
b = ActiveCell.Offset(0, 0).Range("A1").Row : d = 1 + b
dans l'exemple b est la ligne de départ où sur la feuille choisie je fais démarrer ma routine. La valeur de b est 8 (d=9). si je change de ligne de départ FormulaR1C1 générera une inexactitude
ActiveCell.Offset(2, 1).Range("A1").Select
ActiveCell.FormulaR1C1 = "=R[-9] C[-1]" ça marche
mais si je recommence mon travail d'un autre endroit la valeur 9 ne sera plus adaptée
avec ActiveCell.FormulaR1C1 = "=R" & (-d) & "C[-1]" ça coince
avec ActiveCell.FormulaR1C1 = "=R[-d] C[-1]" id ça coince
Dans mon programme véritable la formule exacte est plus complexe
ActiveCell.FormulaR1C1 = "=RC[-1]& R[-2]C[4]&R[-9]C[-1]"
c'est une date Jour&Mois&Année
Comment écrire correctement tout cela
D'avance merci
J'ai cette fois, un problème d'écriture avec ActiveCell.FormulaR1C1 pour utiliser une variable lettre d même quand elle demeure identique à l'intérieur d'une boucle For Next. Je travaille en valeur relative
Voici le début du programme
ActiveCell.Offset(0, 0).Range("A1").Select
b = ActiveCell.Offset(0, 0).Range("A1").Row : d = 1 + b
dans l'exemple b est la ligne de départ où sur la feuille choisie je fais démarrer ma routine. La valeur de b est 8 (d=9). si je change de ligne de départ FormulaR1C1 générera une inexactitude
ActiveCell.Offset(2, 1).Range("A1").Select
ActiveCell.FormulaR1C1 = "=R[-9] C[-1]" ça marche
mais si je recommence mon travail d'un autre endroit la valeur 9 ne sera plus adaptée
avec ActiveCell.FormulaR1C1 = "=R" & (-d) & "C[-1]" ça coince
avec ActiveCell.FormulaR1C1 = "=R[-d] C[-1]" id ça coince
Dans mon programme véritable la formule exacte est plus complexe
ActiveCell.FormulaR1C1 = "=RC[-1]& R[-2]C[4]&R[-9]C[-1]"
c'est une date Jour&Mois&Année
Comment écrire correctement tout cela
D'avance merci
peux tu mettre le problème à résolu (en haut de ton premier message)
bonne soirée