{VBA Excel}recopie de formules

Bonjour

je tente avec une macro de recopier une formule dans une colonne de la colonne E à la ligne 2 à 340

voici la formule qui se trouve dans la ligne 1 colonne E

Code:

=SI($C3&$D3<'F:\Pr gomme semaine\[calcul gomme4,0.xls]Etat des stocks'!$F$8&'F:\Pr gomme semaine\[calcul gomme4,0.xls]Etat des stocks'!$E$7&'F:\Pr gomme semaine\[calcul gomme4,0.xls]Etat des stocks'!$F$7;"";SI(ET($I3=795;M3="Aoustin");SI($L3="Citerne";1;SI($L3="fût";0,8;0));""))

j'ai fait enregistreur de macro et il m'as donnée ceci
Code:

1 2 3 4 5 6 7 8 9 10 Sub mise_a_jour_colone_E() ' ' mise_a_jour_colone_E Macro ' Macro enregistrée le 13/08/2007 par GS ' ' Selection.AutoFill Destination:=Range("E2:E337"), Type:=xlFillDefault Range("E1:E337").Select End Sub
mais quand je lance cette macro ca ne marche pas

la formule d'origine se situe en E1 et je voudrais la recopier de E2 à E340

tout votre aide serais apprecié
merci

Code:

1
2
3
4
5
6
7
8
9
10
11
Sub mise_a_jour_colone_E()
'
' mise_a_jour_colone_E Macro
' Macro enregistrée le 13/08/2007 par GS
'
 
'
    Range("E1").Select
    Selection.AutoFill Destination:=Range("E2:E337"), Type:=xlFillDefault
    Range("E1:E337").Select
End Sub

c'est bon ca marche