............ Foro Excel
Si no lo has hecho aún: REGISTRATE!!!

repetir un codigo en la misma Hoja2

Ver el tema anterior Ver el tema siguiente Ir abajo

repetir un codigo en la misma Hoja2

Mensaje por morales el Jue Oct 15, 2009 2:05 pm

Estoy intentando adaptar un codigo
Private Sub Worksheet_Change(ByVal Target As Range)
Dim myRng As Range
Set myRng = Sheets("Hoja2").Range("A1:A15")
If Target.Address <> "$A$1" Then Exit Sub
myRng.Value = Target.Value
End Sub

Repite 15 veces el número que hay en la celda A1, (de la Hoja1) en la Hoja2. El problema en que no se como poner para que coja la celda A1 de la Hoja2, es decir que repita el primer numero de la columna que hay en la Hoja2.
La idea es tocar un hoja, pero una vez acabado esta "fución" hace como un reset.
Se puede cambiar la hoja de la orden If.Target.Address o que todo afecte solo a la Hoja2,
Gracias

morales

Cantidad de envíos : 10
Fecha de inscripción : 01/12/2008

Volver arriba Ir abajo

Re: repetir un codigo en la misma Hoja2

Mensaje por GalileoGali el Jue Oct 15, 2009 6:36 pm

Realmente no es claro tu problema, pero prueba esto, copia la macro y colocala en el Modulo de la Hoja2, en Lugar del Modulo de la Hoja1 (donde supongo que lo tienes ahora.

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1962
Edad : 61
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: repetir un codigo en la misma Hoja2

Mensaje por morales el Vie Oct 16, 2009 2:55 pm

Gracias, me se ha quedado cara de tonto, ayer busque mas de 20 combinaciones, y era tan sencillo como ponerlo en la hoja en que quieres que funcione. Yo pense que era como un macro que funcionaba en todo el libro o por defecto solo en la primera hoja.
Se puede hacer que ejecute dos "eventos" es decir que si se modifica la celda A1 modifica de la A2 a la A10, y si se modifica la C1 con otro valor de la C2 a la C10.

Gracias

morales

Cantidad de envíos : 10
Fecha de inscripción : 01/12/2008

Volver arriba Ir abajo

Re: repetir un codigo en la misma Hoja2

Mensaje por GalileoGali el Vie Oct 16, 2009 5:57 pm

te recomiendo leer la ayuda de VBA y (googlear) para la Instruccion Select Case

_________________
GalileoGali
M.A.P. 2010-2013
Microsoft Active Professional
avatar
GalileoGali
Admin

Masculino Cantidad de envíos : 1962
Edad : 61
Ciudad - Pais : QUIROGA, Argentina
Version de Excel : 2000-2003-2007-2010
Fecha de inscripción : 24/01/2008

http://excelgali.mejorforo.net

Volver arriba Ir abajo

Re: repetir un codigo en la misma Hoja2

Mensaje por morales el Sáb Oct 17, 2009 6:54 am

Gracias

morales

Cantidad de envíos : 10
Fecha de inscripción : 01/12/2008

Volver arriba Ir abajo

Re: repetir un codigo en la misma Hoja2

Mensaje por morales el Sáb Oct 17, 2009 7:51 am

Ya lo he conseguid, por si a alguien le hace falta tendria un formato:
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
Select Case Target.Address
Case "$L$2"
Range("L3:L12").Value = Range("L2").Value
Case "$P$2"
Range("P3:P12").Value = Range("P2").Value
Case "$S$2"

Habría que eliminar el codigo anterior, ya que sino de duplican las intrucciones.

Saludos y gracias de nuevo.
Range("S3:S12").Value = Range("S2").Value

End Select

End Sub

morales

Cantidad de envíos : 10
Fecha de inscripción : 01/12/2008

Volver arriba Ir abajo

Re: repetir un codigo en la misma Hoja2

Mensaje por Contenido patrocinado


Contenido patrocinado


Volver arriba Ir abajo

Ver el tema anterior Ver el tema siguiente Volver arriba


 
Permisos de este foro:
No puedes responder a temas en este foro.