Aide Sur VBA ouverture formulaire. Fermé

Question

Bonjour à Tous,

Recherche aide précieuse pr m'aider dans la programmation VBA sur ouiverture de formulaire. Notamment pour mettre le focus sur un champ donné. Si quelqu'un peut me débrouiller de ma base car je ne m'en sors pas.

Merci de votre aide

moiced59 · Answer

Sur ouverture du formulaire tu met :

[nom_de_ton_champ].setfocus

NONOCOLI · Answer

Merci moiced59 pour ta réponse,

Mais c'est un peu plus complexe que cela, car je pars d'1 formulaire"enregistrement" ou j'ai deux champs "Allée" et "Numéro", concaténé en un champ texte "Allée&Numéro" Ex Allée=A Numéro=027, champ Texte49="A027".
A partir d'un icone, je veux ouvrir un formulaire "Plan" ou j'ai mis des Boutons de commande par Microsoft Form 2 avec le Nom A001, A002.......A027...
Je voudrais donc qu'en cliquant sur l'icone, je puisse ouvrir mon formulaire champ et mettre le focus sur le bouton de commande correspondant à la fiche ouvert dans mon formulaire enregistrement.

Merci de ton aide
Pour plus de facilité, je pourrais t'adresser ma base...un peu particulière!
Mon adresse mail :noel.colineaux@design-duval.com

A+

moiced59 · Answer

ah ok !!!!

sur ton formulaire allée tu as mis un bouton avec un code ex: DoCmd.OpenForm "plan"

tu pourrais dc y ajouté :
DoCmd.OpenForm "plan", , ,"texte49 = '" & nom_de_ton_bouton & "'"

NONOCOLI · Answer

Merci encore, moiced59, de t'occuper de mon prbl mais ça ne fonctionne pas,

Peux tu m'expliquer pourquoi la syntaxe ci-dessous ne fonctionne pas à l'ouverture du formulaire "plan"

Dim réponse As String

  'demande faite à l'utilisateur d'indiquer l'allée et le numéro
réponse = InputBox("indiquer l'allée & et le numéro de l'emplacement")

  'Affichage dans une message box du choix effectué

MsgBox ("réponse")
  'utilisation de la réponse pour mettre le focus sur le contrôle concerné
[réponse].SetFocus


Pour moi, à l'ouverture, j'ai cet InputBox qui demande à l'utilisateur de rentrer l'allée et le Numéro, exemple : A025
Je souhaite reprendre cette réponse pour mettre le focus sur le controle correspond dans le formulaire "plan"

Si je fais [A025].SetFocus j'ai bien le focus sur le bon controle A025

par contre si je fais [réponse].SetFocus ça ne fonctionne pas.

si j'arrive à règler ce problème, je vais pouvoir énormément avancer dans ma base.

j'espère que j'explique bien mon prbl

Encore merci du coup de main

A+

NONOCOLI

moiced59 · Answer

salut

essai de ajouter ca a ton code:
dim test as string

test = reponse

[test].SetFocus a la place de [réponse].SetFocus

moiced59 · Answer

c bon tu as reussi?

NONOCOLI · Answer

Désolé moiced59, mais je me suis absenté qqs jours et je n'ai pas pu me reconnecter.

j'ai fais l'essai avec ta syntaxe, mais ça ne marche pas.

En mettant une boite de dialogue à l'ouverture de mon formulaire avec attente d'une réponse telle que : A027, il faudrait utiliser la réponse pour mettre le focus sur le contrôle A027. Est-ce un probléme de correspondance entre les champs, d'un coté un champ texte lors de la réponse, et d'un coté un champ contrôle ? 

A+ sur le forum

NONOCOLI

moiced59 · Answer

cela fais quoi ?
message d erreur ou...?

moiced59 · Answer

ok essai ca sinon:


dim test as string
dim reponse as string

reponse= inputbox("fgfdnlxckvlkjvlkcocndsoncoidncosdn")

test = reponse 

docmd.gotocontrol test

ca je pense que cela pourrai marcher bien sur adapte le code a ton formulaire

NONOCOLI · Answer

Bonjour moiced56.

OK ça ca marche bien - tu m'enlève une épine du pied - 

maintenant je voudrais que mon contrôle test dès la réception du focus devienne rouge. Je peux le faire en le mettant dans chaque contrôle, sur réception focus, changer Backcolor. 

Il est sans doute possible de le mettre dans la syntaxe après gotocontrol test, j'ai essayé test.BackControl=255, mais il me met "Erreur de compilation, qualificateur incorrect".

Enfin lorsqu'il met le focus sur un contrôle, est-il possible de lui demander de mettre le contrôle au centre de l'affichage.

Super pour la syntaxe GoToControl !!! 

j'avance à petit pas, mais j'avance

A+ sur le forum

Nonocoli

moiced59 · Answer

bonsoir

backcontrol tu es sur de ca?

g cherché mais la je seche

Aide Sur VBA ouverture formulaire.

11 réponses

Discussions similaires