[AccessD] Gantt chart in Access

Stuart McLachlan stuart at lexacorp.com.pg
Mon Feb 8 16:09:40 CST 2010


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





More information about the AccessD mailing list