modificar el codigo de acuerdo a valor de celda a1

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!

modificar el codigo de acuerdo a valor de celda a1

Notapor jhon6666 » 27 Sep 2018 17:41

expertos como modificar el codigo para que cada vez que cambie de valor en la primera hoja de la celda a1 las otras dos tambien cambien
No tiene los permisos requeridos para ver los archivos adjuntos a este mensaje.
jhon6666
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 311
Registrado: 04 Ago 2017 21:40

Re: modificar el codigo de acuerdo a valor de celda a1

Notapor jhon6666 » 30 Sep 2018 09:21

expertos la idea es que cada ver que coloque un numero diferente en la celda a1 de la hoja actual , ese mismo numero se coloque en la hoja anterior1 y anterior 2
este es el codigo
Sub Controldenúmero1_Cambiar()
Dim n As Integer
For n = 1 To Len([A1])
BuscarÁrea n, Mid([A1], n, 1), 4, 13
BuscarÁrea n, Mid([A1], n, 1), 17, 26
Next

End Sub
y este es el codigo que lo complementa
Sub BuscarÁrea(n As Integer, Número As Integer, x1 As Long, x2 As Long)
Application.ScreenUpdating = False

y = (n - 1) * 2 + 5 'empieza en col E
aTablas:
Range(Cells(x1, y), Cells(x2, y)).Interior.ColorIndex = xlNone
For x = x1 To x2
If Cells(x, y) = Número Then
Cells(x, y).Interior.Color = vbYellow
'pasa a la tbla siguiente
GoTo siguenTablas
End If
Next

siguenTablas:
'sigue con otras tablas
y = y + 9
If y > 57 Then Exit Sub
GoTo aTablas
End Sub
jhon6666
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 311
Registrado: 04 Ago 2017 21:40

Re: modificar el codigo de acuerdo a valor de celda a1

Notapor jhon6666 » 08 Oct 2018 15:06

alguna idea
me serviria de mucha ayuda
jhon6666
Miembro Frecuente
Miembro Frecuente
 
Mensajes: 311
Registrado: 04 Ago 2017 21:40


Volver a Macros

¿Quién está conectado?

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