Discussion :

[David1974]

Bonjour � tous,
Voila j'essai d'affecter une formule � une cellul via VBA dont une partie est param�tr�e par une variable, cependant j'ai � chaque fois une erreur
1004.
Pouvez m'aider SVP, cela fait une plombe que j'essaye et rien � faire.

Merci

Code :

S�lectionner tout - Visualiser dans une fen�tre � part

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub CommandButton1_Click()
 
Dim e As Integer
 
e = 4
If FeuilleExiste("2") = True Then
Range("C3").FormulaLocal = "=RECHERCHEV (A" & e & ";'1'!$A$3:$B$103;2;0)"
End If
 
 
End Sub

[SilkyRoad]

bonsoir

tu peux tester cette adaptation

Code :

S�lectionner tout - Visualiser dans une fen�tre � part

Range("C3").FormulaLocal = "=RECHERCHEV(A" & e & ";'1'!$A$3:$B$103;2;0)"

j'ai juste supprim� l'espace entre le V de RECHERCHEV et (


bonne soiree
michel

[Megaxel]

Et pour g�n�raliser la r�ponse de SilkyRoad: si tu r�cup�res le contenu de la formule que tu g�n�res, et que tu la colles dans une formule, est-ce qu'elle marche?

[David1974]

La suppression de l'espace a resolu le pbl.

Merci

[ouskel'n'or]

"Il me semble que quelqu'un a pos� une question tout � l'heure" (DeGaulle 1961)

Et pour g�n�raliser la r�ponse de SilkyRoad: si tu r�cup�res le contenu de la formule que tu g�n�res, et que tu la colles dans une formule, est-ce qu'elle marche?

Oui, �a marche, faut juste replacer les guillemets, modifier FormulaLocal en FormulaR1C1, et l�, peut-�tre, �a marchera aussi si tu n'as rien oubli�.
Tu as aussi l'option de placer la syntaxe VBA en utilisant Formula... ToutCourt...

Et puis t'as qu'� essayer...

A+

PS - Bon, j'arr�te pour aujourd'hui, je n'ai pas la t�te � �a.