Aşağıdaki kodu kendi projenize göre düzenleyiniz.
Private Sub UserForm_Initialize()
Label1.Caption = [Sayfa1!A1]
If Label1.Caption = "Admin" Then
Label2.Caption = [Sayfa1!B2]
End If
If Label1.Caption = "User" Then
Label2.Caption = [Sayfa1!B3]
End If
End Sub