Recopie de formules automatisée
Bonsoir
Dans une feuille, les cellules de la colonne R contiennent cette formule =OU(F2="vrac";F2="détail" ( ici pour vérifier le contenu de la ligne 2 ou bien =OU(F3 etc pour la ligne 3 et ainsi de suite pour chaque ligne..et R2,... R3 prend la valeur Vrai ou Faux).
Ma feuille est renseignée à partir d'un formulaire et après chaque insertion d'une nouvelle ligne par macro, je souhaiterais que cette formule soit recopiée à la ligne du dessous avec le bon numéro de ligne , F4 pour la 4éme ligne, F5 etc..
Quand je créé une macro par enregistrement pour recopier les 2 premières cellules en tirant vers le bas, j'obtiens ceci :
Range("R2:R4").Select
Selection.AutoFill Destination:=Range("R2:R7"), Type:=xlFillDefault
Range("R2:R7").Select
Quand je remplace la première ligne par "Range("R num :R num1").Select" où num=2 et num1=4, j'obtiens ce message d'erreur
"L'élément portant ce nom est introuvable" ..
Un coup de main serait le bienvenu ..
Merci
Bonjour,
Un essai ...
X = 2
Range("R" & X & ":R" & X + 2).Select
Selection.AutoFill Destination:=Range("R" & X & ":R" & X + 5), Type:=xlFillDefaultric
j'ai un résultat positif...
dans mes essais ,je me suis emmêlé les parenthèses..
Merci
ric