Relacionar una celda de una hoja con otra celda de otra hoja con macros

14/03/2006 - 15:11 por auntent | Informe spam
Tengo un libro de excel con tres hojas
1. bddatos
2. empresas
3. consultas

¿cómo puedo hacer para que por medio de una macro en la hoja 'consultas'
relacione la celda empresas!F2 y la coloque en la celda consultas!F2 por
medio de una macro?
intente lo siguiente:

sub routine1()
dim codigo as string
Sheets('empresas').select
Range("F2").select
codigo=activeCell
Sheets(`consultas').select
Range("F2")=codigo
codigo=empty
end sub

Hay alguna manera de hacerlo más corto?. agradecere cualquier ayuda

ARENART S.R.L.
Augusto Unten T.
Gerencia de Operaciones
Bartolomé Herrera 451 - Lima 14 - PERU
Teléfono: (511)265-7878
Nextel: (511)819*6022
Celular: (511)9819-6022
E-mail: aunten@arenart.com / operaciones@arenart.com
website: http://www.arenart.com
Proyekta: http://www.arenart.com/proyekta
 

Leer las respuestas

#1 Juan
14/03/2006 - 15:39 | Informe spam
hola

a ver si esto te sirve

sub routine1()
worksheets("consultas").range("F2").value=worksheets("empresas").range("F2").value
end sub

un saludo
juan

"auntent" escribió en el mensaje
news:
Tengo un libro de excel con tres hojas
1. bddatos
2. empresas
3. consultas

¿cómo puedo hacer para que por medio de una macro en la hoja 'consultas'
relacione la celda empresas!F2 y la coloque en la celda consultas!F2 por
medio de una macro?
intente lo siguiente:

sub routine1()
dim codigo as string
Sheets('empresas').select
Range("F2").select
codigo=activeCell
Sheets(`consultas').select
Range("F2")=codigo
codigo=empty
end sub

Hay alguna manera de hacerlo más corto?. agradecere cualquier ayuda

ARENART S.R.L.
Augusto Unten T.
Gerencia de Operaciones
Bartolomé Herrera 451 - Lima 14 - PERU
Teléfono: (511)265-7878
Nextel: (511)819*6022
Celular: (511)9819-6022
E-mail: /
website: http://www.arenart.com
Proyekta: http://www.arenart.com/proyekta

Preguntas similares