Bonjour,
J'ai un petit problème avec un range.select
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
                        'Worksheets("Matrice").Range("S" & therow).Select
                        ActiveWorkbook.Sheets("Matrice").Cells(therow, 19).Select
                        ActiveCell.FormulaR1C1 = _
                        "=IF(AND((RC[-3]*RC[-2]*RC[-1])>=1,(RC[-3]*RC[-2]*RC[-1])<=19),""Low"",IF(AND((RC[-3]*RC[-2]*RC[-1])>=20,(RC[-3]*RC[-2]*RC[-1])<=34),""Medium"",IF(AND((RC[-3]*RC[-2]*RC[-1])>=35,(RC[-3]*RC[-2]*RC[-1])<=49),""High"",IF(AND((RC[-3]*RC[-2]*RC[-1])>=50,(RC[-3]*RC[-2]*RC[-1])<=64),""High"",""""))))"
Si j'utilise
Code : Sélectionner tout - Visualiser dans une fenêtre à part
Worksheets("Matrice").Range("S" & therow).Select ou ActiveWorkbook.Sheets("Matrice").Cells(therow, 19).Select
il m'affiche le message suivant:
La méthode select de la classe Range a échoué.
Quelqu'un peut me donner une solution pour résoudre mon problème.
je vous remercie d'avance pour votre collaboration.
Bien cordialement.
MamaB