Votre fonction a marche pour moi (Excel97). Peut-etre essayez:

Cells(i,1).Value = 2*i au lieu de Cells(i,1) = 2*i

Aussi, faisez sur que votre fonction is dans un "module" et non pas dans le
code pour "sheet" ou "workbook".

--
Dianne Butterworth


jean-louis.garcia9 wrote:
Bonjour
j aimerai a partir d une fonction en VB ecrire dans une cecellule
particuliere j ai tente cela et ca ne marche pas savez vous pourqoiu
je suis avec XP pro merci

Sub ecrire()
dim i as integer
for i = 1 to 10
Cells(i,1) = 2*i
next i
end sub