Hi,
I am not sure if I understand your question, but it seems like you want to have a "recap" of all the offices selected appear in the report footer. Is this correct? If so, this should be quite easy.
1) In the report General Declarations section, add a string datatype to keep the offices found:
Dim strOfficeList as string
Dim intCount as integer 'format first office
2) In report open event, initialize intCount to 0
3) In the detail section, enter this code into the OnFormat event:
' this code will check intCount. If it is the 1st
' record, then place the office name into strOfficeList
' THEREAFTER, add formatting
If intCount = 0 Then
strOfficeList = txtOffice
intCount = 1
else
strOfficeList = strOfficeList & ", " & txtOffice
End If
4) Add a text box (perhaps called "txtOffices"???) to the report footer (to display office names). In your OnFormat event for the report footer, add this code:
txtOffices = strOfficeList
Make sense?
HTH, ![[pc2] [pc2] [pc2]](/data/assets/smilies/pc2.gif)
Randy Smith
California Teachers Association