Visual Basic para Aplicaciones - Cómo ocultar un mensaje de error al iniciar libro de excel

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

Cómo ocultar un mensaje de error al iniciar libro de excel

Publicado por Angel (5 intervenciones) el 01/03/2019 17:21:32
Hola a todos y gracias desde ya! He creado un libro comparido con macros en Excel que al abrirlo en este modo me arroja un error 1004. A pesar de este error el libro tiene toda funcionalidad requerida para el fin, por eso al cerrar el cuadro de diálogo del error se trabaja normalmente. Mi pregunta es... ¿Con qué código VBA puedo lograr que este mensaje de error no aparezca en pantalla?
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
sin imagen de perfil
Val: 7
Ha aumentado 1 puesto en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Cómo ocultar un mensaje de error al iniciar libro de excel

Publicado por Angel (5 intervenciones) el 02/03/2019 14:31:31
Hola Antoni! Gracias por responderme. Verás sé el motivo del error y es que cómo documento compartido no acepta algunos seteos de la macro de inicio no acepta por la sólo condición de ser compartido. Ese mismo libro lo abrís sin compartir y no arroja error! El tema está en qué más allá del error el libro funciona perfecto, por eso es que quiero no se muestre.
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
Imágen de perfil de Antoni Masana
Val: 1.134
Oro
Ha mantenido su posición en Visual Basic para Aplicaciones (en relación al último mes)
Gráfica de Visual Basic para Aplicaciones

Cómo ocultar un mensaje de error al iniciar libro de excel

Publicado por Antoni Masana (498 intervenciones) el 03/03/2019 00:02:53
Por lo visto hay cosas que no se pueden hacer cuando el libro esta compartido.

Ver esta página: http://trucosycursos.es/que-no-hacer-en-un-libro-compartido-de-excel/

La forma de evitar el error a lo bestia es con un ON ERROR RESUME NEXT

La otra es saber si esta compartido el libro. He encontrado este código, no se como va, lo pruebas y puedes poner una condición para que no realice las tareas que dan error:

1
2
3
4
5
6
7
8
9
10
11
12
13
users = ActiveWorkbook.UserStatus
With Workbooks.Add.Sheets(1)
    For row = 1 To UBound(users, 1)
        .Cells(row, 1) = users(row, 1)
        .Cells(row, 2) = users(row, 2)
        Select Case users(row, 3)
            Case 1
                .Cells(row, 3).Value = "Exclusive"
            Case 2
                .Cells(row, 3).Value = "Shared"
        End Select
    Next
End With

Saludos.
\\//_
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