Calcul sans la formule

Bonjour,

J'aimerais savoir si il est possible d'afficher le résultat d'un calcul dans une cellule sans le texte dans la barre de formule, exemple :

calcul = "=IFERROR(VLOOKUP(RC[-1],'Feuil4'!C[-1]:C[5],2,FALSE),"""")"

Il m'affiche le bon résultat, mais je souhaite avoir juste le nombre dans la barre de formule.

Merci

Hello faut passer par la formule vba directement, la tu remets la formule dans la cellule écrit comme ça

Essaie : calcul = Application.WorksheetFunction.Vlookup(...)

Peut-tu écrire completement la foormule stp je n'y arrive pas de mon coté

Hello,

Tu peux transmettre ton fichier ? Ce sera plus simple (Anonymise le si nécessaire)

@+

Voici un code très simple si sa peux t'aider

Sub baroute78()
Dim calcul As Range
Set calcul = Cells(2, 5)
calcul = "=1+1"
End Sub

Tu peut tester le code, tu verra que dans ta barre de formule il y aura écrit "=1+1", hors que je veut seulement "2"

Tiens :

Sub baroute78()
Dim calcul As Range
Set calcul = Cells(2, 5)
calcul = 1 + 1
End Sub

Il ne faut juste pas que tu mettes "=" à chaque fois sinon ça te mets les formules vu que tu lui dis d'incorporer "= 1+1" dans la formule

Très bien, cela fonctionne mais pour l'adapter à mon fichier cela m'affiche un bug :

Sub baroute78()
Dim calcul As Range
Set calcul = Cells(2, 5)
calcul = IFERROR(VLOOKUP(RC[-1],'Feuil4'!C[-1]:C[5],2,FALSE),"""")
End Sub

Hello normal, il ne faut pas passer par cela...

Sub baroute78()
Dim calcul As Range
Set calcul = Cells(2, 5)
On error resume next
calcul = Application.worksheetFunction.Vlookup(Valeur_cherchée;tableau de recherche; num_colonne;0)
If calcul = "#N/A" then calcul = ""
End Sub

Excuse moi mais j'ai vraiment du mal avec la fonction Vlookup, voici la formule si sa peux t'aider : =SIERREUR(RECHERCHEV(A8;'Feuil4'!A:G;2;FAUX);"")

Hello,

Alors :

Sub baroute78()
Dim calcul As Range
Set calcul = Cells(2, 5)
On error resume next
calcul = Application.worksheetFunction.Vlookup(Range("A8"),Sheets("Feuil4").Range("A:G"), 2,0)
If calcul = "#N/A" then calcul = ""
End Sub

Essaie ça

@+

RE

Il n'y a pas d'erreur mais sa ne fait aucun calcul non plus ...

PS : ce sont des "," à la place des ";" dans les parenthèses

Ah yes je me suis trompé c'set des virgules, je corrige sur l'ancien post

Du coup ça marche avec les virgules ?

As-tu un fichier ?

Bonjour le fil, bonjour le forum,

je pense qu'il en a un mais comme c'est au moins la seconde fois qu'on lui demande et qu'il est pas foutu de le fournir, ce fichier doit être Top Secret Défense !
Ou alors floki est sourd et il faut parler plus fort.

Hé Floki ! Le fichier !...

Perdre autant de temps ça me rend fou...