Déclaration variables public
Delachaise
Messages postés
5
Date d'inscription
Statut
Membre
Dernière intervention
-
eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention -
eriiic Messages postés 24603 Date d'inscription Statut Contributeur Dernière intervention -
Bonjour j'ai un petit problème
J'ai déclaré 4 variables public dans un module (PublicVar) créé spécialement à cet effet.
Pas de problème pour deux variables que j'utilise dans un module mais les deux autres sont vides dans un autre module sauf dans le userforme.
Voici ma procédure,
Dans le userforme Les 2 variables sont ok:
Private Sub Bt_Choix_Click()
BudgetMois = USF_Choix_Mois_Budget.Cb_ChoixMoisBudget.Value
BudgetAnnee = USF_Choix_Mois_Budget.Tx_ChoixAnneeBudget.Value
MsgBox BudgetMois & "/" & BudgetAnnee ''OK
USF_Choix_Mois_Budget.Hide
Call Choix_Mois_Budget
End Sub
Private Sub UserForm_Initialize()
'Attribue les jours de mois dans le ComboBox
Cb_ChoixMoisBudget.RowSource = "TablesDivers!MoisBudgetChoix_List"
End Sub
------------------------------------------------------
Dans dans la procédure du utilisé les 2 variables sont vides :
Sub Choix_Mois_Budget()
MsgBox "Année" & MoisAnnee & "Mois" ''VIDE
End Sub
Module PublicVar
Public BudgetMois As String 'Renvoie le mois sélection dans la feuille budget
Public BudgetAnnee As String 'Renvoie l'année sélection dans la feuille budget
Public siFicherOuvert As Integer 'Renvoie 0 si le classeur est ouvert ou 1 si fermé '' OK
Public strNom As String 'Recherche si classeur est ouvert " OK
Pourriez-vous m'aider ?
Merci beaucoup
J'ai déclaré 4 variables public dans un module (PublicVar) créé spécialement à cet effet.
Pas de problème pour deux variables que j'utilise dans un module mais les deux autres sont vides dans un autre module sauf dans le userforme.
Voici ma procédure,
Dans le userforme Les 2 variables sont ok:
Private Sub Bt_Choix_Click()
BudgetMois = USF_Choix_Mois_Budget.Cb_ChoixMoisBudget.Value
BudgetAnnee = USF_Choix_Mois_Budget.Tx_ChoixAnneeBudget.Value
MsgBox BudgetMois & "/" & BudgetAnnee ''OK
USF_Choix_Mois_Budget.Hide
Call Choix_Mois_Budget
End Sub
Private Sub UserForm_Initialize()
'Attribue les jours de mois dans le ComboBox
Cb_ChoixMoisBudget.RowSource = "TablesDivers!MoisBudgetChoix_List"
End Sub
------------------------------------------------------
Dans dans la procédure du utilisé les 2 variables sont vides :
Sub Choix_Mois_Budget()
MsgBox "Année" & MoisAnnee & "Mois" ''VIDE
End Sub
Module PublicVar
Public BudgetMois As String 'Renvoie le mois sélection dans la feuille budget
Public BudgetAnnee As String 'Renvoie l'année sélection dans la feuille budget
Public siFicherOuvert As Integer 'Renvoie 0 si le classeur est ouvert ou 1 si fermé '' OK
Public strNom As String 'Recherche si classeur est ouvert " OK
Pourriez-vous m'aider ?
Merci beaucoup
A voir également:
- Déclaration variables public
- Déclaration - Guide
- En plus des revenus, il ne faut surtout pas oublier de faire cette déclaration en ligne aux impôts - Guide
- Ip public - Guide
- My public wifi - Télécharger - Connexion à distance
- Google public dns - Guide
merci de mettre en résolu dans ce cas.
eric