Bonjour tout le monde,

J'ai besoin de vos conseils en vba.
Je voudrais utiliser ActiveCell.FormulaR1C1 avec une variable gelée.

la formule qui fonctionne est la suivante:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
Range(ad1).Select
Selection.Offset(2, 2).Select
ActiveCell.FormulaR1C1 = "=index(mat,match(RC[-3],ref,0),match(R[-1]c[-2],pi,0))"
Pour la duplication de cette ligne par l'utilisateur, j'aimerais que la cellule définie tel que R[-1]c[-2] soit figée.
Ne trouvant pas de solution simple à mon problème je tente le bidouillage (Je prie les puristes de bien vouloir m'excuser). J'ai donc défini les coordonnées de la cellule que je veux geler dans adpi.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Dim adpi As String
Dim ligne As Integer
Dim colonne As Integer
 
        adpi = [b1:b63520].Find(what:=don, LookIn:=xlFormulas, LookAt:=xlPart, SearchOrder:=xlByColumns).Offset(1, 0).Address
        Range(adpi).Select
        ligne = ActiveCell.Row
        colonne = ActiveCell.Column
        colonne = Asc("colonne")
 
                Range(ad).Select
                Selection.Offset(2, 2).Select
                ActiveCell.FormulaR1C1 = "=index(mat,match(RC[-3],ref,0),match( R " & ligne & " C " & colonne & " ,pi,0))"
Mais celà ne fonctionne pas... Merci d'avance pour vos lectures et réponses!

Bien cordialement
Valou