IdentifiantMot de passe
Loading...
Mot de passe oublié ?Je m'inscris ! (gratuit)
Navigation

Inscrivez-vous gratuitement
pour pouvoir participer, suivre les réponses en temps réel, voter pour les messages, poser vos propres questions et recevoir la newsletter

Access Discussion :

Calendrier Active X


Sujet :

Access

  1. #1
    Membre à l'essai
    Inscrit en
    Août 2005
    Messages
    30
    Détails du profil
    Informations forums :
    Inscription : Août 2005
    Messages : 30
    Points : 24
    Points
    24
    Par défaut Calendrier Active X
    bonjour,

    Je cherche comment lier un champ date pour qu'il enregistre la date selectionnée sur un calendrier active X.

    J'ai parcourru le site et interroger le compagnon mais les réponses données ne sont pas celles que je cherche.

    Quelqu'un peut-il m'indiquer où ou comment mieux chercher ?
    Merci

  2. #2
    Expert confirmé

    Profil pro
    Inscrit en
    Mai 2005
    Messages
    3 419
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Mai 2005
    Messages : 3 419
    Points : 4 297
    Points
    4 297
    Par défaut
    pour essayer crée une forme
    ajoute une textebox que tu nommes texte1
    ajoutes un caliendrier que tu nommes cal
    clic droit sur cal
    créer code événement
    et là tu fais

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    Private Sub cal_Click()
    Me.Texte1 = Me.cal
    Me.Requery
    End Sub
    ce que tu fais subir à texte1 tu peux le passer à une variable
    ou à une requête paramétrée
    Elle est pas belle la vie ?

  3. #3
    Membre à l'essai
    Profil pro
    Inscrit en
    Juin 2005
    Messages
    15
    Détails du profil
    Informations personnelles :
    Localisation : France

    Informations forums :
    Inscription : Juin 2005
    Messages : 15
    Points : 11
    Points
    11
    Par défaut
    Voici le code que j'utilise j'ai créé mon contrôle active X dans un autre formulaire avec un bouton OK!
    Voici le code:
    Private Sub btnOK_Click()
    Dim strForm As String, strChamp As String
    Dim intI As Integer

    If Not IsNull(Me.OpenArgs) Then
    ' Identifier les champs
    intI = InStr(1, Me.OpenArgs, "!", vbTextCompare)
    If intI <> 0 Then
    strForm = Left(Me.OpenArgs, intI - 1)
    strChamp = Mid(Me.OpenArgs, intI + 1)

    ' Affecter la date au champ passé en argument
    Forms(strForm)(strChamp) = Me!Calendrier.Value
    End If
    End If

    ' Fermer le formulaire
    DoCmd.Close
    End Sub
    [/code]



    N'ésite pas a demander si tu as besoin de plus de renseignements
    Seb

  4. #4
    Membre à l'essai
    Inscrit en
    Août 2005
    Messages
    30
    Détails du profil
    Informations forums :
    Inscription : Août 2005
    Messages : 30
    Points : 24
    Points
    24
    Par défaut
    Citation Envoyé par random
    pour essayer crée une forme
    ajoute une textebox que tu nommes texte1
    ajoutes un caliendrier que tu nommes cal
    clic droit sur cal
    créer code événement
    et là tu fais

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
     
    Private Sub cal_Click()
    Me.Texte1 = Me.cal
    Me.Requery
    End Sub
    ce que tu fais subir à texte1 tu peux le passer à une variable
    ou à une requête paramétrée
    Merci à tous les deux.
    J'ai essayé ceci et finalement ça marche. Finalement, parce qu'au début je ne tapais pas la première ligne, je laissais celle que le programme écrivait lui-même (il n'y avait pas d'événement sur clic mais après mise à jour dans la liste dispo) ensuite j'ai viré la première ligne automatique et j'ai repris celle-ci et là, miracle ça marche. Je retiens donc qu'il ne faut surtout pas se limiter au proposition de la machine :o

    le code de seb est un peu plus complexe mais je vais m'atteler à tenter de le comprendre.

    Encore merci et bonne journée

+ Répondre à la discussion
Cette discussion est résolue.

Discussions similaires

  1. Réponses: 3
    Dernier message: 31/08/2012, 10h48
  2. [VBA]MAJ auto contrôle active x calendrier?
    Par poney01 dans le forum VBA Access
    Réponses: 9
    Dernier message: 22/04/2007, 08h41
  3. Réponses: 1
    Dernier message: 20/08/2006, 17h34
  4. activer/désactiver une liste déroulante + date calendrier
    Par toome dans le forum Balisage (X)HTML et validation W3C
    Réponses: 5
    Dernier message: 05/01/2006, 15h56
  5. activer/désactiver une liste déroulante + date calendrier
    Par toome dans le forum Général JavaScript
    Réponses: 11
    Dernier message: 03/01/2006, 14h55

Partager

Partager
  • Envoyer la discussion sur Viadeo
  • Envoyer la discussion sur Twitter
  • Envoyer la discussion sur Google
  • Envoyer la discussion sur Facebook
  • Envoyer la discussion sur Digg
  • Envoyer la discussion sur Delicious
  • Envoyer la discussion sur MySpace
  • Envoyer la discussion sur Yahoo