XL 2019 récupération la valeur d'une cellule dans un texbox

benoit06190 à dit:

Bonsoir,
Après avoir essayer beaucoup de formules, je n'arrive pas à avoir la solution à mon problèmes. Voici mon soucis, je voudrais que le nom et prénom de ma cellule A7 de ma PANIER DE NOEL ( résultat d'une formule concatener) se copie directement dans le textbox1 de mon userform4.
J'ai également mis cet textbox en majuscule avec cette formule

Private Sub Textbox1_Change()
Userform4.Textbox1.Value=Active.Sheets("PANIER DE NOEL").Range("A7").Value
sub TextBox1_Change
TextBox1=UCase(TextBox1).

En vous remerçiant pour votre aide.

Cliquez pour agrandir...

Private Sub UserForm_Initialize()
    Me.TextBox1.Value = UCase(Sheets("PANIER DE NOEL").Range("A7").Value)
End Sub

Private Sub UserForm_Initialize()
    Me.TextBox1.Value = UCase(Range("A7").Value)
End Sub