Bonjour Florian140001,
Une proposition simple et rapide. Utiliser une cellule de feuille comme intermédiaire.
'Code à placer dans la partie code de la feuille A
Private Sub TextBox1_LostFocus()
'Lors de la sortie du TextBox1 par clic sur une cellule de la feuille A
'La feuille B reçoit dans une cellule choisie le texte
Sheets("Feuille B").Range("C10") = TextBox1.Text
End Sub
'Code à placer dans la partie code de la feuille B
Private Sub Worksheet_Activate()
'Récupération du texte envoyé
Label1.Caption = Range("C10")
End Sub
Le label recouvrant cette cellule C10 de la feuille B.
Possibilité aussi d'utiliser un label transparent afin de formater (police) différemment la cellule (ici C10) que l'on ne pourrait pas avec le format police du label.