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

VBA Access Discussion :

valeur de lien hypertexte [AC-2007]


Sujet :

VBA Access

  1. #1
    Membre à l'essai
    Inscrit en
    Mars 2006
    Messages
    12
    Détails du profil
    Informations forums :
    Inscription : Mars 2006
    Messages : 12
    Points : 12
    Points
    12
    Par défaut valeur de lien hypertexte
    Bonjour,

    A l'ouverture de mon formulaire, je cherche à afficher un message si ma zone de lien hypertexte est vide, en jouant sur la valeur du visible de mon étiquette de donnée contenant mon message d'erreur.

    Mon étiquette de donnée avec le message est initialisé à Visible = False

    Je cherche à la mettre à True, dès lors que je n'ai aucun lien Hypertexte dans ma zone de Lien Hypertexte (type de donnée dans ma table est "Lien Hypertexte".

    Hors à l'ouverture de mon formulaire, quand ma zone de lien Hypertexte est vide (non remplie), le message d'erreur ne s'affiche pas.

    Si joint l'extrait de mon code :
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
     
    Private Sub form_load()
     
    If IsEmpty(Me.hypertexte_ficheproduits.Value) Then
        Me.avertissement.Visible = True
    End If
     
    End Sub
    Merci d'avance

  2. #2
    Membre expérimenté
    Homme Profil pro
    Inscrit en
    Juillet 2006
    Messages
    1 219
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Âge : 79
    Localisation : France

    Informations professionnelles :
    Secteur : Services à domicile

    Informations forums :
    Inscription : Juillet 2006
    Messages : 1 219
    Points : 1 707
    Points
    1 707
    Par défaut
    bonsoir,
    isEmpty c'est plutôt pour les variables pour les ZT c'est :

    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    8
    Private Sub Form_Current()
    If IsNull(Me.lien) Then
    Me.Étiquette.Visible = True
    Else
    Me.Étiquette.Visible = False
     
    End If
    End Sub

  3. #3
    Membre expert
    Avatar de FreeAccess
    Homme Profil pro
    Un monde ou prendre est plus facile qu'apprendre.
    Inscrit en
    Mars 2006
    Messages
    2 745
    Détails du profil
    Informations personnelles :
    Sexe : Homme
    Localisation : France

    Informations professionnelles :
    Activité : Un monde ou prendre est plus facile qu'apprendre.

    Informations forums :
    Inscription : Mars 2006
    Messages : 2 745
    Points : 3 834
    Points
    3 834
    Par défaut
    Bonjour,

    En utilisant les noms de tes contrôles, une possibilité à partir de l'événement "Sur activation" du formulaire..:
    Code : Sélectionner tout - Visualiser dans une fenêtre à part
    1
    2
    3
    4
    5
    6
    7
    Private Sub Form_Current()
    If (IsNull(hypertexte_ficheproduits) Or (hypertexte_ficheproduits = vbNullString)) Then
        Me.avertissement.Visible = True
    Else
        Me.avertissement.Visible = False
    End If
    End Sub
    ....à voir ...
    FreeAccess
    "Petit à petit l'araignée tisse sa toile"

  4. #4
    Membre à l'essai
    Inscrit en
    Mars 2006
    Messages
    12
    Détails du profil
    Informations forums :
    Inscription : Mars 2006
    Messages : 12
    Points : 12
    Points
    12
    Par défaut
    Clair,net et précis!!! merci !tout fonctionne correctement!!
    Encore merci!!

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

Discussions similaires

  1. Afficher la valeur d'un lien hypertexte dans une fenêtre JavaScript
    Par DezMax dans le forum Général JavaScript
    Réponses: 4
    Dernier message: 04/01/2013, 10h34
  2. Réponses: 4
    Dernier message: 14/12/2010, 21h58
  3. Réponses: 0
    Dernier message: 20/05/2010, 17h21
  4. Excel 2003 - Lien Hypertexte sur une valeur ?
    Par troxsa dans le forum Excel
    Réponses: 2
    Dernier message: 21/03/2008, 16h25

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