Message sur formulaire
LApprenti2
Messages postés
14
Date d'inscription
Statut
Membre
Dernière intervention
-
lapprenti2 -
lapprenti2 -
Bonjour,
Access 2010
j'ai dans le formulaire 1, un bouton "mise a jour des fichiers de base" qui, sur un clic lance une macro qui épure de gros fichiers afin de pouvoir travailler plus vite par la suite.
à la fin de la macro j'ai mise une zone message qui dit "Mise à jour fichier de base terminée" on clic sur ok .
1) a partir de là, est t'il possible d'afficher dans une zone de texte du dit formulaire le message suivant "dernière mise à jour le (jour/mois/année et heure)25/09/2013 à 14 h 10"
2) que ce message reste même après fermeture de la base, jusqu'à ce que l'on clic de nouveau sur le bouton "mise a jour des fichiers de base"
3) je ne connais rien VBA.
merci d'avance
--
Access 2010
j'ai dans le formulaire 1, un bouton "mise a jour des fichiers de base" qui, sur un clic lance une macro qui épure de gros fichiers afin de pouvoir travailler plus vite par la suite.
à la fin de la macro j'ai mise une zone message qui dit "Mise à jour fichier de base terminée" on clic sur ok .
1) a partir de là, est t'il possible d'afficher dans une zone de texte du dit formulaire le message suivant "dernière mise à jour le (jour/mois/année et heure)25/09/2013 à 14 h 10"
2) que ce message reste même après fermeture de la base, jusqu'à ce que l'on clic de nouveau sur le bouton "mise a jour des fichiers de base"
3) je ne connais rien VBA.
merci d'avance
--
A voir également:
- Message sur formulaire
- Whatsapp formulaire opposition - Guide
- Comment recuperer un message supprimé sur whatsapp - Guide
- Formulaire de réclamation facebook - Guide
- Message supprimé whatsapp - Guide
- Message absence thunderbird - Guide
8 réponses
bonjour,
merci pour la réponse,
pourrai- je avoir la solution, spv
@+ Lapprenti2
--
merci pour la réponse,
pourrai- je avoir la solution, spv
@+ Lapprenti2
--
re bonjour
merci
qu'entend tu par zone de texte
zone de texte ou étiquette
j'ai inséré une zone texte "TEXTE 30"
ensuite je suis allé dans mon bouton de commande, ou j'ai fait crée code événement, générateur de code, ou j'ai collé ton code:
Private Sub Commande0_Click()
End Sub
Private Sub Commande0_DblClick(Cancel As Integer)
zone_de_texte.value = "derniere mise à jour le " & date & " à " time
End Sub
merci
qu'entend tu par zone de texte
zone de texte ou étiquette
j'ai inséré une zone texte "TEXTE 30"
ensuite je suis allé dans mon bouton de commande, ou j'ai fait crée code événement, générateur de code, ou j'ai collé ton code:
Private Sub Commande0_Click()
End Sub
Private Sub Commande0_DblClick(Cancel As Integer)
zone_de_texte.value = "derniere mise à jour le " & date & " à " time
End Sub
bonjour BLUX,
merci pour ta patience,
donc si j'ai bien compris le code que je doit rajouté est:
Texte30.value = "derniere mise à jour le " & date & " à " & time
pour le rajouter au code je passe par l'onglet événement de la propriété du bouton.
sur double clic : MAC_001_MISE A JOUR FICHIERS DE BASE
je suppose un séparateur ?
Texte30.value = "derniere mise à jour le " & date & " à " & time
cela devrait donner quelque chose comme cela ?
sur double clic MAC_001_MISE A JOUR FICHIERS DE BASE;Texte30.value = "derniere mise à jour le " & date & " à " & time
cette syntaxe ne fonctionne pas.
merci pour ta patience,
donc si j'ai bien compris le code que je doit rajouté est:
Texte30.value = "derniere mise à jour le " & date & " à " & time
pour le rajouter au code je passe par l'onglet événement de la propriété du bouton.
sur double clic : MAC_001_MISE A JOUR FICHIERS DE BASE
je suppose un séparateur ?
Texte30.value = "derniere mise à jour le " & date & " à " & time
cela devrait donner quelque chose comme cela ?
sur double clic MAC_001_MISE A JOUR FICHIERS DE BASE;Texte30.value = "derniere mise à jour le " & date & " à " & time
cette syntaxe ne fonctionne pas.
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
oui j'ai dans l'onglet propriété (du bouton) puis l'onglet Evénement, sur la ligne double clic:
MAC_001_MISE A JOUR FICHIERS DE BASE
mais c'est tout
en mode création si je clic sur générateur de code du bouton , je n'est pas de code VBA
c'est dommage que l'on ne puisse pas coller des copies d'écran
là je suis perdu,
MAC_001_MISE A JOUR FICHIERS DE BASE
mais c'est tout
en mode création si je clic sur générateur de code du bouton , je n'est pas de code VBA
c'est dommage que l'on ne puisse pas coller des copies d'écran
là je suis perdu,
On peut coller des images sur le site...
Ce qu'on va faire, c'est changer le mode d'appel de la macro, on va le mettre en VBA.
Tu vas aller sur ton bouton et sur la ligne double-clic tu vas choisir 'Procédure evenementielle'.
Ca va ouvrir une fenêtre VBA.
Tu y colleras ensuite les lignes suivantes (entre le Private Sub et le End Sub) :
Ca devrait marcher...
Ce qu'on va faire, c'est changer le mode d'appel de la macro, on va le mettre en VBA.
Tu vas aller sur ton bouton et sur la ligne double-clic tu vas choisir 'Procédure evenementielle'.
Ca va ouvrir une fenêtre VBA.
Tu y colleras ensuite les lignes suivantes (entre le Private Sub et le End Sub) :
DoCmd.RunMacro "MAC_001_MISE A JOUR FICHIERS DE BASE "
Texte30.value = "derniere mise à jour le " & date & " à " & time
Ca devrait marcher...
Bonjour Blux,
merci de ton aide,
avec ce code çà marche:
Private Sub Commande0_DblClick(Cancel As Integer)
DoCmd.RunMacro "MAC_001_MISE_A_JOUR_FICHIERS_DE_BASE"
Texte30.Value = " Derniere mise à jour le " & Date & " à " & Time
End Sub
s'en vouloir abuser, je souhaiterai que lorsque que l'utilisateur ferme la base cette information reste et apparaisse à la prochaine ouverture, ce qui n'est pas le cas.
a l'ouverture la zone de texte 30 est vide.
encore merci
Lapprenti2
merci de ton aide,
avec ce code çà marche:
Private Sub Commande0_DblClick(Cancel As Integer)
DoCmd.RunMacro "MAC_001_MISE_A_JOUR_FICHIERS_DE_BASE"
Texte30.Value = " Derniere mise à jour le " & Date & " à " & Time
End Sub
s'en vouloir abuser, je souhaiterai que lorsque que l'utilisateur ferme la base cette information reste et apparaisse à la prochaine ouverture, ce qui n'est pas le cas.
a l'ouverture la zone de texte 30 est vide.
encore merci
Lapprenti2
Ce n'est pas abuser, c'était posé au début, j'ai juste zappé ;-)
Le truc n'est pas simple, donc on va ruser :
- créer un objet de type 'module'.
- ajouter dans ce module la ligne suivante :
- changer le code affecté au bouton par les lignes suivantes :
Le truc n'est pas simple, donc on va ruser :
- créer un objet de type 'module'.
- ajouter dans ce module la ligne suivante :
Public DerDate As String- enregistrer le module
- changer le code affecté au bouton par les lignes suivantes :
DoCmd.RunMacro "MAC_001_MISE_A_JOUR_FICHIERS_DE_BASE"- ajouter du code dans l'évènement "sur ouverture' du formulaire :
DerDate = " Derniere mise à jour le " & Date & " à " & Time
Texte30.Value = DerDate
Texte30.Value = DerDateCa devrait fonctionner...
re
ok mais je n'ai pas d'événement "sur ouverture"
sur clic
sur réception focus
sur perte focus
sur double clic
sur souris relâchée
sur suris appuyée
sur souris déplacée
sur touche appuyée
sur touche relâchée
sur touche active
sur entre
sur sortie
petite précision le formule "Formulaire1" s'ouvre à l'ouverture de la base.
j'ai fait un essai avec "sur entrée" çà marche
ok mais je n'ai pas d'événement "sur ouverture"
sur clic
sur réception focus
sur perte focus
sur double clic
sur souris relâchée
sur suris appuyée
sur souris déplacée
sur touche appuyée
sur touche relâchée
sur touche active
sur entre
sur sortie
petite précision le formule "Formulaire1" s'ouvre à l'ouverture de la base.
j'ai fait un essai avec "sur entrée" çà marche
bonjour Blux,
non c'est que j'était dans les propriétés du bouton au lieu d'être dans les propriétés du Formulaire....
maintenant que je suis allé au bon endroit, cela fonctionne tant que je ne ferme pas la base de donnée,
est ce possible de faire la même chose à l'ouverture de la base en sachant quelle ouvre sur le formulaire 1
encore merci
non c'est que j'était dans les propriétés du bouton au lieu d'être dans les propriétés du Formulaire....
maintenant que je suis allé au bon endroit, cela fonctionne tant que je ne ferme pas la base de donnée,
est ce possible de faire la même chose à l'ouverture de la base en sachant quelle ouvre sur le formulaire 1
encore merci