Recopier le contenu d'une zone de texte vers une cellule

[Jiboune]

Bonjour le forum.

Je souhaite recopier le contenu d'une zone de texte (de feuil1) vers une cellule (de feuil2).

J'ai essayé avec ca

Range("a1") = TextBox2.Text

ou ca

Sheets("Feuil2").Cells(A, 5).Text = TextBox2.Text

mais il me renvoie " erreur 421 objet requis"

QQn peut-il m'aider?

Merci

 

[Michel_M]

bonjour Jiboune

Lorsque tu installe un textbox (ou autres msform) sur une feuille, ton objet textbox est une propriété de l'objet feuille de même que dans un USF textbox est une propiété de USF.

il faut donc que tu précises le propriétaire
par exemple:

Sheets(2).Activate
Range("A2") = Sheets(1).TextBox1

affecte à A2 en feuille 2 la saisie dans le textbox1 de la feuille 1

Autre chose: une zone de texte désigne un rectangle (barre outil dessin) dans lequel tu écris, rien à voir avec un textbox

A+
Michel