Avatar billede solopolo Nybegynder
22. maj 2003 - 12:25 Der er 13 kommentarer og
1 løsning

SendTaster/AngivVærdi, AnvendFilter & SkriveTil

Hej der, Jeg har brug for hjælpe med MS Access 2000. Jeg lavet en database som viser kunde betalings status grupperede per sælger. Jeg plejer at skrive hele rapporten & del den ud blandt sælger. Senere begyndte jeg at lave html filer af rapporten for hver sælger ved hjælpe af ”SkriveTil” handlingen. Men så skal jeg køre databasen for en sælger ad gang og indtast et file navn også. Denne løsning er ok for 10/12 stykke sælgere men ikke for 50 sælgere.
Jeg vil gerne lave en macro/module hvor Access henter en sælgerkode fra en tabel ”SÆLGERE” f.eks. ABC og filtrere rapporten til Sælgerkode = ABC og så skriver den til en html file på et bestemt sti med navnet ABC.htm
Kan du hjælpe mig?
På forhånd tak.
SoloPOLO!
Avatar billede solopolo Nybegynder
22. maj 2003 - 12:53 #1
Hello Terri .. here's the question in English for you:
SendKeys/SetValue, ApplyFilter & OutputTo …
I need some help with MS Access 2000. I made a database that shows customers’ payment status grouped per salesperson. I used to print the whole report & distribute report among the salespersons. Then I started to create html files for each salesperson with help of the OutputTo action. But now I’m thinking about making a macro or something else so that Access get a salesperson code (e.g. ABC), one by one, from the table “Salespersons”, then create a report for ABC or simply filter the recently updated report for ABC and then create an html file (ABC.htm) at the specific path. Can it be done? Can you help me?
Thanks in advance.
SoloPOLO!
Avatar billede mugs Novice
22. maj 2003 - 12:57 #2
Lav en formular (form1) og opret et felt med "Sælgerkode". I den forespørgsel der ligger til grund for rapporten, indsætter du et kriterie i feltet "Sælgerkode":

=[Forms]![form1]![Sælgerkode]

Forespørgslen vil nu vise ale sælgere der opfylder kriteriet til særgerkoden, og således også rapporten. Du skal nu åbne rapporten fra form1.
Avatar billede solopolo Nybegynder
22. maj 2003 - 13:49 #3
mugs> Denne method, som du anbifaler, bruger jeg lige nu. Indtaster jeg en sælgerkode i formularen & trykker på et knap, som køre en makro & laver rapporten, og så gemmer jeg rapporten som en html fil. Men jeg vil gerne undgå at indtast sælgerkoder og html fil navne. Disse skal hentes fra en tabel. Dvs. hvis der er 50 sælgerkoder findes i tabelen, så skal der dannes 50 html filer som <sælgerkode>.htm. Hvordan gøre jeg det?
Avatar billede mugs Novice
22. maj 2003 - 16:08 #4
Så har jeg misforstået dig lidt. Nedentående kode gennemløber alle poster i "Tabel1", og udskriver rapporten "Rapport1" for hver post i tabellen. Udskift navnet "Tabel1" med navnet på din tabel med sælgere. I denne tabel skal du have et numerisk felt for hver sælger.

Dim MaxUd, K
DoCmd.OpenForm "Formular2"
MaxUd = DMax("[Tæller]", "Tabel1")
For K = 1 To MaxUd
DoCmd.OpenReport "Rapport1", acViewNormal, "", "[Forms]![Formular2]![Tæller]=Tæller", acNormal
DoCmd.Close acReport, "Rapport1"
DoCmd.GoToRecord acForm, "Formular2", acNext, 1
Next K
Avatar billede mugs Novice
22. maj 2003 - 16:09 #5
solopolo > Kan sende dig en db med et eksempel. Blot læg din e-mail.
Avatar billede solopolo Nybegynder
22. maj 2003 - 16:26 #6
mugs > Tak for svaret. Du må gerne sende db til tariq@shah.dk mens jeg prøver de koder du skrev.
Avatar billede mugs Novice
22. maj 2003 - 16:31 #7
Sendt.
Avatar billede henrik13 Nybegynder
22. maj 2003 - 16:36 #8
Den vil jeg gerne se:
oz1bua@wanadoo.dk
;o)
Avatar billede mugs Novice
22. maj 2003 - 16:37 #9
Henrik > Du fik den iaftes. db52.
Avatar billede henrik13 Nybegynder
22. maj 2003 - 16:40 #10
Ok Jeg har ikke fået gennemgået dem alle,  ;o))
Avatar billede solopolo Nybegynder
23. maj 2003 - 11:28 #11
mugs > De ovenstående kode virkede ikke i db52 (Compile error). Men da jeg slettet "acNormal" fra <DoCmd.OpenReport "Rapport1", acViewNormal, "", "[Forms]![Formular2]![Tæller]=Tæller", acNormal> så virker det fint. Men jeg kan ikke kontrol output type! Disse koder printer alle sider som jeg helste vil ikke. Hvordan kan jeg stop automatiske printning af rapporterne?
Avatar billede solopolo Nybegynder
23. maj 2003 - 12:07 #12
mugs > hi igen .. så har jeg sidste to spørgsmål.
1. Hvordan kan jeg stop automatiske udskrivening af rapporterne?
2. Jeg har tilføjet flg. kode lige efter DoCmd.OpenReport ...
DoCmd.OutputTo acOutputReport, "Rapport1", acFormatRTF, Code & ".rtf", No (hvor variable Code = [Forms]![Formular2]![felt1]). Disse koder opretter .rtf filer automatiske med tekst i felt1 som fil navn, lige som jeg vil have det. Men problemet er bare at alle .rtf filer indholder alle poster, dvs. filter på rapporten "[Forms]![Formular2]![Tæller]=Tæller" virker ikke (men det virker på udskreft). Hvordan kan jeg løse denne problem?
På forhånd mange tak.
Avatar billede solopolo Nybegynder
23. maj 2003 - 12:54 #13
Så problemet er løst ... jeg provet flg. koder og de virker fint ...

DoCmd.OpenReport "Rapport1", acViewPreview, , "[Forms]![Formular2]![Tæller]=Tæller": DoCmd.OutputTo acOutputReport, "Rapport1", acFormatRTF, Code & ".rtf", No

Tak for hjælpen mugs ;-)
Avatar billede mugs Novice
23. maj 2003 - 16:30 #14
Selv tak, og tal for point. Jeg kigger lige på stop af udskrivning.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Dyk ned i databasernes verden på et af vores praksisnære Access-kurser

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester