Error al definir variable de rango

Solo consultas sobre macros y código VBA Excel.

Reglas del Foro
1. Antes de hacer tu pregunta intenta con el buscador de este foro (muchas preguntas ya fueron respondidas antes!)
2. Si haces una nueva pregunta, es muy recomendable que adjuntes el ejemplo Excel para poder comprenderla mejor!
3. Realiza tu pregunta de forma clara, explicando bien cada paso de lo que haces y tendrás más probabilidad de respuesta!
Compartir en:
     

Error al definir variable de rango

Notapor oruiz » 31 Ene 2012 10:25

Tengo la necesidad de definir una variable de rango, que hace referencia a una hoja llamada "Base" pero estando activa otra distinta. Tengo el siguiente código y me genera error.

Sub oro()
Dim a As Range
filbase = Sheets("Base").Cells(1, 1).End(xlDown).Row
Set a = Range(Sheets("Base").Cells(2, 2), Sheets("Base").Cells(filbase, 2))
End Sub

Agradezco su valiosa ayuda,
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
oruiz
Miembro Frecuente
Miembro Frecuente
 
Registrado: 20 Nov 2005 20:57

Re: Error al definir variable de rango

Notapor Adrian » 31 Ene 2012 14:18

Hola, estando en otra hoja corro la macro sin, problemas, será que olvidaste definir la varibale FilBase?, pongo macro "rectificada".

Código: Seleccionar todo
Sub oro()
Dim a As Range, FilBase As Long
FilBase = Sheets("Base").Cells(1, 1).End(xlDown).Row
Set a = Range(Sheets("Base").Cells(2, 2), Sheets("Base").Cells(FilBase, 2))
End Sub
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
Adrian
Moderator
Moderator
 
Registrado: 13 Jun 2004 17:24
Ubicación: Chamical La Rioja ARG

Re: Error al definir variable de rango

Notapor Cacho R » 31 Ene 2012 14:52

Hola! oruiz (y Adrián). Quizás también pueda servir:

Código: Seleccionar todo
Sub oro()
Dim a As Range
With Sheets("Base")
  Set a = .Range(.[b2], .[a1].End(xlDown).Offset(, 1))
End With
End Sub

Saludos, Cacho R.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
Cacho R
Miembro Frecuente
Miembro Frecuente
 
Registrado: 23 Jun 2011 17:15
Ubicación: Buenos Aires

Re: Error al definir variable de rango

Notapor oruiz » 31 Ene 2012 15:27

Caho R y Adrian,

Muchísimas gracias por su ayuda. Problema resuelto.
* Te recomendamos estos productos Excel: Manual de Macros | Manual de Funciones | Nuevas Funciones | ddTraDa
Avatar de Usuario
oruiz
Miembro Frecuente
Miembro Frecuente
 
Registrado: 20 Nov 2005 20:57


Compartir en:
     

  • Anuncio
Manual Excel avanzado

Volver a Macros

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 4 invitados