L
lenain
Guest
J'ai une macro pour selectionner les cases de "b" à "l" de la ligne active pour la mettre en couleur (jaune).
With Range("b" & ActiveCell.Row & ":l" & _
ActiveCell.Row).Interior
.ColorIndex = 36
.Pattern = xlSolid
End With
Selection.Font.ColorIndex = 1
J'aimerais ajouter une ligne pour que la macro recupere la valeur de la case en colone "d" et la copie dans la colone "o". Mais comme on ne sait pas dire quelle est la cellule active quant l'utilisateur lance la macro, je ne sais pas utiliser la commande
ActiveCell.FormulaR1C1 = "=RC[-2]"
Est ce que quelqu'un connait une commande ou une astuce pour utiliser cette commande là?
Merci d'avance à tous et toutes
With Range("b" & ActiveCell.Row & ":l" & _
ActiveCell.Row).Interior
.ColorIndex = 36
.Pattern = xlSolid
End With
Selection.Font.ColorIndex = 1
J'aimerais ajouter une ligne pour que la macro recupere la valeur de la case en colone "d" et la copie dans la colone "o". Mais comme on ne sait pas dire quelle est la cellule active quant l'utilisateur lance la macro, je ne sais pas utiliser la commande
ActiveCell.FormulaR1C1 = "=RC[-2]"
Est ce que quelqu'un connait une commande ou une astuce pour utiliser cette commande là?
Merci d'avance à tous et toutes