Macro et focus
Macro et focus - VB/VBA/VBS - Programmation
Marsh Posté le 20-04-2005 à 15:55:31
oui , mais j'ai testé ce code, ca compile tranquil, mais quand je suis sur mon formulaire et que j'essaye, ca marche pas. il doit manquer quelque chose ? non ?
Marsh Posté le 20-04-2005 à 16:06:47
Ah merde je suis con :
Private Sub numRF_LostFocus() |
Marsh Posté le 20-04-2005 à 16:13:36
pareil, pas de résultat visible. j'ai essayer numRF.Value, pareil pas de réponse. y'a pas une option, faut peut etre rendre le formulaire actif ?? je ne sais pas du tout
Marsh Posté le 20-04-2005 à 16:52:11
ok, j vé chercher, merci pour ton aide, si tu as d'autres idées n'hésite pas. salut.
Marsh Posté le 20-04-2005 à 17:21:47
ca y est j'ai trouvé : voila le code
Private Sub numRF_LostFocus()
Dim mc As Control
Dim mf As Form
Set mf = Screen.ActiveForm
Set mc = Screen.ActiveControl
mc.SetFocus
mc = UCase(mc)
End Sub
ciao
Sujets relatifs:
- Stoper une boucle "for" pendant l'exécution d'ue macro
- Exécution d'une macro si modification
- Macro graphe Excel données importées de fichier .txt
- MACRO EXCEL
- Actualisation des valeurs ds excel pour macro VBA
- execution d'une macro excel
- Macro a executer a la fermeture du fichier
- macro userform indépendante
- Desactiver macro / activer macro / ne pas ouvrir le fichier
- Variable dans une macro ?
Marsh Posté le 20-04-2005 à 15:49:43
bonjour, voici mon problème :
je réalise une application sous access. j'ai un formulaire dans lequel se trouve un champs (numRF) et un champ (libelleRF). j'aimerai lorsque je passe du 1er au deuxième, que ce que j'ai tapé dans le 1er (numRf) se mette automatiquement en majuscule. j'ai donc créer pour ce champ (clic droit dans le formulaire) une procedure évènementielle (en lostFocus) voici mon code :
Private Sub numRF_LostFocus()
UCase (numRF)
End Sub
bien sur, ca parrait simple, mais je n'ai jamais manipulé de macro, et je ne sais pas ce qu'il faut que je déclare comme variable (RecordSet...etc). bref si quelqu'un pouvait me donner 1 cp de pouce.
Merci d'avance.