[[mightydragonlor]]

Hola no entiendo cual es la necesidad clara que tienes, pero si lo que quieres es leer un archivo de excel y lo que te está generando error es esto:

                If xRango.Value <> Nothing Then
                    aux = xRango.Value.ToString
                End If

lo puedes solucionar con:

           If Not xRango Is Nothing Then
                If xRango.Value <> Nothing Then
                    aux = xRango.Value.ToString
                End If
           End If