× Aidez la recherche contre le COVID-19 avec votre ordi ! Rejoignez l'équipe PC Astuces Folding@home
 > Tous les forums > Forum Bureautique
 Gestion des utilisateurs
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
ronibo
  Posté le 26/06/2013 @ 20:58 
Aller en bas de la page 
Petit astucien

Bonjour le forum,


J'aurais besoin de votre expérience en vba pour m'aider à créer des codes


J'ai crée des userforme pour gérer les utilisateurs, je vous mets le fichier ci joint

Je vous donner une idée de s'que je souhaiterai avoir en PJ (le principe reste le même), vous pouvez reprendre les macros, moi j'ai pas réussi à le faire.


Merci d'avance pour votre aide et le temps que vous allez me consacrer

a+

Fichier concerné :

http://cjoint.com/?CFAu4rEXwZn

Fichier exemple :

http://cjoint.com/?CFAu56ezzna

Publicité
vieuxmonsieur
 Posté le 27/06/2013 à 20:12 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

est-ce quelque chose comme ca que tu souhaite ?

http://cjoint.com/?3FBjSahnrjy

ronibo
 Posté le 28/06/2013 à 13:43 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour le forum,

Oui vieuxmonsieur ça me convient parfairement,

Il me manque plus qu'à intégrer ça dans mon fichier ;)

a+

ronibo
 Posté le 28/06/2013 à 15:00 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

J'aurais quelques question concernant ce fichier.

J'aimerais savoir la diférrence entre le niveau 1 et 2 (le niveau 3 je c'est que c'est administrateur)

Puis est possible de créer des mots de passes en des chiffres seulement?

vieuxmonsieur
 Posté le 28/06/2013 à 15:23 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Astucien

bonjour,

la difference se situe dans les proprietes du USF

Private Sub MaMacro(Niveau As Byte)
Select Case Niveau
Case 1
With Niv1
.Visible = True
.Activate
End With
MaSecondeMacro Me.Txb_ID_Util 'Transmission d'arguments pour Pias
Unload Me
Case 2
With Niv1
.Visible = False
End With

With Niv2
.Visible = True
.Activate
End With
MaSecondeMacro Me.Txb_ID_Util 'Idem (vu que le USF reste Ouvert je n'en ai pas besoin, mais pour le fun
Unload Me
Case 3
Call Admin 'Appel de la macro Admin en Module1
End Select
End Sub





Modifié par vieuxmonsieur le 29/06/2013 01:13
Page : [1] 
Page 1 sur 1

Vous devez être connecté pour poster des messages. Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !


Les bons plans du moment PC Astuces

Tous les Bons Plans
799,99 €Portable Dell Inspiron G3 (15 pouces, FullHD, Core i5, 8Go, SSD 512Go, GTX 1660 Ti) à 799,99 € (odr)
Valable jusqu'au 01 Décembre

RueDuCommerce fait une belle promotion sur l'ordinateur portable Dell Inspiron G3 15-3590 qui passe à 899,99 € alors qu'on le trouve ailleurs à partir de 1199 €. Or Dell rembourse actuellement 100 € pour l'achat de cet ordinateur qui vous reviendra à 799,99 € après remboursement. Cet ordinateur possède un écran 15 pouces Full HD IPS, un processeur Intel Core i5-10300H, 8 Go de RAM et un SSD de 512 Go ainsi qu'une une carte graphique dédiée GeForce GTX 1660 Ti 6 Go. Le tout tourne sous Windows 10. Une très belle machine qui vous permettra de tout faire, même les jeux, en déplacement.


> Voir l'offre
7,30 €Micro clé USB 3.1 Sandisk Ultra Fit 32 Go à 7,30 €
Valable jusqu'au 30 Novembre

Amazon fait une promotion sur la micro clé USB Sandisk Ultra Fit d'une capacité de 32 Go qui passe à 7,30 €. La minuscule taille de cette clé USB va vous permettre de la laisser brancher en permanence sur votre portable, votre TV ou votre autoradio sans qu'elle dépasse de manière disgracieuse. Sa compatibilité USB 3.1 lui permet d'atteindre des débits jusqu'à 130 Mo/s. 


> Voir l'offre
46,27 €SSD Crucial BX500 480 Go à 46,27 € livré
Valable jusqu'au 30 Novembre

Amazon Allemagne propose actuellement le nouveau SSD Crucial BX500 480 Go à 41,65 € (avec la TVA ajustée). Comptez 4,62 € pour la livraison en France, soit un total de 46,27 € livré alors qu'on le trouve ailleurs à plus de 55 €. Ce SSD offre des débits de 540 Mo/s en lecture et 500 Mo/s en écriture. Le SSD est accompagné du logiciel Acronis true image qui vous permettra de transférer tout le contenu de votre ancien disque dur sur le SSD. Il est garanti 3 ans. 

Vous pouvez utiliser votre compte Amazon France sur Amazon Allemagne et il n'y a pas de frais de douane. Si vous êtes perdu en allemand, vous pouvez traduire le site en anglais.


> Voir l'offre

Sujets relatifs
Cherche logiciel travail collaboratif en ligne pour gestion de projets
fichier excel - gestion des nombres identiques
Gestion mensuel vehicule
gestion @ mail dans fichier clients Excel
excel - gestion des favoris
Accès pour "gestion ordi"
Logiciel SaaS de Gestion des Stocks
Gestion d'entreprise
KDE gestion des fenêtre Windows
Gestion des disques durs de trois PC
Plus de sujets relatifs à Gestion des utilisateurs
 > Tous les forums > Forum Bureautique