Remplacer une base de donnees excel par une table access 2007

Résolu
pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention   -  
pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention   -
Bonjour
j' ai un fichier excel qui me permet d'attribuer differant droit d'accer
depuis la feuil parametrage que je souhaite remplacer par une table
pour que les macros dans le module1recuper les informations dans la table
pour attribuer les droit
NOM Mot de Passe
DURANT DUDU
Pour l'userform de connection
voici les ficher access et excel
Cordialement

https://www.cjoint.com/c/HKslJRS3rbU

https://www.cjoint.com/c/HKslLWRBzOU
A voir également:

4 réponses

yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   Ambassadeur 1 584
 
bonjour, as-tu une question?
0
pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention  
 
RE
Merci pour ton interet
si tu a une solution pour adapter le contenu du module 1pour que les information prisent
dans la table access et non dans la feuil parametrage excel
Cordialement
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention  
 
suggestion:
Function VerifMDP(Utilisateur As String, MdP As String) As Boolean
Dim rTrouve As dao.Recordset, sql As String

sql = "select * from parametrage where NOM='" & Utilisateur & "' and [Mot de Passe] ='" & MdP & "'"
Set rTrouve = CurrentDb.OpenRecordset(sql)
If rTrouve.EOF Then
    VerifMDP = False
Else
    VerifMDP = True
End If
End Function
0
pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention  
 
Re merci
cette ligne bug
Set rTrouve = CurrentDb.OpenRecordset(sql)
0
yg_be Messages postés 23541 Date d'inscription   Statut Contributeur Dernière intervention   1 584 > pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention  
 
"bug": quel message d'erreur?
tu as bien mis le code dans le fichier Access? oui bien tu souhaites laisser module1 dans le fichier Excel?
0
pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention  
 
j'ai ce message: Variable objet ou variable bloc With non définie (erreur 91)

oui je veux laisser module 1 dans excel et du coup randre visible les feuilles qui ont un X dans la table access
merci
0
castours
 
Bonjour
Compresse tes fichiers en zip ou rar puis tu les mets dans un comme la fait.
Ils seront plus facile a lire et ouvrir
0
pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention  
 
0
castours
 
bonjour
tu veux quoi exactement comme base de données
0
pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention  
 
Re
je souhaite adapter le contenu du module 1pour que les information prisent
dans la table access et non dans la feuil parametrage excel
Cordialement
0
castours
 
bonjour
est ce que tu peux faire ce que as en excel le faire directement en access
Dans access on peut faire des calcul
0
pyrus2047 Messages postés 153 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour
non pas possible chez moi tout le monde travail avec excel
0