Probleme de variable Public sous Access 2010
Résolu
benpourquoi
Messages postés
9
Date d'inscription
Statut
Membre
Dernière intervention
-
benpourquoi Messages postés 9 Date d'inscription Statut Membre Dernière intervention -
benpourquoi Messages postés 9 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
Avant tout merci à ceux qui m'aideront
J'ai déclaré une variable public dans un module :
Option Compare Database
Option Explicit
Public TypeUtilisateur As String
Ensuite j'ouvre un formulaire :F_Revendeurs
Dans ma procedure FormLoad j'ai ceci :
If TypeUtilisateur <> "Agent" Then
Me.Modifiable53.Enabled = True
Else
Me.Modifiable53.Enabled = False
End If
A la ligne if TypeUtilisateur <> "Agent" Then
J'ai le message d'erreur "Erreur d'execution 5 (Argument ou appel de procedure incorrect)
et la je seche
Merci d'avance pour votre aide
Avant tout merci à ceux qui m'aideront
J'ai déclaré une variable public dans un module :
Option Compare Database
Option Explicit
Public TypeUtilisateur As String
Ensuite j'ouvre un formulaire :F_Revendeurs
Dans ma procedure FormLoad j'ai ceci :
If TypeUtilisateur <> "Agent" Then
Me.Modifiable53.Enabled = True
Else
Me.Modifiable53.Enabled = False
End If
A la ligne if TypeUtilisateur <> "Agent" Then
J'ai le message d'erreur "Erreur d'execution 5 (Argument ou appel de procedure incorrect)
et la je seche
Merci d'avance pour votre aide
A voir également:
- Probleme de variable Public sous Access 2010
- Clé activation office 2010 gratuit - Télécharger - Sécurité
- Ip public - Guide
- Word 2010 - Télécharger - Traitement de texte
- Proximus public wifi password free - Forum Bbox Bouygues
- Réseau public ou privé - Forum Réseau
8 réponses
Salut,
et si tu fais un msgbox TypeUtilisateur avant ton test, tu as quoi à l'affichage ?
Se pourrait-il que la variable ne contienne rien ?
et si tu fais un msgbox TypeUtilisateur avant ton test, tu as quoi à l'affichage ?
Se pourrait-il que la variable ne contienne rien ?
Bonjour et merci de me repondre ,
Oui j'ai mis un msgbox et j'ai bien ma valeur
Merci a toi
Oui j'ai mis un msgbox et j'ai bien ma valeur
Merci a toi
Merci beaucoup pour ta réactivité
Ma variable n'est pas dans une fonction
j'ai du supprimer la ligne je ne sais combien de fois
J'ai fais ce que tu m'as demandé à savoir affecté ma variable public dans une variable locale.
Une Question : Je suis allé un peu trop vite dans mon premier message :
En fin de compte mon Form F_Revendeurs est une Sous-Form d'un formulaire F_General qui lui comporte des onglets dont un contient le Form F_Revendeurs.
J'ai mis un curseur dans ma procédure Form Load de F_General avec ceci :
Private Sub Form_Load()
If TypeUtilisateur = "Agent" Then
Me!Onglets.Pages(0).Visible = True
Me!Onglets.Pages(1).Visible = False
Me!Onglets.Pages(2).Visible = True
Me!Onglets.Pages(3).Visible = False
Me!Onglets.Pages(4).Visible = False
Me!Onglets.Pages(5).Visible = False
Else
Me!Onglets.Pages(0).Visible = True
Me!Onglets.Pages(1).Visible = True
Me!Onglets.Pages(2).Visible = True
Me!Onglets.Pages(3).Visible = True
Me!Onglets.Pages(4).Visible = True
Me!Onglets.Pages(5).Visible = True
End If
End Sub
Mais l'application ne passe pas par F_General mais directement par F_Revendeurs .
Y a t-il un lien vace mon bug.
D'avance je te remercie
Ma variable n'est pas dans une fonction
j'ai du supprimer la ligne je ne sais combien de fois
J'ai fais ce que tu m'as demandé à savoir affecté ma variable public dans une variable locale.
Une Question : Je suis allé un peu trop vite dans mon premier message :
En fin de compte mon Form F_Revendeurs est une Sous-Form d'un formulaire F_General qui lui comporte des onglets dont un contient le Form F_Revendeurs.
J'ai mis un curseur dans ma procédure Form Load de F_General avec ceci :
Private Sub Form_Load()
If TypeUtilisateur = "Agent" Then
Me!Onglets.Pages(0).Visible = True
Me!Onglets.Pages(1).Visible = False
Me!Onglets.Pages(2).Visible = True
Me!Onglets.Pages(3).Visible = False
Me!Onglets.Pages(4).Visible = False
Me!Onglets.Pages(5).Visible = False
Else
Me!Onglets.Pages(0).Visible = True
Me!Onglets.Pages(1).Visible = True
Me!Onglets.Pages(2).Visible = True
Me!Onglets.Pages(3).Visible = True
Me!Onglets.Pages(4).Visible = True
Me!Onglets.Pages(5).Visible = True
End If
End Sub
Mais l'application ne passe pas par F_General mais directement par F_Revendeurs .
Y a t-il un lien vace mon bug.
D'avance je te remercie
Meme mess d'erreur à la ligne : If TypeUtilisateur = "Agent" Then
C'est délirant
Ce que je ne comprends pas c'est que mon Form F_Utilisateurs appelle mon Form F_General de cette facon et qui contient mon sous Form F_Revendeurs :
TypeUtilisateur = [Type Util]
stFormName = "F_General"
stLinkCriteria = ""
DoCmd.Close acForm, "F_Utilisateurs"
DoCmd.OpenForm stFormName, , , stLinkCriteria
Mais il ne passe pas par mon Form F_General
Mereci de ton devouement
C'est délirant
Ce que je ne comprends pas c'est que mon Form F_Utilisateurs appelle mon Form F_General de cette facon et qui contient mon sous Form F_Revendeurs :
TypeUtilisateur = [Type Util]
stFormName = "F_General"
stLinkCriteria = ""
DoCmd.Close acForm, "F_Utilisateurs"
DoCmd.OpenForm stFormName, , , stLinkCriteria
Mais il ne passe pas par mon Form F_General
Mereci de ton devouement
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
une derniere chose , si je lance mon Form F_Revendeurs directement et donc ma variable public = "" le test ne plante pas !!!!
Merci
Merci
Blux,
J'ai changé ma variable Public de String en Integer et ca marche nickel
C'est à ne rien comprendre.
En tout cas je tenais à te remercier de ton aide
Merci
J'ai changé ma variable Public de String en Integer et ca marche nickel
C'est à ne rien comprendre.
En tout cas je tenais à te remercier de ton aide
Merci
Encore une fois j'ai parlé trop vite : j'ai passé ma variable en integer mais du coup je teste soit la valeur 1 pour "Admin", 2 pour "collaborateur", 3 pour Agent et ca marche"
Merci pour tout
Merci pour tout