Smart questions
Smart answers
Smart people
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Member Login

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips now!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!

Join Tek-Tips
*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

LINK TO THIS FORUM!

Add Stickiness To Your Site By Linking To This Professionally Managed Technical Forum.
Just copy and paste the
code below into your site.

Partner With Us!

"Best Of Breed" Forums Add Stickiness To Your Site
Partner Button
(Download This Button Today!)

Feedback

"...I have answered some questions and have gotten answers for my questions. Anywhere you can do this on one page helps tremendously..."

Geography

Where in the world do Tek-Tips members come from?
paullem (Programmer)
13 Apr 12 6:17
Hi, I am trying to duplicate the layout of an existing Excel 2007 spreadsheet in an Access 2007 report. The spreadsheet contains  Data Bars which I can find reference to in Access 2010 reporting but not in Access 2007. Have I just missed it or are they only available in Access 2010? If this is the case does anyone know how to duplicate the same facility in Access 2007 reporting. I think the other option will be to export the data into a template of the spreadsheet but I am not sure how to go about doing this?

Many thanks for any help/suggestions.
dhookom (Programmer)
13 Apr 12 15:03
This somewhat depends on what exactly you mean by "data bars". If you want a filled rectangle with a length based on a numeric value, you could try something like:
1) name the text box bound to the value "txtTheValue"
2) add a text box to the Report Header section with a control source of
 =Max([YourValueField])
3) add a rectangle to your detail section and name it "DataBar"
4) add code like:

CODE

Private Sub Detail_Format(Cancel As Integer, FormatCount As Integer)
    Dim dblMaxLength As Double
    dblMaxLength = 2880 '2 inches
    Me.DataBar.Width = (Me.txtTheValue / Me.txtMaxValue) * dblMaxLength
End Sub

Duane
Hook'D on Access
MS Access MVP

paullem (Programmer)
13 Apr 12 15:22
Thanks for that suggestion, I'll give it a try.

 

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members!

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close