Discussion :

[c4rr3r4]

Bonjour,

je débute en VBA et j'essaye de faire quelques exercices sur les boutons et les zones de liste dans un formulaire vierge mais je rencontre souvent un petit soucis d'exécution de code.
J'écris mon code, je le teste une première fois, ça fonctionne bien, j'enregistre le code, la base de donnée, je quitte access sans soucis, mais quand je réouvre access, je charge ma base de donnée et là dès que je modifie mon code, il ne s'exécute plus du tout, il ne se passe plus rien, quelqu'un pourrait m'éclairer svp ?

Je précise que c'est du code très simple de débutant du genre rajouter des noms dans une zone de liste quand je clique sur le bouton.

[c4rr3r4]

Pour plus de précision, j'ai un formulaire avec un bouton B1, et une zone de liste ZL1 et le code suivant sur l'évènement clic du bouton B1 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub B1_Click()
 
    ZL1.RowSourceType = "Value List"
    ZL1.RowSource = "Téo;Nadine;Karl;René"
 
End Sub

ce code fonctionnait avant que j'enregistre ma base de donnée, je la réouvre, je modifie les prénoms, et ça ne fonctionne plus ..., j'annule je remet comme c'était et ça ne fonctionne plus non plus

Dans les propriétés du bouton B1 j'ai bien [procédure évènementielle] dans l'évènement sur clic

[loufab]

Bonjour,

Vérifie que l'événement Sur Clic du bouton B1 contienne bien [Procédure événementielle]

Dans le cas contraire déroule la liste pour l'ajouter.

Cordialement,

[c4rr3r4]

Pour plus de précision, j'ai un formulaire avec un bouton B1, et une zone de liste ZL1 et le code suivant sur l'évènement clic du bouton B1 :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub B1_Click()
 
    ZL1.RowSourceType = "Value List"
    ZL1.RowSource = "Téo;Nadine;Karl;René"
 
End Sub

ce code fonctionnait avant que j'enregistre ma base de donnée, je la réouvre, je modifie les prénoms, et ça ne fonctionne plus ..., j'annule je remet comme c'était et ça ne fonctionne plus non plus

Dans les propriétés du bouton B1 j'ai bien [procédure évènementielle] dans l'évènement sur clic

C'est déjà fait, c'est pour ça que je ne comprends pas pourquoi ça ne fonctionne pas

Ps : désolé pour les balises code je ne les avais pas vu

[Tonioyo]

Bonjour,

Il existe peut-être une différence entre une version d'Access en Anglais / Américain et une édition Française

Dans Visual Basic, définissez la propriété OrigineSource (RowSourceType) à l'aide d'une expression chaîne contenant l'une de ces valeurs : "Table/requête", "Liste des valeurs" ou "Liste des champs". Vous pouvez également utiliser une expression chaîne pour définir la valeur de la propriété Contenu (RowSource). Pour affecter à la propriété OrigineSource (RowSourceType) une fonction définie par l'utilisateur, tapez le nom de la fonction.

Il faudrait vérifier aussi si le controle liste modifiable s'appelle bien par son nom : ZL1.

Si une erreur est affichée (du fait que ca ne marche pas) il serait utile de le préciser.

Cordialement,

[c4rr3r4]

J'ai testé les deux valeurs : "Liste valeurs" et " Value List" ça fonctionne dans les 2 cas et ce même code fonctionnait 5 min auparavant !

Ma zone de liste s'appelle bien ZL1, il n'y a pas d'erreur de frappe.

Je n'ai aucun message d'erreur, ça fait juste ... rien, comme s'il n'y avait pas de code associé au bouton B1.

Je pense que c'est un problème du module VBA sous Access ou alors d'access lui même, le plus embêtant c'est que ça m'oblige à recommencer à chaque fois, je ne peux pas sauvegarder de code pour y réfléchir plus tard .

[loufab]

1)
Tu as essayer de mettre un point d'arrêt sur la première ligne du code pour voir s'il y passe ?

S'il n'y passe pas fait un compactage de la base.

2)
Vérifie que tous les Services pack sont installés éventuellement fait une réparation d'office (dans le panneau d'installation).


Tonioyoyo : ça marche et ça marche plus je ne pense pas que la version y soit pour quelque chose. Vivement les vacances !