Bonjour à tous
Je cherche à modifier un contrôle automatiquement via le VBA .
J'ai un formulaire cotation (FCotations) issue de la table TCotations
comprenant les champs RefCotatiion (auto); TypeActe (texte) et CotationActe
(numérique).
J'ai créé une zone de liste déroulante où j'ai tapez les valeurs (ex :
inlay, attachement...). Ces valeurs vont dans le champ TypeActe (texte) dans
TCotation.
J'ai créé un contrôle CotationActe dans FCotations où je peux mettre une
valeur numérique que je désire.
J'ai voulu forcé le système via VBA en disant que le contrôle doit prendre
la valeur 10 si inlay est choisi et la valeur 50 si attachement est choisi
J'ai choisi Après MAj du contrôle TypeActe et j'ai mis :
Case "inlay"
Me.CotationActe.value = 10
Case"Attachement"
Me.CotationActe.value = 50
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
la syntaxe exacte est: Select Case TypeActe Case "inlay" Me.CotationActe = 10 Case "Attachement" Me.CotationActe = 50 End Select
à placer sur l'événement afterupdate de la liste déroulante.
mais l'avais-tu déjà mis ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Claire" a écrit dans le message de news:
Bonjour à tous Je cherche à modifier un contrôle automatiquement via le VBA .
J'ai un formulaire cotation (FCotations) issue de la table TCotations comprenant les champs RefCotatiion (auto); TypeActe (texte) et CotationActe (numérique).
J'ai créé une zone de liste déroulante où j'ai tapez les valeurs (ex : inlay, attachement...). Ces valeurs vont dans le champ TypeActe (texte) dans TCotation.
J'ai créé un contrôle CotationActe dans FCotations où je peux mettre une valeur numérique que je désire. J'ai voulu forcé le système via VBA en disant que le contrôle doit prendre la valeur 10 si inlay est choisi et la valeur 50 si attachement est choisi J'ai choisi Après MAj du contrôle TypeActe et j'ai mis : Case "inlay" Me.CotationActe.value = 10 Case"Attachement" Me.CotationActe.value = 50
Mais ceci ne fonctionne pas!! Que dois-je faire?
Merci d'avance Claire
Bonjour.
la syntaxe exacte est:
Select Case TypeActe
Case "inlay"
Me.CotationActe = 10
Case "Attachement"
Me.CotationActe = 50
End Select
à placer sur l'événement afterupdate de la liste déroulante.
mais l'avais-tu déjà mis ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Claire" <Claire@discussions.microsoft.com> a écrit dans le message de news:
76FD7260-A8A7-40D7-A99D-ABE82BD707BA@microsoft.com...
Bonjour à tous
Je cherche à modifier un contrôle automatiquement via le VBA .
J'ai un formulaire cotation (FCotations) issue de la table TCotations
comprenant les champs RefCotatiion (auto); TypeActe (texte) et
CotationActe
(numérique).
J'ai créé une zone de liste déroulante où j'ai tapez les valeurs (ex :
inlay, attachement...). Ces valeurs vont dans le champ TypeActe (texte)
dans
TCotation.
J'ai créé un contrôle CotationActe dans FCotations où je peux mettre une
valeur numérique que je désire.
J'ai voulu forcé le système via VBA en disant que le contrôle doit prendre
la valeur 10 si inlay est choisi et la valeur 50 si attachement est choisi
J'ai choisi Après MAj du contrôle TypeActe et j'ai mis :
Case "inlay"
Me.CotationActe.value = 10
Case"Attachement"
Me.CotationActe.value = 50
la syntaxe exacte est: Select Case TypeActe Case "inlay" Me.CotationActe = 10 Case "Attachement" Me.CotationActe = 50 End Select
à placer sur l'événement afterupdate de la liste déroulante.
mais l'avais-tu déjà mis ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Claire" a écrit dans le message de news:
Bonjour à tous Je cherche à modifier un contrôle automatiquement via le VBA .
J'ai un formulaire cotation (FCotations) issue de la table TCotations comprenant les champs RefCotatiion (auto); TypeActe (texte) et CotationActe (numérique).
J'ai créé une zone de liste déroulante où j'ai tapez les valeurs (ex : inlay, attachement...). Ces valeurs vont dans le champ TypeActe (texte) dans TCotation.
J'ai créé un contrôle CotationActe dans FCotations où je peux mettre une valeur numérique que je désire. J'ai voulu forcé le système via VBA en disant que le contrôle doit prendre la valeur 10 si inlay est choisi et la valeur 50 si attachement est choisi J'ai choisi Après MAj du contrôle TypeActe et j'ai mis : Case "inlay" Me.CotationActe.value = 10 Case"Attachement" Me.CotationActe.value = 50
Mais ceci ne fonctionne pas!! Que dois-je faire?
Merci d'avance Claire
Claire
Hello Raymond,
cela marche, je n'avis pas mis En select. Mais j'ai une autre question j'ai tapé les valeurs de la liste déroulante (j'en ai 40). Je suis obligée de faire dérouler toutes les lignes. Existe-t-il un moyen en tapant les premières lettres de trouver la ligne recherchée ?
j'ai essayé en pasant par une requête issue d'une table TActePégadogique de type SELECT DISTINCT .... Mais alors le choix d'une ligne ne renvoie pas sur la bonne valeur de contrôle Cotation qui reste à 0 .... Y-a-t-il une solution ? merci d'avance Claire
Bonjour.
la syntaxe exacte est: Select Case TypeActe Case "inlay" Me.CotationActe = 10 Case "Attachement" Me.CotationActe = 50 End Select
à placer sur l'événement afterupdate de la liste déroulante.
mais l'avais-tu déjà mis ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Claire" a écrit dans le message de news:
Bonjour à tous Je cherche à modifier un contrôle automatiquement via le VBA .
J'ai un formulaire cotation (FCotations) issue de la table TCotations comprenant les champs RefCotatiion (auto); TypeActe (texte) et CotationActe (numérique).
J'ai créé une zone de liste déroulante où j'ai tapez les valeurs (ex : inlay, attachement...). Ces valeurs vont dans le champ TypeActe (texte) dans TCotation.
J'ai créé un contrôle CotationActe dans FCotations où je peux mettre une valeur numérique que je désire. J'ai voulu forcé le système via VBA en disant que le contrôle doit prendre la valeur 10 si inlay est choisi et la valeur 50 si attachement est choisi J'ai choisi Après MAj du contrôle TypeActe et j'ai mis : Case "inlay" Me.CotationActe.value = 10 Case"Attachement" Me.CotationActe.value = 50
Mais ceci ne fonctionne pas!! Que dois-je faire?
Merci d'avance Claire
Hello Raymond,
cela marche, je n'avis pas mis En select.
Mais j'ai une autre question
j'ai tapé les valeurs de la liste déroulante (j'en ai 40). Je suis obligée
de faire dérouler toutes les lignes. Existe-t-il un moyen en tapant les
premières lettres de trouver la ligne recherchée ?
j'ai essayé en pasant par une requête issue d'une table TActePégadogique de
type SELECT DISTINCT ....
Mais alors le choix d'une ligne ne renvoie pas sur la bonne valeur de
contrôle Cotation qui reste à 0 ....
Y-a-t-il une solution ?
merci d'avance
Claire
Bonjour.
la syntaxe exacte est:
Select Case TypeActe
Case "inlay"
Me.CotationActe = 10
Case "Attachement"
Me.CotationActe = 50
End Select
à placer sur l'événement afterupdate de la liste déroulante.
mais l'avais-tu déjà mis ?
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Claire" <Claire@discussions.microsoft.com> a écrit dans le message de news:
76FD7260-A8A7-40D7-A99D-ABE82BD707BA@microsoft.com...
Bonjour à tous
Je cherche à modifier un contrôle automatiquement via le VBA .
J'ai un formulaire cotation (FCotations) issue de la table TCotations
comprenant les champs RefCotatiion (auto); TypeActe (texte) et
CotationActe
(numérique).
J'ai créé une zone de liste déroulante où j'ai tapez les valeurs (ex :
inlay, attachement...). Ces valeurs vont dans le champ TypeActe (texte)
dans
TCotation.
J'ai créé un contrôle CotationActe dans FCotations où je peux mettre une
valeur numérique que je désire.
J'ai voulu forcé le système via VBA en disant que le contrôle doit prendre
la valeur 10 si inlay est choisi et la valeur 50 si attachement est choisi
J'ai choisi Après MAj du contrôle TypeActe et j'ai mis :
Case "inlay"
Me.CotationActe.value = 10
Case"Attachement"
Me.CotationActe.value = 50
cela marche, je n'avis pas mis En select. Mais j'ai une autre question j'ai tapé les valeurs de la liste déroulante (j'en ai 40). Je suis obligée de faire dérouler toutes les lignes. Existe-t-il un moyen en tapant les premières lettres de trouver la ligne recherchée ?
j'ai essayé en pasant par une requête issue d'une table TActePégadogique de type SELECT DISTINCT .... Mais alors le choix d'une ligne ne renvoie pas sur la bonne valeur de contrôle Cotation qui reste à 0 .... Y-a-t-il une solution ? merci d'avance Claire
Bonjour.
la syntaxe exacte est: Select Case TypeActe Case "inlay" Me.CotationActe = 10 Case "Attachement" Me.CotationActe = 50 End Select
à placer sur l'événement afterupdate de la liste déroulante.
mais l'avais-tu déjà mis ? -- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Claire" a écrit dans le message de news:
Bonjour à tous Je cherche à modifier un contrôle automatiquement via le VBA .
J'ai un formulaire cotation (FCotations) issue de la table TCotations comprenant les champs RefCotatiion (auto); TypeActe (texte) et CotationActe (numérique).
J'ai créé une zone de liste déroulante où j'ai tapez les valeurs (ex : inlay, attachement...). Ces valeurs vont dans le champ TypeActe (texte) dans TCotation.
J'ai créé un contrôle CotationActe dans FCotations où je peux mettre une valeur numérique que je désire. J'ai voulu forcé le système via VBA en disant que le contrôle doit prendre la valeur 10 si inlay est choisi et la valeur 50 si attachement est choisi J'ai choisi Après MAj du contrôle TypeActe et j'ai mis : Case "inlay" Me.CotationActe.value = 10 Case"Attachement" Me.CotationActe.value = 50
Mais ceci ne fonctionne pas!! Que dois-je faire?
Merci d'avance Claire
Raymond [mvp]
dans une liste modifiable, toute frappe affiche la valeur de la donnée commençant par ces caractères à condition que la propriété "Auto Etendre" soit positionnée à Oui.
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Claire" a écrit dans le message de news:
Hello Raymond,
cela marche, je n'avis pas mis En select. Mais j'ai une autre question j'ai tapé les valeurs de la liste déroulante (j'en ai 40). Je suis obligée de faire dérouler toutes les lignes. Existe-t-il un moyen en tapant les premières lettres de trouver la ligne recherchée ?
j'ai essayé en pasant par une requête issue d'une table TActePégadogique de type SELECT DISTINCT .... Mais alors le choix d'une ligne ne renvoie pas sur la bonne valeur de contrôle Cotation qui reste à 0 .... Y-a-t-il une solution ? merci d'avance Claire
dans une liste modifiable, toute frappe affiche la valeur de la donnée
commençant par ces caractères à condition que la propriété "Auto Etendre"
soit positionnée à Oui.
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"Claire" <Claire@discussions.microsoft.com> a écrit dans le message de news:
237F4369-C5D7-4CA8-A08F-241E4B4AA35B@microsoft.com...
Hello Raymond,
cela marche, je n'avis pas mis En select.
Mais j'ai une autre question
j'ai tapé les valeurs de la liste déroulante (j'en ai 40). Je suis obligée
de faire dérouler toutes les lignes. Existe-t-il un moyen en tapant les
premières lettres de trouver la ligne recherchée ?
j'ai essayé en pasant par une requête issue d'une table TActePégadogique
de
type SELECT DISTINCT ....
Mais alors le choix d'une ligne ne renvoie pas sur la bonne valeur de
contrôle Cotation qui reste à 0 ....
Y-a-t-il une solution ?
merci d'avance
Claire
dans une liste modifiable, toute frappe affiche la valeur de la donnée commençant par ces caractères à condition que la propriété "Auto Etendre" soit positionnée à Oui.
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"Claire" a écrit dans le message de news:
Hello Raymond,
cela marche, je n'avis pas mis En select. Mais j'ai une autre question j'ai tapé les valeurs de la liste déroulante (j'en ai 40). Je suis obligée de faire dérouler toutes les lignes. Existe-t-il un moyen en tapant les premières lettres de trouver la ligne recherchée ?
j'ai essayé en pasant par une requête issue d'une table TActePégadogique de type SELECT DISTINCT .... Mais alors le choix d'une ligne ne renvoie pas sur la bonne valeur de contrôle Cotation qui reste à 0 .... Y-a-t-il une solution ? merci d'avance Claire
