IN THE SPOTLIGHT: MDE to MDB Conversion Service
(also supports: ACCDE to ACCDB, ADE to ADP, etc)
IN THE SPOTLIGHT: vbWatchdog
VBA error handling just got easier...
" vbWatchdog is off the chart. It solves a long standing problem of how to consolidate error handling into one global location and avoid repetitious code within applications. "
- Joe Anderson,
Microsoft Access MVP
Meet Shady, the vbWatchdog mascot watching over your VBA code →
(courtesy of Crystal Long, Microsoft Access MVP)
IN THE SPOTLIGHT: vbMAPI
An Outlook / MAPI code library for VBA, .NET and C# projects
Get emails out to your customers reliably, and without hassle, every single time.
Use vbMAPI alongside Microsoft Outlook to add professional emailing capabilities to your projects.
Posted 22-Jan-96 by Allen and LeAnne Jergensen, firstname.lastname@example.org.
To get a snaking column header above each column but only if the column has data in it do the following:
Say you have two fields in the snaking column in the detail section of your report. ITEM and CARRYING.
Can grow: Yes Visible: Yes Height: 0.0007 in.
Sub Detail1_Format (Cancel As Integer, FormatCount As Integer) If Me.left <> dLastLeft Then Me![ITEM HEADER] = "Item" Me![CARRYING HEADER] = "Carrying" dLastLeft = Me.left sItem = Me![ITEM] Else If sItem = Me![ITEM] Then Me![ITEM HEADER] = "Item" Me![CARRYING HEADER] = "Carrying" Else Me![ITEM HEADER] = "" Me![CARRYING HEADER] = "" End If End If End Sub
Global dLastLeft As DoubleGlobal, sItem As String
Now when you print the report if only one column of the snaking report exist you will only get one heading. But if two exist, you will get two headings.
From: Allen and LeAnne Jergensen (programmers who hate to give up!!)
|Home||Index of tips||Top|
This is a cached tutorial, reproduced with permission.
Have your say - comment on this article.
What did you think of 'Reports: Snaking Column Headers'?
No comments yet.
Why not be the first to comment on this article?!
Have your say...