La date me paraît plutôt curieuse... Passons...
Concernant l'étiquette, c'est tout l'intérêt de la syntaxe utilisée:
Le MadateCalcul.Caption met à jour le libellé de l'étiquette. J'utilise
cette technique depuis longtemps, ça a toujours fonctionné.
Dans ton message <# du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:dans la msg box qui récupère la date il m'affiche en premier 00:00:00
puis le 31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" a écrit dans le
message de news:Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la
procédure qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" a écrit dans le
message de news:Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas
une zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$ du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer
les faits suivants:toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" a écrit dans le message de
news: 46e93105$0$5091$salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété
de type événement est à l'origine d'une erreur. Incompatiblité de
type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" a écrit dans le message de
news: 46e8fd46$0$25948$Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir
placé une zone de texte et l'avoir paramétrée avec [saisir ici la
date]. Puis cette date est récupérée pour le numéro de semaine.
Jusque là tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en
argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
La date me paraît plutôt curieuse... Passons...
Concernant l'étiquette, c'est tout l'intérêt de la syntaxe utilisée:
Le MadateCalcul.Caption met à jour le libellé de l'étiquette. J'utilise
cette technique depuis longtemps, ça a toujours fonctionné.
Dans ton message <#rIyRCh9HHA.5980@TK2MSFTNGP04.phx.gbl> du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:
dans la msg box qui récupère la date il m'affiche en premier 00:00:00
puis le 31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le
message de news: mn.6bbc7d79067f3e4b.64280@tiscali.fr...
Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la
procédure qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:
là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le
message de news: mn.6b997d79e01918d3.64280@tiscali.fr...
Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas
une zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$1Xag9HHA.4712@TK2MSFTNGP04.phx.gbl> du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer
les faits suivants:
toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" <UrbaniakFabienxxxxx@Neuf.fr> a écrit dans le message de
news: 46e93105$0$5091$ba4acef3@news.orange.fr...
salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété
de type événement est à l'origine d'une erreur. Incompatiblité de
type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" <UrbaniakFabienxxxxx@Neuf.fr> a écrit dans le message de
news: 46e8fd46$0$25948$ba4acef3@news.orange.fr...
Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir
placé une zone de texte et l'avoir paramétrée avec [saisir ici la
date]. Puis cette date est récupérée pour le numéro de semaine.
Jusque là tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en
argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
La date me paraît plutôt curieuse... Passons...
Concernant l'étiquette, c'est tout l'intérêt de la syntaxe utilisée:
Le MadateCalcul.Caption met à jour le libellé de l'étiquette. J'utilise
cette technique depuis longtemps, ça a toujours fonctionné.
Dans ton message <# du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:dans la msg box qui récupère la date il m'affiche en premier 00:00:00
puis le 31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" a écrit dans le
message de news:Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la
procédure qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" a écrit dans le
message de news:Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas
une zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$ du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer
les faits suivants:toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" a écrit dans le message de
news: 46e93105$0$5091$salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété
de type événement est à l'origine d'une erreur. Incompatiblité de
type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" a écrit dans le message de
news: 46e8fd46$0$25948$Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir
placé une zone de texte et l'avoir paramétrée avec [saisir ici la
date]. Puis cette date est récupérée pour le numéro de semaine.
Jusque là tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en
argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
La date me paraît plutôt curieuse... Passons...
Concernant l'étiquette, c'est tout l'intérêt de la syntaxe utilisée:
Le MadateCalcul.Caption met à jour le libellé de l'étiquette. J'utilise
cette technique depuis longtemps, ça a toujours fonctionné.
Dans ton message <# du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:dans la msg box qui récupère la date il m'affiche en premier 00:00:00
puis le 31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" a écrit dans le
message de news:Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la
procédure qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" a écrit dans le
message de news:Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas
une zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$ du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer
les faits suivants:toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" a écrit dans le message de
news: 46e93105$0$5091$salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété
de type événement est à l'origine d'une erreur. Incompatiblité de
type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" a écrit dans le message de
news: 46e8fd46$0$25948$Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir
placé une zone de texte et l'avoir paramétrée avec [saisir ici la
date]. Puis cette date est récupérée pour le numéro de semaine.
Jusque là tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en
argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
La date me paraît plutôt curieuse... Passons...
Concernant l'étiquette, c'est tout l'intérêt de la syntaxe utilisée:
Le MadateCalcul.Caption met à jour le libellé de l'étiquette. J'utilise
cette technique depuis longtemps, ça a toujours fonctionné.
Dans ton message <#rIyRCh9HHA.5980@TK2MSFTNGP04.phx.gbl> du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:
dans la msg box qui récupère la date il m'affiche en premier 00:00:00
puis le 31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le
message de news: mn.6bbc7d79067f3e4b.64280@tiscali.fr...
Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la
procédure qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:
là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le
message de news: mn.6b997d79e01918d3.64280@tiscali.fr...
Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas
une zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$1Xag9HHA.4712@TK2MSFTNGP04.phx.gbl> du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer
les faits suivants:
toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" <UrbaniakFabienxxxxx@Neuf.fr> a écrit dans le message de
news: 46e93105$0$5091$ba4acef3@news.orange.fr...
salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété
de type événement est à l'origine d'une erreur. Incompatiblité de
type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" <UrbaniakFabienxxxxx@Neuf.fr> a écrit dans le message de
news: 46e8fd46$0$25948$ba4acef3@news.orange.fr...
Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir
placé une zone de texte et l'avoir paramétrée avec [saisir ici la
date]. Puis cette date est récupérée pour le numéro de semaine.
Jusque là tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en
argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
La date me paraît plutôt curieuse... Passons...
Concernant l'étiquette, c'est tout l'intérêt de la syntaxe utilisée:
Le MadateCalcul.Caption met à jour le libellé de l'étiquette. J'utilise
cette technique depuis longtemps, ça a toujours fonctionné.
Dans ton message <# du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:dans la msg box qui récupère la date il m'affiche en premier 00:00:00
puis le 31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" a écrit dans le
message de news:Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la
procédure qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" a écrit dans le
message de news:Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas
une zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$ du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer
les faits suivants:toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" a écrit dans le message de
news: 46e93105$0$5091$salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété
de type événement est à l'origine d'une erreur. Incompatiblité de
type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" a écrit dans le message de
news: 46e8fd46$0$25948$Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir
placé une zone de texte et l'avoir paramétrée avec [saisir ici la
date]. Puis cette date est récupérée pour le numéro de semaine.
Jusque là tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en
argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
dans la msg box qui récupère la date il m'affiche en premier 00:00:00 puis le
31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" a écrit dans le message
de news:Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la procédure
qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" a écrit dans le
message de news:Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas une
zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$ du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" a écrit dans le message de news:
46e93105$0$5091$salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété de
type événement est à l'origine d'une erreur. Incompatiblité de type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" a écrit dans le message de
news: 46e8fd46$0$25948$Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir placé
une zone de texte et l'avoir paramétrée avec [saisir ici la date].
Puis cette date est récupérée pour le numéro de semaine. Jusque là
tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
dans la msg box qui récupère la date il m'affiche en premier 00:00:00 puis le
31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le message
de news: mn.6bbc7d79067f3e4b.64280@tiscali.fr...
Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la procédure
qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:
là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le
message de news: mn.6b997d79e01918d3.64280@tiscali.fr...
Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas une
zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$1Xag9HHA.4712@TK2MSFTNGP04.phx.gbl> du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:
toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" <UrbaniakFabienxxxxx@Neuf.fr> a écrit dans le message de news:
46e93105$0$5091$ba4acef3@news.orange.fr...
salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété de
type événement est à l'origine d'une erreur. Incompatiblité de type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" <UrbaniakFabienxxxxx@Neuf.fr> a écrit dans le message de
news: 46e8fd46$0$25948$ba4acef3@news.orange.fr...
Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir placé
une zone de texte et l'avoir paramétrée avec [saisir ici la date].
Puis cette date est récupérée pour le numéro de semaine. Jusque là
tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
dans la msg box qui récupère la date il m'affiche en premier 00:00:00 puis le
31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" a écrit dans le message
de news:Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la procédure
qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" a écrit dans le
message de news:Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas une
zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$ du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" a écrit dans le message de news:
46e93105$0$5091$salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété de
type événement est à l'origine d'une erreur. Incompatiblité de type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" a écrit dans le message de
news: 46e8fd46$0$25948$Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir placé
une zone de texte et l'avoir paramétrée avec [saisir ici la date].
Puis cette date est récupérée pour le numéro de semaine. Jusque là
tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
La date me paraît plutôt curieuse... Passons...
Concernant l'étiquette, c'est tout l'intérêt de la syntaxe utilisée:
Le MadateCalcul.Caption met à jour le libellé de l'étiquette. J'utilise
cette technique depuis longtemps, ça a toujours fonctionné.
Dans ton message <# du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:dans la msg box qui récupère la date il m'affiche en premier 00:00:00
puis le 31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" a écrit dans le
message de news:Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la
procédure qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" a écrit dans le
message de news:Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas
une zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$ du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer
les faits suivants:toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" a écrit dans le message de
news: 46e93105$0$5091$salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété
de type événement est à l'origine d'une erreur. Incompatiblité de
type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" a écrit dans le message de
news: 46e8fd46$0$25948$Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir
placé une zone de texte et l'avoir paramétrée avec [saisir ici la
date]. Puis cette date est récupérée pour le numéro de semaine.
Jusque là tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en
argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
La date me paraît plutôt curieuse... Passons...
Concernant l'étiquette, c'est tout l'intérêt de la syntaxe utilisée:
Le MadateCalcul.Caption met à jour le libellé de l'étiquette. J'utilise
cette technique depuis longtemps, ça a toujours fonctionné.
Dans ton message <#rIyRCh9HHA.5980@TK2MSFTNGP04.phx.gbl> du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:
dans la msg box qui récupère la date il m'affiche en premier 00:00:00
puis le 31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le
message de news: mn.6bbc7d79067f3e4b.64280@tiscali.fr...
Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la
procédure qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:
là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le
message de news: mn.6b997d79e01918d3.64280@tiscali.fr...
Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas
une zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$1Xag9HHA.4712@TK2MSFTNGP04.phx.gbl> du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer
les faits suivants:
toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" <UrbaniakFabienxxxxx@Neuf.fr> a écrit dans le message de
news: 46e93105$0$5091$ba4acef3@news.orange.fr...
salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété
de type événement est à l'origine d'une erreur. Incompatiblité de
type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" <UrbaniakFabienxxxxx@Neuf.fr> a écrit dans le message de
news: 46e8fd46$0$25948$ba4acef3@news.orange.fr...
Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir
placé une zone de texte et l'avoir paramétrée avec [saisir ici la
date]. Puis cette date est récupérée pour le numéro de semaine.
Jusque là tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en
argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
La date me paraît plutôt curieuse... Passons...
Concernant l'étiquette, c'est tout l'intérêt de la syntaxe utilisée:
Le MadateCalcul.Caption met à jour le libellé de l'étiquette. J'utilise
cette technique depuis longtemps, ça a toujours fonctionné.
Dans ton message <# du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer les
faits suivants:dans la msg box qui récupère la date il m'affiche en premier 00:00:00
puis le 31/12/1899, le 01/01/1900 et ainsi de suite.
Mais j'ai tout de même une question : peut-on injecter une info dans une
étiquette ? Je croyais que ce n'était possible que dans une zone de texte
Dom
"Thierry (ze Titi)" a écrit dans le
message de news:Tente l'affichage de ta date par MsgBox pour vérifier que la date arrive
bien en argument, que l'on sache si ça vient de l'état ou de la
procédure qui l'ouvre.
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:là cela marche mais la date ne s'affiche pas dans l'étiquette
"Thierry (ze Titi)" a écrit dans le
message de news:Bonjour Zambohanga
Je me permets d'intervenir... Dans ton état, il faut placer non pas
une zone de texte mais une étiquette.
Et le code à l'ouverture de l'état est:
MadateCalcul.Caption = openargs
Dans ton message <#L$ du jeudi
13/09/2007 jour de Saint Aimé, tu as pris l'initiative de nous narrer
les faits suivants:toujours plantage à l'ouverture de l'état
Où est-ce qu'il faut mettre sur l'état la zone nommée madatecalcul :
entete, page, détail, ... ?
Faut-il faire attention au format de cette zone ?
"Fabien" a écrit dans le message de
news: 46e93105$0$5091$salut
j'ai un plantage au moment de l'impression via le bouton qui lance
l'impression
Erreur d'execution 2473
L'expression sur ouverture entrée comme paramètre de la propriété
de type événement est à l'origine d'une erreur. Incompatiblité de
type
En déboguant, la ligne du docmd passe en jaune
Voici le code du bouton
Private Sub CdeEmargt_Click()
Dim i As Integer
For i = 1 To 5
date_imprime = DateAdd("d", Date_saisie, i)
DoCmd.OpenReport "Etat Emargements", , , , , date_imprime
Next i
End Sub
une idée ?
Merci
"Fabien" a écrit dans le message de
news: 46e8fd46$0$25948$Bonjour à tous,
Voilà mon souci :
Sur mon état Feuille Emargement je saisie une date àprès avoir
placé une zone de texte et l'avoir paramétrée avec [saisir ici la
date]. Puis cette date est récupérée pour le numéro de semaine.
Jusque là tout vas bien.
Sauf que dois imprimer une feuille d'émargement par jour, donc
j'active l'état 5 fois et je saisie 5 fois la date.
N'est-il pas possible de saisir une fois la date dans ma boite de
dialogue (le 17/09/2007 par ex) et de faire 5 impressions avec à
chaque fois le jour suivant (18, 19, ...) ?
Merci pour vos idées
Dom
Bonjour,
Avec un petit formulaire:
Tu met un controle dans lequel saisir ta date
Ensuite un petit bouton pour l'impression
Dans le source du code de l'evenement Sur Clic de ce bouton tu met
quelque chose comme
Dim I as integer
For i = 1 to 5
Date_imprimeÚteadd("d",Date_saisie,i)
Docmd.openreport "Emargement", , , , ,Date_imprime
next i
Dans ton etat Emargement tu positionne une zone nommée par ex
madatecalcul
Dans l'evenement Sur ouverture de ton état tu ajoutes
MadateCalcul=openargs
Le principe c'est de passer a ton état la date calculée en
argument.
Voilà
Et comme ça ?
Public Function test()
Dim I As Integer
Dim Date_calcul As Date
Dim Date_saisie As Date
Date_saisie = "01/01/2008"
For I = 0 To 5 'Le jours saisi + les 5 suivants
Date_calcul = DateAdd("d", 1, Date_saisie)
DoCmd.OpenReport "Etat Emargement", , , , , Date_calcul
Next I
End Function
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007
J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Son nom est madatecalcul
Sur l'événement ouverture de l'état j'ai ceci :
=Madatecalcul.Légende=[ArgOuverture]
Le code du bouton est celui-ci:
Private Sub CdeEmargt_Click()
Dim I As Integer
For I = 0 To 4 'Le jours saisi + les 4 suivants
Date_imprime = DateAdd("d", I, Date_saisie)
'MsgBox Format(Date_imprime, "dd/mm/yyyy") 'pour tester le résultat
de la boucle
DoCmd.OpenReport "Etat Emargements", , , , , Date_imprime
Next I
End Sub
Sur le formulaire, je saisie la date dans une zone qui s'apelle bien
Date_Saisie
"Thierry (ze Titi)" a écrit dans le message
de news:Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Son nom est madatecalcul
Sur l'événement ouverture de l'état j'ai ceci :
=Madatecalcul.Légende=[ArgOuverture]
Le code du bouton est celui-ci:
Private Sub CdeEmargt_Click()
Dim I As Integer
For I = 0 To 4 'Le jours saisi + les 4 suivants
Date_imprime = DateAdd("d", I, Date_saisie)
'MsgBox Format(Date_imprime, "dd/mm/yyyy") 'pour tester le résultat
de la boucle
DoCmd.OpenReport "Etat Emargements", , , , , Date_imprime
Next I
End Sub
Sur le formulaire, je saisie la date dans une zone qui s'apelle bien
Date_Saisie
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le message
de news: mn.6be47d799e96e336.64280@tiscali.fr...
Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007
J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Son nom est madatecalcul
Sur l'événement ouverture de l'état j'ai ceci :
=Madatecalcul.Légende=[ArgOuverture]
Le code du bouton est celui-ci:
Private Sub CdeEmargt_Click()
Dim I As Integer
For I = 0 To 4 'Le jours saisi + les 4 suivants
Date_imprime = DateAdd("d", I, Date_saisie)
'MsgBox Format(Date_imprime, "dd/mm/yyyy") 'pour tester le résultat
de la boucle
DoCmd.OpenReport "Etat Emargements", , , , , Date_imprime
Next I
End Sub
Sur le formulaire, je saisie la date dans une zone qui s'apelle bien
Date_Saisie
"Thierry (ze Titi)" a écrit dans le message
de news:Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Hello Zambohanga !
=Madatecalcul.Légende=[ArgOuverture]
?!???
Ca vient d'où ? Ca n'est pas sur la ligne correspondant à l'évènement mais
dans le code VBA qu'il faut mettre cette ligne et ça donne:
Madatecalcul.Caption=OpenArgs
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:Son nom est madatecalcul
Sur l'événement ouverture de l'état j'ai ceci :
=Madatecalcul.Légende=[ArgOuverture]
Le code du bouton est celui-ci:
Private Sub CdeEmargt_Click()
Dim I As Integer
For I = 0 To 4 'Le jours saisi + les 4 suivants
Date_imprime = DateAdd("d", I, Date_saisie)
'MsgBox Format(Date_imprime, "dd/mm/yyyy") 'pour tester le
résultat de la boucle
DoCmd.OpenReport "Etat Emargements", , , , , Date_imprime
Next I
End Sub
Sur le formulaire, je saisie la date dans une zone qui s'apelle bien
Date_Saisie
"Thierry (ze Titi)" a écrit dans le
message de news:Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Hello Zambohanga !
=Madatecalcul.Légende=[ArgOuverture]
?!???
Ca vient d'où ? Ca n'est pas sur la ligne correspondant à l'évènement mais
dans le code VBA qu'il faut mettre cette ligne et ça donne:
Madatecalcul.Caption=OpenArgs
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:
Son nom est madatecalcul
Sur l'événement ouverture de l'état j'ai ceci :
=Madatecalcul.Légende=[ArgOuverture]
Le code du bouton est celui-ci:
Private Sub CdeEmargt_Click()
Dim I As Integer
For I = 0 To 4 'Le jours saisi + les 4 suivants
Date_imprime = DateAdd("d", I, Date_saisie)
'MsgBox Format(Date_imprime, "dd/mm/yyyy") 'pour tester le
résultat de la boucle
DoCmd.OpenReport "Etat Emargements", , , , , Date_imprime
Next I
End Sub
Sur le formulaire, je saisie la date dans une zone qui s'apelle bien
Date_Saisie
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le
message de news: mn.6be47d799e96e336.64280@tiscali.fr...
Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007
J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Hello Zambohanga !
=Madatecalcul.Légende=[ArgOuverture]
?!???
Ca vient d'où ? Ca n'est pas sur la ligne correspondant à l'évènement mais
dans le code VBA qu'il faut mettre cette ligne et ça donne:
Madatecalcul.Caption=OpenArgs
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:Son nom est madatecalcul
Sur l'événement ouverture de l'état j'ai ceci :
=Madatecalcul.Légende=[ArgOuverture]
Le code du bouton est celui-ci:
Private Sub CdeEmargt_Click()
Dim I As Integer
For I = 0 To 4 'Le jours saisi + les 4 suivants
Date_imprime = DateAdd("d", I, Date_saisie)
'MsgBox Format(Date_imprime, "dd/mm/yyyy") 'pour tester le
résultat de la boucle
DoCmd.OpenReport "Etat Emargements", , , , , Date_imprime
Next I
End Sub
Sur le formulaire, je saisie la date dans une zone qui s'apelle bien
Date_Saisie
"Thierry (ze Titi)" a écrit dans le
message de news:Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Hello Zambohanga !
=Madatecalcul.Légende=[ArgOuverture]
?!???
Ca vient d'où ? Ca n'est pas sur la ligne correspondant à l'évènement mais
dans le code VBA qu'il faut mettre cette ligne et ça donne:
Madatecalcul.Caption=OpenArgs
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:Son nom est madatecalcul
Sur l'événement ouverture de l'état j'ai ceci :
=Madatecalcul.Légende=[ArgOuverture]
Le code du bouton est celui-ci:
Private Sub CdeEmargt_Click()
Dim I As Integer
For I = 0 To 4 'Le jours saisi + les 4 suivants
Date_imprime = DateAdd("d", I, Date_saisie)
'MsgBox Format(Date_imprime, "dd/mm/yyyy") 'pour tester le
résultat de la boucle
DoCmd.OpenReport "Etat Emargements", , , , , Date_imprime
Next I
End Sub
Sur le formulaire, je saisie la date dans une zone qui s'apelle bien
Date_Saisie
"Thierry (ze Titi)" a écrit dans le
message de news:Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Hello Zambohanga !
=Madatecalcul.Légende=[ArgOuverture]
?!???
Ca vient d'où ? Ca n'est pas sur la ligne correspondant à l'évènement mais
dans le code VBA qu'il faut mettre cette ligne et ça donne:
Madatecalcul.Caption=OpenArgs
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:
Son nom est madatecalcul
Sur l'événement ouverture de l'état j'ai ceci :
=Madatecalcul.Légende=[ArgOuverture]
Le code du bouton est celui-ci:
Private Sub CdeEmargt_Click()
Dim I As Integer
For I = 0 To 4 'Le jours saisi + les 4 suivants
Date_imprime = DateAdd("d", I, Date_saisie)
'MsgBox Format(Date_imprime, "dd/mm/yyyy") 'pour tester le
résultat de la boucle
DoCmd.OpenReport "Etat Emargements", , , , , Date_imprime
Next I
End Sub
Sur le formulaire, je saisie la date dans une zone qui s'apelle bien
Date_Saisie
"Thierry (ze Titi)" <ze_titi_enlever-ceci@tiscali.fr> a écrit dans le
message de news: mn.6be47d799e96e336.64280@tiscali.fr...
Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007
J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
Hello Zambohanga !
=Madatecalcul.Légende=[ArgOuverture]
?!???
Ca vient d'où ? Ca n'est pas sur la ligne correspondant à l'évènement mais
dans le code VBA qu'il faut mettre cette ligne et ça donne:
Madatecalcul.Caption=OpenArgs
En ce jour mémorable du jeudi 13/09/2007, tu as émis l'idée suivante:Son nom est madatecalcul
Sur l'événement ouverture de l'état j'ai ceci :
=Madatecalcul.Légende=[ArgOuverture]
Le code du bouton est celui-ci:
Private Sub CdeEmargt_Click()
Dim I As Integer
For I = 0 To 4 'Le jours saisi + les 4 suivants
Date_imprime = DateAdd("d", I, Date_saisie)
'MsgBox Format(Date_imprime, "dd/mm/yyyy") 'pour tester le
résultat de la boucle
DoCmd.OpenReport "Etat Emargements", , , , , Date_imprime
Next I
End Sub
Sur le formulaire, je saisie la date dans une zone qui s'apelle bien
Date_Saisie
"Thierry (ze Titi)" a écrit dans le
message de news:Je suppose que tu as adapté correctement le nom de l'étiquette... Hein ?
Message du jeudi 13/09/2007J'ai trouvé, ne pas déclarer la zone de texte de saisie de la date en
date.
Maintenant reste le problème de ces dates à coller dans l'étiquette de
l'état
Dom
-- Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
--
Cordialement,
Thierry
Tout pour réussir avec Access :
http://www.mpfa.info
