Dim strName As String 'In VB strName = "Text1" Form1.Controls(strName).Text = "www.VB-fun.de" 'In VBA strName = "TextBox1" UserForm1.Controls(strName).Text = "www.VB-fun.de"