OVH Cloud OVH Cloud

Propriété contenu

3 réponses
Avatar
Gilbert
Bonjour,
J'aimerais savoir comment modifier en VBA la propriété 'Contenu' d'une liste
déroulante dont la propriété 'Origine Source' est définie sur 'Liste
valeurs'.
Je ne trouve rien dans l'aide d'Access. La touche F1 ne me donne rien sur
ces 2 propriétés alors qu'elle m'affiche une aide pour les autres.

Merci d'avance pour vos suggestions.

Gilbert

3 réponses

Avatar
Yannick Croteau
Bonjour Gilbert!

Voici un exemple d'un code qui permet le changement d'une liste déroulante

'définir la variable
Dim SQLNouveau As String


'Définir la nouvelle requête à appliquer à la liste déroulante (Cette
requête définira les nouveaux éléments de la liste déroulante)
SQLNouveau = "SELECT DISTINCT [Champs] FROM [Table] WHERE Catégorie='" &
Me!Catégorie & "' AND (ACTIF=1)"

With Me!ListeDeroulante
.RowSource = SQLC
.Requery
End With

'veuillez prendre note que dans l'exemple présent, est dans le cadre d'une
application Access ADP sur SQLServer, donc il est possible que l'appélation
SQLString soit un peu différente de l'appélation SQL d'Access


Au plaisir de vous aider!
Yannick Croteau
Access, SQLServer et ASP
www.frogtuning.com

"Gilbert" a écrit dans le message de
news:
Bonjour,
J'aimerais savoir comment modifier en VBA la propriété 'Contenu' d'une
liste

déroulante dont la propriété 'Origine Source' est définie sur 'Liste
valeurs'.
Je ne trouve rien dans l'aide d'Access. La touche F1 ne me donne rien sur
ces 2 propriétés alors qu'elle m'affiche une aide pour les autres.

Merci d'avance pour vos suggestions.

Gilbert




Avatar
Gilbert
Impeccable. Encore merci.

"Yannick Croteau" a écrit dans le message de
news:
Bonjour Gilbert!

Voici un exemple d'un code qui permet le changement d'une liste déroulante

'définir la variable
Dim SQLNouveau As String


'Définir la nouvelle requête à appliquer à la liste déroulante (Cette
requête définira les nouveaux éléments de la liste déroulante)
SQLNouveau = "SELECT DISTINCT [Champs] FROM [Table] WHERE Catégorie='"
&

Me!Catégorie & "' AND (ACTIF=1)"

With Me!ListeDeroulante
.RowSource = SQLC
.Requery
End With

'veuillez prendre note que dans l'exemple présent, est dans le cadre d'une
application Access ADP sur SQLServer, donc il est possible que
l'appélation

SQLString soit un peu différente de l'appélation SQL d'Access


Au plaisir de vous aider!
Yannick Croteau
Access, SQLServer et ASP
www.frogtuning.com

"Gilbert" a écrit dans le message de
news:
Bonjour,
J'aimerais savoir comment modifier en VBA la propriété 'Contenu' d'une
liste

déroulante dont la propriété 'Origine Source' est définie sur 'Liste
valeurs'.
Je ne trouve rien dans l'aide d'Access. La touche F1 ne me donne rien
sur


ces 2 propriétés alors qu'elle m'affiche une aide pour les autres.

Merci d'avance pour vos suggestions.

Gilbert








Avatar
Gilbert
Impeccable. Mille mercis

Gilbert

"Yannick Croteau" a écrit dans le message de
news:
Bonjour Gilbert!

Voici un exemple d'un code qui permet le changement d'une liste déroulante

'définir la variable
Dim SQLNouveau As String


'Définir la nouvelle requête à appliquer à la liste déroulante (Cette
requête définira les nouveaux éléments de la liste déroulante)
SQLNouveau = "SELECT DISTINCT [Champs] FROM [Table] WHERE Catégorie='"
&

Me!Catégorie & "' AND (ACTIF=1)"

With Me!ListeDeroulante
.RowSource = SQLC
.Requery
End With

'veuillez prendre note que dans l'exemple présent, est dans le cadre d'une
application Access ADP sur SQLServer, donc il est possible que
l'appélation

SQLString soit un peu différente de l'appélation SQL d'Access


Au plaisir de vous aider!
Yannick Croteau
Access, SQLServer et ASP
www.frogtuning.com

"Gilbert" a écrit dans le message de
news:
Bonjour,
J'aimerais savoir comment modifier en VBA la propriété 'Contenu' d'une
liste

déroulante dont la propriété 'Origine Source' est définie sur 'Liste
valeurs'.
Je ne trouve rien dans l'aide d'Access. La touche F1 ne me donne rien
sur


ces 2 propriétés alors qu'elle m'affiche une aide pour les autres.

Merci d'avance pour vos suggestions.

Gilbert