seguridad, al inicial macro segun pc.

[fantasma16]

saludos a todos los miembros del foro, mi corriosidad es la siguiente, es posible realizar un codigo o una macro para evitar

la apertura de un archivo (excel), si no concuerda con el nombre del equipo (pc). me explico, por ejemplo. para moder abrir el archivo este ejecute un codigo o una macro en el evento de apertura (ThisWorkbook) y comprueve q se esta ejecutando dicho archivo en una pc cuyo nombre es pc1. y si no concuerda con el nombre del equipo(pc) un cierre eforzoso del archivo.. de antemano muchas gracias por el aporte y ayudad.....

[tese1969]

Buenas, fantasma16

Prueba con una línea del tipo....

nombre_pc = Environ$("COMPUTERNAME")

[/CODE]

para extraer el nombre del equipo.........luego lo utilizas para compararlo con el que desees (a través de su inclusión en el código) y si es el mismo, pues que siga......y si no lo es......que lo cierre.....jejeje

Prueba y me dices.....

Un saludo,

Tese