-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@waandoo.fr> a écrit dans le message
de
news:081301c358e7$e11efd20$a101280a@phx.gbl...
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ============================== >Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ============================== >Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:007001c35921$927bb700$a501280a@phx.gbl...
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@waandoo.fr> a écrit dans le message
de
news:081301c358e7$e11efd20$a101280a@phx.gbl...
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ============================== >Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ============================== >Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ============================== >Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:007001c35921$927bb700$a501280a@phx.gbl...
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@waandoo.fr> a écrit dans le message
de
news:081301c358e7$e11efd20$a101280a@phx.gbl...
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ============================== >Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
-----Message d'origine-----
Salut
merci pour ton aide
J ai fait qq modifs et ca marche presque
c est le nom du champs "date" qui plante
Ca fait pkluqieurs fois que je regarde c est bien le même
nom
je comprends pas
J ai essayé avec un autre champs ca marche pas non plus
pourquoi
le sais tu?
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" &
Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
merci pour ton aide
J ai fait qq modifs et ca marche presque
c est le nom du champs "date" qui plante
Ca fait pkluqieurs fois que je regarde c est bien le même
nom
je comprends pas
J ai essayé avec un autre champs ca marche pas non plus
pourquoi
le sais tu?
jml
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" &
Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:007001c35921$927bb700$a501280a@phx.gbl...
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@waandoo.fr> a écrit dans le message
de
news:081301c358e7$e11efd20$a101280a@phx.gbl...
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
merci pour ton aide
J ai fait qq modifs et ca marche presque
c est le nom du champs "date" qui plante
Ca fait pkluqieurs fois que je regarde c est bien le même
nom
je comprends pas
J ai essayé avec un autre champs ca marche pas non plus
pourquoi
le sais tu?
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" &
Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:040b01c359ab$a0373c40$a601280a@phx.gbl...
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:007001c35921$927bb700$a501280a@phx.gbl...
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@waandoo.fr> a écrit dans le message
de
news:081301c358e7$e11efd20$a101280a@phx.gbl...
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:040b01c359ab$a0373c40$a601280a@phx.gbl...
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:007001c35921$927bb700$a501280a@phx.gbl...
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@waandoo.fr> a écrit dans le message
de
news:081301c358e7$e11efd20$a101280a@phx.gbl...
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ============================== >>Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:040b01c359ab$a0373c40$a601280a@phx.gbl...
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ============================== >>Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:007001c35921$927bb700$a501280a@phx.gbl...
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@waandoo.fr> a écrit dans le message
de
news:081301c358e7$e11efd20$a101280a@phx.gbl...
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
de
news:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ============================== >>Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" & Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
-----Message d'origine-----
Salut
Crees une base vide
importes la table le form l'eta et compactes la ca
devrait faire 50 k
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jmarie" a écrit dans le message de
news:767e01c359b7$1578c770$
merci
mais je peux pas
l application est sur un micro sans internet
et la base est trop lourde
mais je vais essayer qd meme
par disquette
sinon je peux te donner mon tel
jm-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" &
Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et
des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le
message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
datesans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre
l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
.
-----Message d'origine-----
Salut
Crees une base vide
importes la table le form l'eta et compactes la ca
devrait faire 50 k
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jmarie" <jmalpr@wanadoo.fr> a écrit dans le message de
news:767e01c359b7$1578c770$a001280a@phx.gbl...
merci
mais je peux pas
l application est sur un micro sans internet
et la base est trop lourde
mais je vais essayer qd meme
par disquette
sinon je peux te donner mon tel
jm
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:040b01c359ab$a0373c40$a601280a@phx.gbl...
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" &
Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:007001c35921$927bb700$a501280a@phx.gbl...
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et
des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@waandoo.fr> a écrit dans le
message
de
news:081301c358e7$e11efd20$a101280a@phx.gbl...
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre
l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
.
-----Message d'origine-----
Salut
Crees une base vide
importes la table le form l'eta et compactes la ca
devrait faire 50 k
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jmarie" a écrit dans le message de
news:767e01c359b7$1578c770$
merci
mais je peux pas
l application est sur un micro sans internet
et la base est trop lourde
mais je vais essayer qd meme
par disquette
sinon je peux te donner mon tel
jm-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ========================= ======
Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" &
Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et
des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le
message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
datesans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre
l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
.
-----Message d'origine-----
Salut
Crees une base vide
importes la table le form l'eta et compactes la ca
devrait faire 50 k
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jmarie" a écrit dans le message de
news:767e01c359b7$1578c770$
merci
mais je peux pas
l application est sur un micro sans internet
et la base est trop lourde
mais je vais essayer qd meme
par disquette
sinon je peux te donner mon tel
jm-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ============================== >>>Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" &
Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et
des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le
message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
datesans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre
l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
.
-----Message d'origine-----
Salut
Crees une base vide
importes la table le form l'eta et compactes la ca
devrait faire 50 k
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jmarie" <jmalpr@wanadoo.fr> a écrit dans le message de
news:767e01c359b7$1578c770$a001280a@phx.gbl...
merci
mais je peux pas
l application est sur un micro sans internet
et la base est trop lourde
mais je vais essayer qd meme
par disquette
sinon je peux te donner mon tel
jm
-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:040b01c359ab$a0373c40$a601280a@phx.gbl...
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml
-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenement
sur clic
'================Copies ============================== >>>Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettre
le bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" &
Err.Description
& ") in procedure
Imprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@wanadoo.fr> a écrit dans le message
de
news:007001c35921$927bb700$a501280a@phx.gbl...
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm
-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]
<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et
des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" <jmalpr@waandoo.fr> a écrit dans le
message
de
news:081301c358e7$e11efd20$a101280a@phx.gbl...
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
date
sans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre
l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
.
-----Message d'origine-----
Salut
Crees une base vide
importes la table le form l'eta et compactes la ca
devrait faire 50 k
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pour
Access
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jmarie" a écrit dans le message de
news:767e01c359b7$1578c770$
merci
mais je peux pas
l application est sur un micro sans internet
et la base est trop lourde
mais je vais essayer qd meme
par disquette
sinon je peux te donner mon tel
jm-----Message d'origine-----
Salut
Mets moi dans une mdb la table, l'etat et le formulaire
Sinon on va y passer la nuit
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:040b01c359ab$a0373c40$
je pense qu il fallat mettre dans option Compare DATABASE
Dim critere as String
?????????
Peux tu me le confirmer
jml-----Message d'origine-----
Salut
Dans ton formulaire tu crees 2 CHAMPS DATE
DateFormDeb et dateformfin
Puis tu crees un bouton que tu appelles Imprimer et tu
mets dans l'evenementsur clic
'================Copies ============================== >>>Private Sub Imprimer_Click()
On Error GoTo Err_Imprimer_Click
'* [DatedelaTable] doit etre un champ de la table source
de ton etat mettrele bon nom
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]< = #" & me.DateFormFin & "# "
'* "NomEtat" mettre le bon nom
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
Fin:
Exit Sub
Err_Imprimer_Click:
MsgBox "Error " & Err.Number & " (" &
Err.Description
& ") in procedureImprimer_Click of Document VBA Form_SelectionAnnuaire"
Resume Next
End Sub
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le message
denews:007001c35921$927bb700$
As tu un exemple concret
je n arrive pas a adapter ta solution
merci encor
jm-----Message d'origine-----
Salut
regardes l'option critere de Docmd.openreport
du genre
Critere = "[DateDelaTABLE] >= #" & me.DateFormDeb & "#
and [DateDelaTABLE]<= #" & me.DateFormFin & "# "
DoCmd.OpenReport "NomEtat", acViewPreview, Critere
--
@+
André
Quelques liens avec des exemples, des utilitaires et
des
compléments pourAccess
http://access.seneque.free.fr/
http://www.self-access.com/
http://www.mvps.org/accessfr/
http://mypage.bluewin.ch/w.stucki/
http://access.jessy.free.fr/
http://www.anor.fr.st
"jean-marie" a écrit dans le
message
denews:081301c358e7$e11efd20$
Bonjour
J ai créé un état me permettant détablir des factures
clients.
Je souhaite éditer certaines d entre elles de date à
datesans passer par l'option requete mais en créant un
formulaire indépendant (avec format date)
mais je ne vois pas comment établir le lien entre
l'état
et mon formulaire
Quid ?
Pouvez vous m'aider
jm
.
.
.
.