Pour adapter la taille d'un UserForm :
Dans les propriétés du Userform tu as un paramètre 'ScrollBars', tu met se paramètre sur 2-fmScrollbarsVertical
En suite tu regardes le paramètre 'Height' (c'est la taille, la hauteur, de ton UserForm)
Et dans le paramètre ScrollBarsHeight tu met le double de la valeur relevée dans Height
Après à toi d'adapter les nombres pour ajuster tout ça
Pour lier une cellule avec un Label :
Me.Label1.Caption=sheets("Feuil1").range("A1")
'En supposant que le texte que tu veux mettre se trouve sur la Feuil1 en cellule A1