objektvariable erstellen mit Array

wie kann ich einer Objektvariable mit einer Stringvariable erweitern, so dass es immer noch als Objektvariable erkannt wird? Folgend ein Beispielcode der ein spezielles Inputfeld (der Name soll wahlweise aus einer Tabelle gelesen werden) ausblenden soll:
'-------------------------------------
Private Sub CommandButton1_Click()
feldname = Worksheets("Einstellungen").Cells(1, 1).Value
Set x = "Rahmen1.Rahmen2." & feldname
Dim x As Object
x.Visible = False
End Sub
'-------------------------------------

Was mache ich falsch (snif)!?

Danke und Gruss
Poke