Bienvenido a la mayor comunidad de usuarios EXCEL

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

Regístrate gratis

Privilegios y restricciones

FernandaExcel

New member
Registrado
23 Feb 2018
Mensajes
206
Hola a todos, estoy con unas dudas al crear privilegios y restricciones de mi archivo, donde algunos usuarios pueden ver las hojas del libro, y otros no, y también activar el commandbutton, pero...
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í
 

Adjuntos

    Sin permisos de acceso
FernandaExcel dijo:
Hola Antoni, desafortunadamente no puedo abrir el archivo, porque mi versión de excel no se puede configurar la propiedad Rowsource, y se ve que es lo que quiero :cry...
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í
 
Antoni dijo:
Vamos por partes, sube tu archivo, primero solucionaremos el tema del combo Usuario y luego ya veremos.
Subo el mismo que me diste, con las modificaciones, en...
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í
 

Adjuntos

    Sin permisos de acceso
Buenos días a ustedes.

Por ahora podrías ir viendo:
Código:
xUsuario= Sheets("Hojas").Range("A2:A" & Sheets("Hojas").Range("A" & Rows.Count).End(xlUp).Row)
 
VBA dijo:
Buenos días a ustedes.

Por ahora podrías ir viendo:
Código:
xUsuario= Sheets("Hojas").Range("A2:A" & Sheets("Hojas").Range("A" & Rows.Count).End(xlUp).Row)
Hola VBA...
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í
 
A mi me funciona así:
Código:
xUsuario.RowSource = Sheets("DATOS").Range("A2:A" & Sheets("DATOS").Range("A" & Rows.Count).End(xlUp).Row).Address

Pruebe cambiando:
Código:
Sub Macro1()...
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í
 
VBA dijo:
A mi me funciona así:
Código:
xUsuario.RowSource = Sheets("DATOS").Range("A2:A" & Sheets("DATOS").Range("A" & Rows.Count).End(xlUp).Row).Address

Pruebe cambiando:
Código:
Sub...
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í
 
Buen Día Antoni, quisiera hacer un formulario de acceso para el adjunto en donde ciertos usuarios puedan acceder a algunas hojas pero soy nuevo en el tema y no tengo idea de como realizarlo, tu...
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í
 

Adjuntos

    Sin permisos de acceso
Volver
Arriba