Mettre du code sur un etat access

Résolu/Fermé

zetopskateuse - 29 juin 2012 à 18:19
zetopskateuse - 1 juil. 2012 à 20:27

Bonjour,
.
Je debute avec Access et j'ai un problème. Je vous explique : j'ai un champ texte avec 4 valeurs possibles et j'aimerais représenter ça dans mon etat par des radio boutons mais l'assistant création de groupes d'options n'accepte pas les valeurs textuelles. Donc je voudrais faire ça par du code.
J'ai déjà codé en vb.net donc pour le code je devrais m'en sortir mais là je voudrais faire ça avec l'interface d'Access et VBA et je ne sais tout simplement pas par où commencer. Où faut-il mettre le code ? Dans un module ? Sur quel évènement ?
Quelqu'un pourrait-il me détailler la procédure ?
.
Merci beaucoup !

A voir également:

Mettre du code sur un etat access
Voici du code ascii : - Guide
Code puk bloqué - Guide
Mettre un code sur un dossier - Guide
Code telephone oublié - Guide
Code blocks free - Télécharger - Langages

3 réponses

Réponse 1 / 3

f894009 Messages postés 17185 Date d'inscription dimanche 25 novembre 2007 Statut Membre Dernière intervention 15 avril 2024 1 701
Modifié par f894009 le 30/06/2012 à 12:26

Bonjour,

Exemple pour mettre du code dans un etat ACCESS:
ouvrir l'etat en mode creation
boutons radio (optionx) dans detail
pointer la souris sur l'etat
click droit
propriete evenement: prendre un evenement, definir une procedure evenementielle
click sur les ... pour acceder au VBA
ensuite
fenetre code vba en haut a gauche, liste deroulante, choisir Detail pour obtenir

Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer)
end sub

Supprime le code permettait d'acceder au VBA

Exemple de code: pour Boutons Option

Private Sub Détail_Format(Cancel As Integer, FormatCount As Integer) 
  Select Case Me.num_centre 
    Case 1 
      Me.num_centre.ForeColor = vbRed 
      Me.num_centre.BackColor = vbYellow 
      Me.Option11.Value = True 
      Me.Option13.Value = False 
      Me.Option15.Value = False 
    Case 2 
      Me.num_centre.ForeColor = vbBlue 
      Me.Option11.Value = False 
      Me.Option13.Value = True 
      Me.Option15.Value = False 
    Case 3 
      Me.num_centre.ForeColor = vbGreen 
      Me.Option11.Value = False 
      Me.Option13.Value = False 
      Me.Option15.Value = True 
    Case Else 
     
  End Select 
End Sub

Pour voir les effets du code, il faut ouvrir l'etat par un formulaire et un bouton, pas par un double click sur l'etat (le code ne s'execute pas!!!).

A votre service pour toute aide a ce sujet

Réponse 2 / 3

zetopskateuse
1 juil. 2012 à 19:48

Merci beaucoup pour votre réponse ! En fait j'avais fait quelques tentatives mais sans passer par un formulaire. Je vais donc réessayer et je vous tiens au courant.

Réponse 3 / 3

zetopskateuse
1 juil. 2012 à 20:27

Ca marche ! Merci beaucoup de votre aide :)

Discussions similaires

enigme

Code Ascii

Code de renvoi d'appel : Ooredo, Mobilis...

Trouver l'Etat/Province des départements Français ?

help! codage ascii a decoder !

Discussions similaires

Newsletters