Logo GNT
Actualités Tests & Guides Bons Plans
GTA 6 iPhone 17 Copilot Switch 2 Temu ChatGPT Tesla
OVH Cloud OVH Cloud
Entraide Applications Microsoft Office Access apparition de boutons sous condition

apparition de boutons sous condition

2 réponses
Avatar
sab
Bonjour,

Tout d'abord merci à Arnaud pour sa réponse du 9/12/04 cependant, cela ne
fonctionne toujours pas.

Sur un formulaire unique, j'ai une zone de texte, où je compte le nombre
d'enregistrements :
nom : Comptage
Valeur : =Compte(*)

J'ai également des boutons "suivant" et "précédent" qui me permettent de
faire défiler mes enregistrements.

Mon pb est le suivant: je n'arrive pas à faire disparaitre les boutons
"suivant" et "précédent" quand Comptage = 1.
Voici le code que j'utilise :

Private Sub Form_Open(Cancel As Integer)
If Me.Comptage.Value = 1 Then
Me.précédent.Visible = False
Me.suivant.Visible = False
Else
Me.précédent.Visible = True
Me.suivant.Visible = True
End If
End Sub

Merci d'avance pour toutes les solutions que vous me proposerez.

Sab
Signaler un problème avec ce contenu

2 réponses

Supprimer
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
Avatar
Raymond [mvp]
Bonjour.

ce n'est pas parceque tu as plusieurs enregistrements que le précédent doit
être visible, dans le cas où tu es postionné sur le premier enregistrement
il ne doit pas être visible;
dans la lirairie office que tu trouveras sur la page :
http://officesystem.access.free.fr/msocommandbar.htm tu trouveras des barres
de menus adaptées aux enregistrements et aus positions .

--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"sab" a écrit dans le message de news:

Bonjour,

Tout d'abord merci à Arnaud pour sa réponse du 9/12/04 cependant, cela ne
fonctionne toujours pas.

Sur un formulaire unique, j'ai une zone de texte, où je compte le nombre
d'enregistrements :
nom : Comptage
Valeur : =Compte(*)

J'ai également des boutons "suivant" et "précédent" qui me permettent de
faire défiler mes enregistrements.

Mon pb est le suivant: je n'arrive pas à faire disparaitre les boutons
"suivant" et "précédent" quand Comptage = 1.
Voici le code que j'utilise :

Private Sub Form_Open(Cancel As Integer)
If Me.Comptage.Value = 1 Then
Me.précédent.Visible = False
Me.suivant.Visible = False
Else
Me.précédent.Visible = True
Me.suivant.Visible = True
End If
End Sub

Merci d'avance pour toutes les solutions que vous me proposerez.

Sab






Avatar
Ghislain
Salut,

Ce code devrait marcher:

Me.Suivant.Visible=Not(Me.Comptage=1)
Me.Precedent.Visible=Not(Me.Comptage=1)

Voila tu copie ce code sur After update de ton
champ"Comptage" et On Current de
ton formulaire.

A+ Ghislain

-----Message d'origine-----
Bonjour,

Tout d'abord merci à Arnaud pour sa réponse du 9/12/04
cependant, cela ne

fonctionne toujours pas.

Sur un formulaire unique, j'ai une zone de texte, où je
compte le nombre

d'enregistrements :
nom : Comptage
Valeur : =Compte(*)

J'ai également des boutons "suivant" et "précédent"
qui me permettent de

faire défiler mes enregistrements.

Mon pb est le suivant: je n'arrive pas à faire
disparaitre les boutons

"suivant" et "précédent" quand Comptage = 1.
Voici le code que j'utilise :

Private Sub Form_Open(Cancel As Integer)
If Me.Comptage.Value = 1 Then
Me.précédent.Visible = False
Me.suivant.Visible = False
Else
Me.précédent.Visible = True
Me.suivant.Visible = True
End If
End Sub

Merci d'avance pour toutes les solutions que vous me
proposerez.


Sab




.