Forums Últimos mensajes - Powered by IBM
 
Tags Palabras claves

error 1004 en el metodo range del objeto global

08/01/2010 - 12:03 por Javier VFM | Informe spam
Ayuda Hacer una pregunta
Tengo una rutina en access que exporta a excel y crea un hypervinculo en una
determinada celda.El problema es que la primera vez que ejecuta el codigo
funciona bien. Pero la segunda vez que lo ejecuto me da el error antes
expuesto. Si me salgo de la base de datos y vuelvo a entrar, funciona la
primera vez.
el codigo es
Celda = "X" & irow
NombrePlano = Nz(rs("FOTO1"))
If NombrePlano <> Null Then
Set oExcel1 = Range(Celda).Hyperlinks.Add _
(Range(Celda), NombrePlano)
End If

si elimino estas lineas puedo ejecutar la rutina y genera bien el XLS.

gracias
email Siga el debateRespuesta 2 respuestasRespuesta Tengo una respuesta
DRAGON AGE™: INQUISITION – Matadragones
 

Leer las respuestas

#1 pepe
08/01/2010 - 16:07 | Informe spam
No puedes añadir un hiperlink a una celda que ya lo tiene. Antes de crear el
hiperenlace comprueba si ya existe uno y, en suc aso, lo borras.


"Javier VFM" escribió en el mensaje de
noticias news:
Tengo una rutina en access que exporta a excel y crea un hypervinculo en
una
determinada celda.El problema es que la primera vez que ejecuta el codigo
funciona bien. Pero la segunda vez que lo ejecuto me da el error antes
expuesto. Si me salgo de la base de datos y vuelvo a entrar, funciona la
primera vez.
el codigo es
Celda = "X" & irow
NombrePlano = Nz(rs("FOTO1"))
If NombrePlano <> Null Then
Set oExcel1 = Range(Celda).Hyperlinks.Add _
(Range(Celda), NombrePlano)
End If

si elimino estas lineas puedo ejecutar la rutina y genera bien el XLS.

gracias

Preguntas similares

 

Busqueda sugerida :