Avatar billede amiedk Nybegynder
22. august 2003 - 15:09 Der er 13 kommentarer og
3 løsninger

Grafer med kriterie

Hejsa

Har et lidt mærkeligt spørgsmål. Ved ikke lige om det overhoved kan lade sig gøre, men håber det.

Jeg har min kunde/medarbejder database. Og skal have lavet en graf, hvor den har et kriterie hvor man indtaster ugen, og den så laver grafen kun ud fra den uge. Virker helt fint og alt er perfekt. Jeg kunne dog godt tænke mig at have det ugenr man har indtasted i toppen af siden, så man kan se hvad for en uge grafen er ud fra. Om det er i Sidehoved eller detaljesektionen er helt ligemeget, bare det virker, så kan jeg indordne min side efter det.

Hvis jeg laver guiden diagram, når jeg laver rapporten, så har den jo ikke forspørgelsen med, så jeg kan hive den ind automatisk. Men hvis jeg laver en tekstboks og skriver =[Forspørgelse - Graf - uge]!FindUge i kontrolelementkilde, så skriver den #navn? som resultat af den tekstboks.

Hvis jeg laver rapporten enten som designvisning eller guiden rapport, så går det helt galt, når jeg derefter laver en graf. Så laver den utrolig mange tomme sider og der er intet der hænger sammen.

Jeg tror selv på at det er den første løsning med en teksboks, som kan få den til det, men jeg ved bare ikke lige hvad jeg så skal skrive i min kontrolelementkilde. Nogen der har nogle ide'er ??

Sommerhilsner og god weekend
Malene
Avatar billede hekla Nybegynder
22. august 2003 - 15:21 #1
Prøv at skrive kontrolelementkilden som:
=[minforespørgsel]![Mitfelt]
Avatar billede amiedk Nybegynder
22. august 2003 - 15:41 #2
ja det er det den jeg har brugt men det virker ikke. Den skriver #navn?
Avatar billede nih Novice
22. august 2003 - 23:37 #3
Du kan angive en overskrift direkte i diagrammet.

dim o As Graph.Chart
set o me.navnetPåDinGraf
o.HasTitle = True
o.ChartTitle.Text = dlookup("[mitFelt],"minForesp","Id = " & etEllerAndet)

Niels
Avatar billede nih Novice
22. august 2003 - 23:49 #4
Der er noget med en refresh af objektet der fejler - Prøv istedet denne her:

Private Sub Kommandoknap15_Click()
On Error GoTo ehandler
    Dim obj As Graph.Chart
    Set obj = navnetPåDinGraf.Object
 
    obj.HasTitle = True
    obj.ChartTitle.Text = "dds"

ehandler:
    If Err.Number = 1004 Then
        obj.Refresh
    End If
End Sub
Avatar billede fynbohans Nybegynder
24. august 2003 - 18:40 #5
Prøv
= Query![Forspørgelse - Graf - uge]![FindUge]
Avatar billede amiedk Nybegynder
25. august 2003 - 09:29 #6
nih- Jeg kan ikke få hverken den ene eller de anden kode til at virke her. Jeg har ikke lavet en diagramrapport, men en tom rapprt hvor jeg har lavet diagramet i. Ved det lyder som det samme, men det er faktisk to forskellige ting. Ved et diagramrapport, har man ikke adgang til forspørgelsen.

fynbohans - det virker heller ikke
Avatar billede amiedk Nybegynder
25. august 2003 - 10:59 #7
Nu har jeg prøvet at lave en diagram rapport og sat denne kode ind

rivate Sub Report_Open(Cancel As Integer)
On Error GoTo ehandler
    Dim obj As Graph.Chart
    Set obj = OLE - ubundet0.Object
 
    obj.HasTitle = True
    obj.ChartTitle.Text = "dds"
ehandler:
    If Err.Number = 1004 Then
        obj.Refresh
    End If
End Sub

Den laver fejl i: Dim obj As Graph.Chart
Kan man sætte "dds" til at være feltet [finduge] fra forspørgelsen ??
Avatar billede fynbohans Nybegynder
25. august 2003 - 12:22 #8
Det anede mig. Kan der ikke laves et felt i formularen som viser grafen, som
du kan henvise til? Evt.et skjult felt.
Avatar billede amiedk Nybegynder
25. august 2003 - 13:18 #9
jeg har snart prøvet alt. Grafen virker helt fint også med indtastning af ugenr, så den kun viser resultater for den enkelte uge. Det er bare det at få lavet et sted hvor det ugenr står anført, så man kan se hvilken uge grafen er for. Det lyder helt vildt simpelt, men den fatter bare hat af det. Møj
Avatar billede fynbohans Nybegynder
25. august 2003 - 14:27 #10
Har selv lavet noget tilsvarende for ca.et år siden, hvor grafen vælges fra
2 forskellige lister. Der var ingen problemer i det, men projektet var måske en lidt andet dit.
Hvis du lod folk vælge ugenr. i en formular, er det ikke noget problem
at få ugen vist i rapporten med Forms![Formularnavn]![Feltnavn].
Avatar billede nih Novice
25. august 2003 - 20:58 #11
Jeg kan desværre ikke få koden til at virke på en rapport - den fungere i en formular.

Ellers burde du kunne bruge en textbox (som andre har foreslået)

Niels
Avatar billede amiedk Nybegynder
26. august 2003 - 10:35 #12
fynbohans - hvad skulle forskellen være fra at vælge ugenr i en formular og indtaste ugenr i et kritere i forspørgelsen. Det er jo det samme den gør. Jeg prøver lige at teste alligevel, man kan jo være heldig :)

nih - Jeg har også rodet med den textbox men jeg kan ikke få den til at gøre det. Den bliver ved med at skrive #navn? lige meget hvad jeg prøver at sætte ind i koden.
Avatar billede mugs Novice
26. august 2003 - 10:51 #13
Hvis tekstboksen med ugenr ligger på formularen, kan du indsætte en ubundet teksboks på din rapport med flg. kilde:

=[Forms]![formularnavn]![ugenr]

Du skal så åbne rapporten fra formularen.
Avatar billede amiedk Nybegynder
26. august 2003 - 11:49 #14
mugs.. har jeg lige prøvet, det virker heller ikke.. samme resultat ...

er det ikke noget med at når den skriver #navn? så er det en anden fejl.. ikke kodefejl, men en overordnet fejl som overgår alt det andet.. syntaks eller feldt tings fejl.. kan ikke lige forklare det. Synes bare jeg har prøvet så mange forskellige ting nu og det er hele tiden den samme fejl.
Avatar billede amiedk Nybegynder
26. august 2003 - 12:07 #15
Så fik jeg det til at virke. Total mystisk. Hvis jeg skriver =Forms![Rapport Side]!Tekst49 i min kontrolelement, så virker det ikke, men hvis jeg går ind og laver helt samme kode igennem udtrykdsgeneratoren, så virker det.

Mystisk.. men det virker så det er jo fint :)

Jeg ved ikke hvem af jer der fik det til at virke, så jeg har delt alle point mellem jer.

Sommerhilsner
Malene
Avatar billede mugs Novice
26. august 2003 - 16:23 #16
Når du selv skriver det virker det ikke:

=Forms![Rapport Side]!Tekst49

Men når du bruger udtryksgeneratoren virker det. Jeg vil vædde på, at udtryksgeneratoren skriver:

=[Forms]![Rapport Side]![Tekst49]
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