Pb envoi données textbox vers cellule excel

Bonjour à tous,

J'ai un petit souci lorsque je construis une form avec une textbox1 destinée à receuillir le texte tapé par l'utilisateur et à l'envoyer vers la cellule C1 d'une feuilexcel1. Voici le code:

Private Sub VALIDER_Click ()

feuilexcel1=GetObject("C:\Etalaq\Etalonnage.xls")
textbox1.text=feuilexcel1.Worksheets("feuil1").Range("C1").Value

End Sub

Le souci est simple : le renvoi ne se fait pas, pourquoi ???

Si quelqu'un a une idée, je le remercie chaleureusement par avance.