Insérer du texte dans une cellule depuis un userform

[Gametexx]

Bonjour, je souhaite créer un petit outil qui indiquerait dans une cellule le texte que je rentre dans un userform. Etant débutant en VB, le code que j'ai écrit retourne une erreur ( erreur 13). Quelqu'un sait où ca plante ???
Merci d'avance
Gametexx


Public montest As String



Sub test()


UserForm1.Show


End Sub

Sub test2()

Dim montest As String


montest = UserForm1.TextBox1.Value
Sheets(Feuil2).Cells(A1).Value = montest


End Sub

 

[Dranreb]

Bonjour
— Soit Feuil2 est le nom de l'objet Worksheet qui représente, dans VBA, la feuille Excel et alors il faut simplement
Feuil2.Cells("A1").Value = montest
— ou bien :
Feuil2.[A1].Value = montest
— soit c'est le nom Excel de l'onglet de cette feuille, et du même coup la clé de sa collection Sheets, et dans ce cas il faut le délimiter texte :
Sheets("Feuil2").Cells("A1").Value = montest
— ou bien :
Sheets("Feuil2").[A1].Value = montest