Comment récupérer la valeur provenant une formale

Bonjour

dans macro, j'ai fais une formule comme ce ci: ActiveCell.FormulaR1C1 = "=MATCH(""TestWE"",Feuil1!R[-6]C[-20]:R[-6]C[1],0)"

le résultat est 11, donc je voudrais récupérer ce rlt avec une avariable, comment je peux faire

j'ai fait comme ce ci, mais ne marche pas :

Dim x as integer

x=ActiveCell.FormulaR1C1 .value

Merci!!

Bonjour

essayes en faisant juste

X=ActiveCell.Value

j'ai essayé, mais ce ne marche pas !!

Bonjour

Etonnant !

Joins ton fichier car j'ai fait localement un test et cela fonctionne

Joins ton fichier car j'ai fait localement un test et cela fonctionne

Bonsoir

Je ne comprend pas trop ta question

Tu veux récupérer la valeur de la formule sans passer par une cellule ?

Si c'est ça

Essayes directement

x = Application.Match("TestWE", Range("A1:O1"), 0)

Si c'est ce que tu veux, il faut gérer l'erreur (cas où la valeur n'est pas présente)

Ta macro pourrait ressembler à ça

Sub Macro2()
Dim x

  x = Application.Match("TestWE", Range("A1:O1"), 0)
  If Not IsError(x) Then
    With Cells(1, x).Interior
      .Pattern = xlSolid
      .PatternColorIndex = xlAutomatic
      .Color = 49407
      .TintAndShade = 0
      .PatternTintAndShade = 0
    End With
  End If
End Sub

Mais sans info plus complète je ne sais pas si c'est ce que tu cherches

x = Application.Match("TestWE", Range("A1:O1"), 0)

ca marche avec ce code, merci bcp bcp!!