Salut,
J'aimerais dans un formulaire créer une sorté de lien hypertexte sans utiliser de bouton de commande donc pour ouvrir un autre formulaire...
Vous savez m'aider ?
Salut,
J'aimerais dans un formulaire créer une sorté de lien hypertexte sans utiliser de bouton de commande donc pour ouvrir un autre formulaire...
Vous savez m'aider ?
oui
Tu fais un intitulé (une étiquette, un libellé, c'est pareil !)
Tu écris ce que tu veux dedans (m'en fout)
Tu vas dans les propriétés de ton étiquette
Et tout est dedans !
Cherches la propriété qui va bien (lien hypertexte) et, quand tu auras cliqué dedasn, tu verras 3 petits points sur un bouton, tout de suite à droite.
Clique dessus, ca va t'aider
Non je connaissais déjà cà ; je cherche à ce que le lien hypertexte ne soit pas souligné ni en bleu en fait
je ne sais pas si c'est possible mais essaie de taper ton texte dans une zone de texte et créer un évènement dessus (pour ça va dans le code vba)
salut,
Tu veux faire ce 'Lien' avec quel type de contrôle.
Tu peux faire sur Evenement Click ou MouseMove
@+
Et bien je veux faire un lien hypertexte qui ouvre un formulaire mais sans que ce lien ne soit souligné et pas en bleu.Envoyé par Dolphy35
re,
Fait un OpenForm sur le Click de ton contrôle, cela marche avec les etiquettes, les zones de texte.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub Lien_Click() DoCmd.OpenForm "Nom du Formulaire à ourvir" End Sub
tu peux faire la même chose sur le survolle du curseur (souris)
Esseye @+
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub Lien_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) DoCmd.OpenForm "Nom du Formulaire à ourvir" End Sub
Envoyé par Dolphy35
Génial merci, mais je voudrais en fait qu'il apparaisse la main sur le lien
Hello,
inspire toi alors du code de la FAQ
http://access.developpez.com/faq/?pa...ace#ChgAppCurs
tu pourrais placer ce code sur l'événement MouseMove de ton contrôle.
Oui je pourrais mais il y a toutes sortes de curseur sauf la main ...
ou bien télécharger un fichier .ani mais bon où le trouver ??
Juste une chose : je mets ou ce code ???Envoyé par cafeine
Si tu en as besoin uniquement pour ce form, tu peux le mettre dans le module du formulaire ...
oké mais je dois quand même mettre un code pour l'étiquette, pour qu'il sache qu'il doit mettre la main au passage ...
Justement je ne sais pas quel code il faut mettreEnvoyé par Dolphy35
J'ai mis ca dans le module de mon form :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Private Declare Function SetSystemCursor Lib "user32" (ByVal hcur As Long, ByVal id As Long) As Long Private Declare Function LoadCursor Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal _ lpCursorName As Long) As Long Private Sub change_curseur() Call SetSystemCursor(LoadCursorFromFile("D:\Divers\hand.cur"), 32513) End Sub Private Sub restaure() Call SetSystemCursor(LoadCursor(0, 32512), 32512) Call SetSystemCursor(LoadCursor(0, 32513), 32513) End Sub
Mais pour l'évènement Mouse_move, je mets quoi ?
tu appel la fonction
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5 Private Sub Lien_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single) Call change_curseur End Sub
Voilà j'ai fais tout ce que vous m'avaez dit mais lorsque je click sur le lien pour ouvrir le form, il ouvre VB et me met comme m'essage :
ERREUR DE COMPILATION
SUB OU FUNCTION NON DEFINIE
en mettant en surbrillance LoadCursorFromFile
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.
Partager