Bienvenido a la mayor comunidad de usuarios EXCEL

Regístrate gratis ahora para ver contenidos y descargas sin restricciones!

Regístrate gratis

Macro de seguridad usando el MacAddres

jnoba316

New member
Registrado
7 Ago 2023
Mensajes
18
Buenas noches chicos,

Me encantaria revisar esta macro, para ver en que la puedo mejorar y si hay algo mas simple ya que tengo poca practica en la materia.

Mi deseo es que si pongo el No. de...
Para poder visualizar el resto de este tema y sus adjuntos:
. Si nunca te has registrado puedes registrarte gratis aquí
. Si ya te has registrado debes
iniciar sesión aquí
 
Solución
lo unico que busco es, que por cada venta de la copia del documento me deben dar el codigo mac, yo lo introdusco a la macro para darle acceso
ya que eres tu quien ingresa el macAddress 'autorizado' en el evento de apertura, lo mas simple (y creo lo unico) que necesitas es:
Código:
Private Sub Workbook_Open(): Application.ScreenUpdating = False
  If GetObject("winmgmts:\\.\root\cimv2") _
    .ExecQuery("select * from win32_networkadapterconfiguration where ipenabled = true") _
      .ItemIndex(0).macAddress <> "xx-xx-xx-xx-xx-xx" Then Me.Close False
End Sub

a menos que sea imprescindible (des/re)ocultar ciertas hojas (se supone que el ingreso ya esta autorizado, no ?)
haz pruebas antes de su entrega (por si las...
Volver
Arriba