Visual Basic - Error leyendo Excel

La siguiente rutima pretende abrir una planilla Excel

Dim appExcel As Excel.Application
Dim wbLibro As Workbook

CommonDialog1.ShowOpen

'Abre archivo Excel
Set appExcel = New Excel.Application
Set wbLibro = appExcel.Workbooks.Open(CommonDialog1.FileName)

'Ahora traslado las celdas a variables de memoria. Por ej:
nombre = wbLibro.Worksheets(1).Range(B1).Value

En esta última sentencia obtengo un
error '1004' en tiempo de ejecución:
error definido por la aplicación o el objeto.
¿Ayuda de alguien que sepa más que yo?
Muchas gracias desde ya.

Mira creo que microsoft explica la solucion aca !!

http://support.microsoft.com/kb/178510

por las dudas te expongo el codigo

Dim xlApp As Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Set xlApp = CreateObject("Excel.Application")
Set xlBook = xlApp.Workbooks.Add
Set xlSheet = xlBook.Worksheets("Sheet1")
1) xlSheet.Range(Cells(1, 1), Cells(10, 2)).Value = "Hello"
2) xlSheet.Range(xlSheet.Cells(1, 1), xlSheet.Cells(10, 2)).Value = "Hello"

xlBook.Saved = True
Set xlSheet = Nothing
Set xlBook = Nothing
xlApp.Quit
Set xlApp = Nothing

donde dicen cambiar la linea 1) por la 2)

espero que esa sea tu solucion saludos

El nombre de la celda va entre comillas ( "B1")