[VBA & Access] Labels maken afhankelijk van recordset

[Verwijderd]

Hallo,

Ik ben hier al een tijdje mee bezig en ik kom er echt niet uit.

Wat ik wil is afhankelijk van van te voren geselecteerde velden, deze velden op een report zetten.

Nu wil ik op het "open" event van dat report dus de recordset ophalen en voor iedere recordset een label maken met de omschrijving en een textbox (of label)
maken met de waarde die hoort bij die omschrijving.

bijvoorbeeld:

code:

for i = 1 to objRs.recordcount
 'maak label
 label.caption = omschrijving
 'maak label
 label.caption = waarde 
 ' met natuurlijk de juiste plaatsing
next i

resulteerd bijvoorbeeld in:
omschrijving blaat

nu lukt het ophalen van de recordset wel, alleen het creeeren van de labels lukt me maar niet.

kan iemand me helpen?

[Witte]

Huh? Wat wil je bereiken, ik begrijp er werkelijk geen iota van...

Overigens is het vrij tricky om een raport te baseren op gegevens die bij openen van dat raport worden gecreeerd. Als je bijvoorbeeld opmaak (zoals een grijsvlak of niet) laat afhangen van gegevens, dan wil Access zich daar wel eens in verslikken.

[ Voor 66% gewijzigd door Witte op 26-08-2004 00:45 ]

[TheXception]

Net als Witte begrijp ik ook niet helemaal wat je bedoelt.
Maar ik denk dat je veldnamen, afhankelijk van je recordset wilt hernoemen in je rapport.
_{verbeter me als ik 't verkeerd zeg}

Voor een rapport heb ik daar geen ervaring mee, maar ik heb dezelfde grap wel uitgehaald met Forms.
Afhankelijk van de gebruikersgroep verandert de formnaam en één of meer velden.
Ik heb dit in een Public Function gedaan.
Ziet er ongeveer zo uit:

code:

Public Function AutorisatieGroepA()
    Dim stDocName As String
    Dim stLinkCriteria As String
    stDocName = "BASISFORMNAAM"
    
    DoCmd.OpenForm stDocName, , , stLinkCriteria
   
    [Form_FORMNAAM].RecordSource = "QryQUERYNAAM" 'verandert bij openen van
    het form via schakelbord de recordsource.
    [Form_FORMNAAM].Caption = "HIER CAPTION VAN HET FORM"
    [Form_FORMNAAM]!VELDNAAM.Caption = "HIER CAPTION VAN HET VELD"
    
End Function

Deze is dan voor GroepA en dezelfde code is er dan ook voor GroepB etc. Maar dan met andere formnaam en veldnamen.

Mogelijk kun je ook zoiets doen voor je rapport?
Als dit niet is wat je bedoelt, dan raad ik je aan om het probleem iets duidelijker te omschrijven.

[Verwijderd]

Uhm goed even een andere manier om te beschrijven wat ik nu precies wil

Een bepaalde klant geeft aan welke gegevens op een report geplaatst moeten worden.

keuzes:
keuze 1, keuze 2, keuze 3.

en de klant wil alleen keuze 2 en keuze 3 op het form zien.

Dus wordt uit de database een recordset opgehaald waarin keuze1, 2,3 staan.

Maar aangezien ik ze niet alle 3 erop wil hebben en toch mooi uitgelijnd wil ik labels maken aan de hand van die recordset. (ik wil dus met code labels op het report maken)

dat zal er ongeveer zo uitzien.

code:

caption = objRs.fields("veldnaam")


'Maak een label (het gedeelte wat ik dus niet weet)

top = top + oudetop
With "gemaaktelabel".Caption = caption
.top = top

Nu heb ik dus als alles lukt doormiddel van code een label op het form aangemaakt. met een caption en een top property.

Hopelijk is het nu iets duidelijker

[Boss]

Lijkt erop dat je een custom rapport builder wil maken. Dat moet wel te doen zijn, maar is erg lastig in Access. Formulieren kan je nog aardig rommelen met custom maken van tekstvelden, rapporten zijn daar een stuk lastiger in.

- Kan je de klant niet uitleggen hoe hij zelf een rapport kan maken?
- Kan je voor alle mogelijke situaties een rapport maken, of zijn er te veel mogelijkheden?