Visual Basic para Aplicaciones - Dbl.Clic celda, ir a Hoja 2 o 3, según estado bloqueo Hoja 1

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 10
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Dbl.Clic celda, ir a Hoja 2 o 3, según estado bloqueo Hoja 1

Publicado por jordi (3 intervenciones) el 15/05/2021 22:44:01
Hola lectores. Una vez más preciso de vuestra ayuda.
Según el estado de bloqueo Hoja 1, si la Hoja 1 está bloqueada (sin bloquear celda A1), al doble clic en celda A1 trasladarse a Hoja 2. Si la Hoja 1 está desbloqueada, al doble clic en celda A1 trasladarse a Hoja 3.

Les agradecería me indiquen cual es la instrucción a realiza.

Muchas gracias.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de David
Val: 40
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Dbl.Clic celda, ir a Hoja 2 o 3, según estado bloqueo Hoja 1

Publicado por David (10 intervenciones) el 21/05/2021 05:44:59
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
 '@dj.vivanco
 
    If Target.Address = Range("A1").Address Then
 
        If ActiveSheet.ProtectContents = True Then
 
            Sheets("Hoja2").Select
        Else
            Sheets("Hoja3").Select
 
        End If
 
    End If
 
 
End Sub
1
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar