[AccessD] Gantt chart in Access

The advantage of using Courier New is that it is a standard Windows font.  You don't need to 
worry about installing extra fonts on every machine that will use application.

-- 
Stuart 

On 8 Feb 2010 at 20:48, William Hindman wrote:

> http://www.mvps.org/access/forms/frm0055.htm has a much better font for this 
> than Courier New
> 
> ...but I will certainly give your code a spin ...thanks :)
> 
> William
> 
> --------------------------------------------------
> From: "Stuart McLachlan" <stuart at lexacorp.com.pg>
> Sent: Monday, February 08, 2010 5:09 PM
> To: "Access Developers discussion and problem solving" 
> <accessd at databaseadvisors.com>
> Subject: Re: [AccessD] Gantt chart in Access
> 
> > Of course! <slaps self on forehead>
> >
> > Just use a block character with a fixed width font in a text string:
> >
> > Create a stack of text boxes each of which runs across the full form.
> > Set the font to Courier New (a fixed width, unicode font).
> > Set the font colours of the textboxes to different values if you want 
> > different coloured lines.
> >
> > Create the following function.
> >
> > Function Plot(startpos As Long, endpos As Long) As String
> >  If Nz(startpos) < 1 Then Exit Function
> >  If Nz(endpos) < 1 Then Exit Function
> >  If endpos < startpos Then Exit Function
> >  Plot = IIf(startpos > 1, Space$(startpos - 1), "") & String$(endpos - 
> > startpos + 1,
> > ChrW(&H2588))
> > End Function
> >
> > To display a line running from Day 3 to Day 5 in the first row:
> >  txtLine1 = Plot(3,5)
> >
> > You can also use the shaded unicode characters
> > &H2591 - &H2593 to get more variety.
> >
> > -- 
> > Stuart
> >
> >
> > On 8 Feb 2010 at 14:04, Susan Harkins wrote:
> >
> >> William, I am so sorry... years ago I wrote about this in Inside 
> >> Microsoft
> >> Access. Those old issues are packed up in my daughter's basement and 
> >> they're
> >> not online, as far as I know. I did a google search, just in case. :(
> >>
> >> AIR...it was an extremely simple formula using Chr() -- I just don't
> >> remember how I repeated that function that appropriate number of times. 
> >> It
> >> was... as you and JC would put it... dead simple.
> >>
> >> If anyone has access to those old issues of IMA, maybe they might look it
> >> up -- would've been pre 1998.
> >>
> >> Susan H.
> >>
> >>
> >> > Charlotte
> >> >
> >> > ...that remains an option but I generally don't like embedded reports 
> >> > in
> >> > runtime installs ...not just the appearance of them but they're fragile 
> >> > as
> >> > well ime ...but I'm not dismissing it if I can't come up with a form
> >> > approach that works.
> >> >
> >> > William
> >>
> >> -- 
> >> AccessD mailing list
> >> AccessD at databaseadvisors.com
> >> http://databaseadvisors.com/mailman/listinfo/accessd
> >> Website: http://www.databaseadvisors.com
> >
> >
> > -- 
> > AccessD mailing list
> > AccessD at databaseadvisors.com
> > http://databaseadvisors.com/mailman/listinfo/accessd
> > Website: http://www.databaseadvisors.com
> > 
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com