Range mit Variabler festlegen

With Worksheets(2).Range("A5:L30")

Set c = .find([c2], LookIn:=xlValues)
If Not c Is Nothing Then
firstAddress = c.Address
...

Den Suchbereich möchte ich über eine ComboBox festlegen können. Ich habe mir folgendes gedacht: mit der Variablen "bereich" setzte ich (in Abhängigkeit vom gewählten Bereich) die Spalte bis zu der gesucht werden soll:

Dim bereich As String
If Sheets("Bestand").ComboBox2.Text = Cells(4, 1) Then
bereich = b
End If

With Worksheets(2).Range("A5:" & bereich & "30")
...

Allerdings gibt es da einen Laufzeitfehler 1004 (Anwendungs- oder Objekt-definierter Fehler).
Weiß jemand was da fehlt?

Gruß
Matthias