Error al asignar un rango
Publicado por Pablo García (2 intervenciones) el 21/06/2019 14:26:35
Hola,
A ver si alguien me puede ayudar
Quiero asignar una rango a una variable de tipo rango:
Se queja en la ejecución de "Variable de objeto o bloque With no establecido"
Esta misma instrucción la hago para llamar a un proceso de búsqueda y va perfectamente:
Si me pudieráis echar un cable, os lo agradecería
Un Saludo.
A ver si alguien me puede ayudar
Quiero asignar una rango a una variable de tipo rango:
1
2
3
4
5
6
Dim matriz_buscar As range
With Worksheets("Medición")
.Activatematriz_buscar = .range(.range("A2"), .range("A2").End(xlDown))
End With
Se queja en la ejecución de "Variable de objeto o bloque With no establecido"
Esta misma instrucción la hago para llamar a un proceso de búsqueda y va perfectamente:
1
2
3
4
5
6
7
With Worksheets("Medición")
.ActivateBUSCAR "Consulta Paciente", "1", .range(.range("A2"), .range("A2").End(xlDown)), "Medición", "2"
End With
Sub BUSCAR(sheet As String, valor_buscado As Variant, matriz_buscar As range, tipo_sheet As String, Optional valor_buscado2 As Variant)
Si me pudieráis echar un cable, os lo agradecería
Un Saludo.
Valora esta pregunta
0