Cargar datos de excel en un COMBOBOX.

Experto tu ayuda por favor.

Tengo dos hojas en excel Hoja1; Hoja2 y tengo un USERFOM con un combobox3 el cual carga información de la columna B lo que no he podido es especificar que me cargue la información de la columna b pero unicamente de la Hoja2.

tengo el siguiente código

Private Sub UserForm_Initialize()

Dim rng As Range
With ThisWorkbook.Worksheets(1)
Set rng = .Range(.[B2], .[B65536].End(xlUp))
End With
ComboBox3.RowSource = rng.Address(, , , True)
End Sub

Con el anterior código carga la información requerida pero de la hoja que esta activa.

Por fa tu ayuda..