From accessd at shaw.ca  Wed Jun  1 00:36:42 2016
From: accessd at shaw.ca (Jim Lawrence)
Date: Tue, 31 May 2016 23:36:42 -0600 (MDT)
Subject: [AccessD] Help with an Access web app -- finding records
 without matching related records
In-Reply-To: <CAEPJO1h2gENb0oGHpk3OMbNG+CW+cRD_nYOQGyw=y91OEGcEqw@mail.gmail.com>
Message-ID: <1667140305.41068381.1464759402320.JavaMail.root@shaw.ca>

Program users have advanced over the years. They have, in many cases found themselves stuck with expensive software and no company to support it...whether the hosting company is demanding the client upgrade or the host company has just disappears. 

I would bore you with a full list of how many software companies, especially database manufactures that have gone broke. Here is a few names just for interest; DBase, Revelations, SuperBase, Clipper, FoxBase, Smartware, Clarion, Angoss and so and so on and so on...and even MS Access is leaving by the side entrance. Any business who has been around for the last twenty or so years has seem all these wonderful database applications crash and burn and often as not have had to buy yet another database product and re-tool their entire company.  

Business have finally had enough. They don't want to pay anymore for some company who will, even with the best intentions, leave them holding the bag, yet once again. The most dangerous packages, in the market today are proprietary niche software. Most big companies avoid that type of software like the plague. The most educated companies are looking for good host companies who as well as are making an excellent product also open source their code. Companies feel much safer just paying monthly service fees and knowing ultimately, they will have a backup in case disaster strikes. A prime example is RedHat/Connical (service companies) and along with Postgress, MongoDB, Neo and ElasticStretch(sp?).

Application development companies who initially shunned this approach have realized that by open sourcing their products they have quickly acquired a large user base, third party code testing, third party help, a very loyal following, product adoption from companies who would never give them a second look and have enjoyed a very steady profit stream from monthly/yearly service fees. 

The era when a company made a proprietary application, marketed it and then supported it between version development cycles and if positioned correctly, made massive profits...are gone. That train has left the station and it is never coming back. Even Microsoft understand it and they were one of the last bastions of proprietary locked-down software.

Alpha Anywhere sounds like a wonderful product and definitely worth investigating. But it is old-school and if I was still in the business, selling a company on a database's quality from a small niche supplier, in this day and age would be n?e impossible.  Businesses want to hear source companies are large, well established and/or their application are OS. 

Jim
       
----- Original Message -----
From: "Arthur Fuller" <fuller.artful at gmail.com>
To: "Access Developers discussion and problem solving" <accessd at databaseadvisors.com>
Sent: Tuesday, May 31, 2016 7:31:19 AM
Subject: Re: [AccessD] Help with an Access web app -- finding records without matching related records

Jim Dettman's words are worth additional emphasis. There is no such beast
as an Access app for the web. Period. As I've stated before, the fastest
route from A(ccess) to B (web) is Alpha Anywhere. No other product even
vaguely compares. Write once, deploy anywhere -- smart phone, tablet,
traditional browser -- no changes, no code to detect the platform, none of
that. It's all handled for you.

Arthur

?
-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From newsgrps at dalyn.co.nz  Sun Jun  5 18:26:56 2016
From: newsgrps at dalyn.co.nz (David Emerson)
Date: Mon, 6 Jun 2016 11:26:56 +1200
Subject: [AccessD] Selecting Filtered records in Datasheet
Message-ID: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>

Hi Listers,

I have a form that is displayed in Datasheet view.  The records can be
filtered using the built in filtering menus.

I want to be able to identify the records that are showing so that I can
update a field (specifically setting a yes/no field to true).  Is there a
property or method that will let me know which records are left when
filtering is applied on a datasheet?

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand





From stuart at lexacorp.com.pg  Sun Jun  5 18:46:13 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Mon, 06 Jun 2016 09:46:13 +1000
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>
Message-ID: <5754B9C5.16541.3477687@stuart.lexacorp.com.pg>

Not as far as I know,  but I've done a similar thing before by just stepping through  the filtered 
recordset and setting each one in turn.  I'll see if I can dig up an example.



On 6 Jun 2016 at 11:26, David Emerson wrote:

> Hi Listers,
> 
> I have a form that is displayed in Datasheet view.  The records can be
> filtered using the built in filtering menus.
> 
> I want to be able to identify the records that are showing so that I
> can update a field (specifically setting a yes/no field to true).  Is
> there a property or method that will let me know which records are
> left when filtering is applied on a datasheet?
> 
> Regards
> 
> David Emerson
> Dalyn Software Ltd
> Wellington, New Zealand
> 
> 
> 
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 



From rockysmolin at bchacc.com  Sun Jun  5 19:30:41 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sun, 5 Jun 2016 17:30:41 -0700
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>
Message-ID: <E40C245E2C9F4CAB9EE8AA722EA1C5D7@HAL9007>

I'd open a recordset (DAO) using the same select criteria as your filter.
And set all the records' yes/no to True.

Actually, even better, how about an Update Query on the table WHERE (use
your current filtering criteria) updating the yes/no field.  Then a requery
to update the records on the form.

r


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
David Emerson
Sent: Sunday, June 05, 2016 4:27 PM
To: 'Access Developers discussion and problem solving'
Subject: [AccessD] Selecting Filtered records in Datasheet

Hi Listers,

I have a form that is displayed in Datasheet view.  The records can be
filtered using the built in filtering menus.

I want to be able to identify the records that are showing so that I can
update a field (specifically setting a yes/no field to true).  Is there a
property or method that will let me know which records are left when
filtering is applied on a datasheet?

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand




--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From newsgrps at dalyn.co.nz  Sun Jun  5 19:45:18 2016
From: newsgrps at dalyn.co.nz (David Emerson)
Date: Mon, 6 Jun 2016 12:45:18 +1200
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <5754B9C5.16541.3477687@stuart.lexacorp.com.pg>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>
	<5754B9C5.16541.3477687@stuart.lexacorp.com.pg>
Message-ID: <001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>

Thanks Stuart and Rocky,

The problem is that I am not in control of the filter.  It depends on how
the user filters the records using the Access functionality.  

Currently I do what Stuart is suggesting but this sets all records in the
forms recordset, not just the ones that are left after the user has applied
their filters.

I was hoping that Access stored the filter somewhere so that I could get it
and apply it to the base records.

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Monday, 6 June 2016 11:46 a.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Not as far as I know,  but I've done a similar thing before by just stepping
through  the filtered recordset and setting each one in turn.  I'll see if I
can dig up an example.



On 6 Jun 2016 at 11:26, David Emerson wrote:

> Hi Listers,
> 
> I have a form that is displayed in Datasheet view.  The records can be
> filtered using the built in filtering menus.
> 
> I want to be able to identify the records that are showing so that I
> can update a field (specifically setting a yes/no field to true).  Is
> there a property or method that will let me know which records are
> left when filtering is applied on a datasheet?
> 
> Regards
> 
> David Emerson
> Dalyn Software Ltd
> Wellington, New Zealand
> 
> 
> 
> 
> -- 
> 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



From rockysmolin at bchacc.com  Sun Jun  5 19:50:18 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sun, 5 Jun 2016 17:50:18 -0700
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz><5754B9C5.16541.3477687@stuart.lexacorp.com.pg>
	<001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>
Message-ID: <40C3AC0819B14E298A0ABB2E5605C3DA@HAL9007>

can you convert it to a bound form and give them filtering options on the
form footer?

r 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
David Emerson
Sent: Sunday, June 05, 2016 5:45 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Thanks Stuart and Rocky,

The problem is that I am not in control of the filter.  It depends on how
the user filters the records using the Access functionality.  

Currently I do what Stuart is suggesting but this sets all records in the
forms recordset, not just the ones that are left after the user has applied
their filters.

I was hoping that Access stored the filter somewhere so that I could get it
and apply it to the base records.

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Monday, 6 June 2016 11:46 a.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Not as far as I know,  but I've done a similar thing before by just stepping
through  the filtered recordset and setting each one in turn.  I'll see if I
can dig up an example.



On 6 Jun 2016 at 11:26, David Emerson wrote:

> Hi Listers,
> 
> I have a form that is displayed in Datasheet view.  The records can be 
> filtered using the built in filtering menus.
> 
> I want to be able to identify the records that are showing so that I 
> can update a field (specifically setting a yes/no field to true).  Is 
> there a property or method that will let me know which records are 
> left when filtering is applied on a datasheet?
> 
> Regards
> 
> David Emerson
> Dalyn Software Ltd
> Wellington, New Zealand
> 
> 
> 
> 
> --
> 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


From newsgrps at dalyn.co.nz  Sun Jun  5 19:56:26 2016
From: newsgrps at dalyn.co.nz (David Emerson)
Date: Mon, 6 Jun 2016 12:56:26 +1200
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <40C3AC0819B14E298A0ABB2E5605C3DA@HAL9007>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz><5754B9C5.16541.3477687@stuart.lexacorp.com.pg>	<001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>
	<40C3AC0819B14E298A0ABB2E5605C3DA@HAL9007>
Message-ID: <001d01d1bf8e$413923a0$c3ab6ae0$@dalyn.co.nz>

There are over 50 fields (it is design specifications).  They also want
multiple filtering on each field.  Not keen to set up that many list boxes
:(

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Rocky Smolin
Sent: Monday, 6 June 2016 12:50 p.m.
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

can you convert it to a bound form and give them filtering options on the
form footer?

r 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
David Emerson
Sent: Sunday, June 05, 2016 5:45 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Thanks Stuart and Rocky,

The problem is that I am not in control of the filter.  It depends on how
the user filters the records using the Access functionality.  

Currently I do what Stuart is suggesting but this sets all records in the
forms recordset, not just the ones that are left after the user has applied
their filters.

I was hoping that Access stored the filter somewhere so that I could get it
and apply it to the base records.

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Monday, 6 June 2016 11:46 a.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Not as far as I know,  but I've done a similar thing before by just stepping
through  the filtered recordset and setting each one in turn.  I'll see if I
can dig up an example.



On 6 Jun 2016 at 11:26, David Emerson wrote:

> Hi Listers,
> 
> I have a form that is displayed in Datasheet view.  The records can be 
> filtered using the built in filtering menus.
> 
> I want to be able to identify the records that are showing so that I 
> can update a field (specifically setting a yes/no field to true).  Is 
> there a property or method that will let me know which records are 
> left when filtering is applied on a datasheet?
> 
> Regards
> 
> David Emerson
> Dalyn Software Ltd
> Wellington, New Zealand
> 
> 
> 
> 
> --
> 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

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com



From rockysmolin at bchacc.com  Sun Jun  5 19:57:14 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sun, 5 Jun 2016 17:57:14 -0700
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz><5754B9C5.16541.3477687@stuart.lexacorp.com.pg>
	<001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>
Message-ID: <1F72192BA2224AE78B735D513F5C2626@HAL9007>

David:

I just made a quick datasheet form and in the ApplyFilter event put MsgBox
Me.Filter and it displayed the filtering that I selected on the form.  So
that may give you access to the filters that the user has selected.

Just save that filter in a string every time they change the filtering and
the ApplyFilter event is triggered.

Will that work?

I hope so because I'm going to get a shot of bourbon now and start dinner.
:)

r
 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
David Emerson
Sent: Sunday, June 05, 2016 5:45 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Thanks Stuart and Rocky,

The problem is that I am not in control of the filter.  It depends on how
the user filters the records using the Access functionality.  

Currently I do what Stuart is suggesting but this sets all records in the
forms recordset, not just the ones that are left after the user has applied
their filters.

I was hoping that Access stored the filter somewhere so that I could get it
and apply it to the base records.

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Monday, 6 June 2016 11:46 a.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Not as far as I know,  but I've done a similar thing before by just stepping
through  the filtered recordset and setting each one in turn.  I'll see if I
can dig up an example.



On 6 Jun 2016 at 11:26, David Emerson wrote:

> Hi Listers,
> 
> I have a form that is displayed in Datasheet view.  The records can be 
> filtered using the built in filtering menus.
> 
> I want to be able to identify the records that are showing so that I 
> can update a field (specifically setting a yes/no field to true).  Is 
> there a property or method that will let me know which records are 
> left when filtering is applied on a datasheet?
> 
> Regards
> 
> David Emerson
> Dalyn Software Ltd
> Wellington, New Zealand
> 
> 
> 
> 
> --
> 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


From stuart at lexacorp.com.pg  Sun Jun  5 21:06:30 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Mon, 06 Jun 2016 12:06:30 +1000
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <5754B9C5.16541.3477687@stuart.lexacorp.com.pg>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>,
	<5754B9C5.16541.3477687@stuart.lexacorp.com.pg>
Message-ID: <5754DAA6.24829.3C7E5B0@stuart.lexacorp.com.pg>

Couldn't find an old example, so I just knocked this up.  It does what you want - just updates 
the currently displayed records.

Private Sub Command8_Click()
Dim rs As DAO.Recordset
Set rs = Me.RecordsetClone
rs.MoveFirst
While Not rs.EOF
   rs.Edit
   rs!chk = True
   rs.Update
    rs.MoveNext
Wend

End Sub


On 6 Jun 2016 at 9:46, Stuart McLachlan wrote:

> Not as far as I know,  but I've done a similar thing before by just
> stepping through  the filtered recordset and setting each one in turn.
>  I'll see if I can dig up an example.
> 
> 
> 
> On 6 Jun 2016 at 11:26, David Emerson wrote:
> 
> > Hi Listers,
> > 
> > I have a form that is displayed in Datasheet view.  The records can
> > be filtered using the built in filtering menus.
> > 
> > I want to be able to identify the records that are showing so that I
> > can update a field (specifically setting a yes/no field to true). 
> > Is there a property or method that will let me know which records
> > are left when filtering is applied on a datasheet?
> > 
> > Regards
> > 
> > David Emerson
> > Dalyn Software Ltd
> > Wellington, New Zealand
> > 
> > 
> > 
> > 
> > -- 
> > 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
> 



From stuart at lexacorp.com.pg  Sun Jun  5 21:42:23 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Mon, 06 Jun 2016 12:42:23 +1000
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <5754DAA6.24829.3C7E5B0@stuart.lexacorp.com.pg>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>,
	<5754B9C5.16541.3477687@stuart.lexacorp.com.pg>,
	<5754DAA6.24829.3C7E5B0@stuart.lexacorp.com.pg>
Message-ID: <5754E30F.12048.3E8BFD9@stuart.lexacorp.com.pg>

The key to this is the last sentence of the Help entry fro RecordsetClone:

The RecordsetClone property setting is a copy of the underlying query or table 
specified by the form's RecordSource property. If a form is based on a query, for 
example, referring to the RecordsetClone property is the equivalent of cloning a 
Recordset object by using the same query. If you then apply a filter to the form, the 
Recordset object reflects the filtering.

-- 
Stuart

On 6 Jun 2016 at 12:06, Stuart McLachlan wrote:

> Couldn't find an old example, so I just knocked this up.  It does what
> you want - just updates the currently displayed records.
> 
> Private Sub Command8_Click()
> Dim rs As DAO.Recordset
> Set rs = Me.RecordsetClone
> rs.MoveFirst
> While Not rs.EOF
>    rs.Edit
>    rs!chk = True
>    rs.Update
>     rs.MoveNext
> Wend
> 
> End Sub
> 
> 
> On 6 Jun 2016 at 9:46, Stuart McLachlan wrote:
> 
> > Not as far as I know,  but I've done a similar thing before by just
> > stepping through  the filtered recordset and setting each one in
> > turn.
> >  I'll see if I can dig up an example.
> > 
> > 
> > 
> > On 6 Jun 2016 at 11:26, David Emerson wrote:
> > 
> > > Hi Listers,
> > > 
> > > I have a form that is displayed in Datasheet view.  The records
> > > can be filtered using the built in filtering menus.
> > > 
> > > I want to be able to identify the records that are showing so that
> > > I can update a field (specifically setting a yes/no field to
> > > true). Is there a property or method that will let me know which
> > > records are left when filtering is applied on a datasheet?
> > > 
> > > Regards
> > > 
> > > David Emerson
> > > Dalyn Software Ltd
> > > Wellington, New Zealand
> > > 
> > > 
> > > 
> > > 
> > > -- 
> > > 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
> 



From newsgrps at dalyn.co.nz  Sun Jun  5 22:30:52 2016
From: newsgrps at dalyn.co.nz (David Emerson)
Date: Mon, 6 Jun 2016 15:30:52 +1200
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <1F72192BA2224AE78B735D513F5C2626@HAL9007>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz><5754B9C5.16541.3477687@stuart.lexacorp.com.pg>	<001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>
	<1F72192BA2224AE78B735D513F5C2626@HAL9007>
Message-ID: <001e01d1bfa3$d4563910$7d02ab30$@dalyn.co.nz>

Thanks Rocky,  That may hold the answer.

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Rocky Smolin
Sent: Monday, 6 June 2016 12:57 p.m.
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

David:

I just made a quick datasheet form and in the ApplyFilter event put MsgBox
Me.Filter and it displayed the filtering that I selected on the form.  So
that may give you access to the filters that the user has selected.

Just save that filter in a string every time they change the filtering and
the ApplyFilter event is triggered.

Will that work?

I hope so because I'm going to get a shot of bourbon now and start dinner.
:)

r
 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
David Emerson
Sent: Sunday, June 05, 2016 5:45 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Thanks Stuart and Rocky,

The problem is that I am not in control of the filter.  It depends on how
the user filters the records using the Access functionality.  

Currently I do what Stuart is suggesting but this sets all records in the
forms recordset, not just the ones that are left after the user has applied
their filters.

I was hoping that Access stored the filter somewhere so that I could get it
and apply it to the base records.

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Monday, 6 June 2016 11:46 a.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Not as far as I know,  but I've done a similar thing before by just stepping
through  the filtered recordset and setting each one in turn.  I'll see if I
can dig up an example.



On 6 Jun 2016 at 11:26, David Emerson wrote:

> Hi Listers,
> 
> I have a form that is displayed in Datasheet view.  The records can be 
> filtered using the built in filtering menus.
> 
> I want to be able to identify the records that are showing so that I 
> can update a field (specifically setting a yes/no field to true).  Is 
> there a property or method that will let me know which records are 
> left when filtering is applied on a datasheet?
> 
> Regards
> 
> David Emerson
> Dalyn Software Ltd
> Wellington, New Zealand
> 
> 
> 
> 
> --
> 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

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com



From newsgrps at dalyn.co.nz  Sun Jun  5 22:34:48 2016
From: newsgrps at dalyn.co.nz (David Emerson)
Date: Mon, 6 Jun 2016 15:34:48 +1200
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <5754E30F.12048.3E8BFD9@stuart.lexacorp.com.pg>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>,
	<5754B9C5.16541.3477687@stuart.lexacorp.com.pg>,
	<5754DAA6.24829.3C7E5B0@stuart.lexacorp.com.pg>
	<5754E30F.12048.3E8BFD9@stuart.lexacorp.com.pg>
Message-ID: <002001d1bfa4$60ee5970$22cb0c50$@dalyn.co.nz>

Thanks Stuart,

I was able to use Rocky's suggestion to extract the actual filter.  This
will be useful because the same form prints out reports based on the
selected records - I can add the same filter to the recourdsource queries.

Regards

David

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Monday, 6 June 2016 2:42 p.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

The key to this is the last sentence of the Help entry fro RecordsetClone:

The RecordsetClone property setting is a copy of the underlying query or
table specified by the form's RecordSource property. If a form is based on a
query, for example, referring to the RecordsetClone property is the
equivalent of cloning a Recordset object by using the same query. If you
then apply a filter to the form, the Recordset object reflects the
filtering.

-- 
Stuart

On 6 Jun 2016 at 12:06, Stuart McLachlan wrote:

> Couldn't find an old example, so I just knocked this up.  It does what
> you want - just updates the currently displayed records.
> 
> Private Sub Command8_Click()
> Dim rs As DAO.Recordset
> Set rs = Me.RecordsetClone
> rs.MoveFirst
> While Not rs.EOF
>    rs.Edit
>    rs!chk = True
>    rs.Update
>     rs.MoveNext
> Wend
> 
> End Sub
> 
> 
> On 6 Jun 2016 at 9:46, Stuart McLachlan wrote:
> 
> > Not as far as I know,  but I've done a similar thing before by just
> > stepping through  the filtered recordset and setting each one in
> > turn.
> >  I'll see if I can dig up an example.
> > 
> > 
> > 
> > On 6 Jun 2016 at 11:26, David Emerson wrote:
> > 
> > > Hi Listers,
> > > 
> > > I have a form that is displayed in Datasheet view.  The records
> > > can be filtered using the built in filtering menus.
> > > 
> > > I want to be able to identify the records that are showing so that
> > > I can update a field (specifically setting a yes/no field to
> > > true). Is there a property or method that will let me know which
> > > records are left when filtering is applied on a datasheet?
> > > 
> > > Regards
> > > 
> > > David Emerson
> > > Dalyn Software Ltd
> > > Wellington, New Zealand



From ssharkins at gmail.com  Mon Jun  6 06:41:04 2016
From: ssharkins at gmail.com (Susan Harkins)
Date: Mon, 6 Jun 2016 07:41:04 -0400
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>	<5754B9C5.16541.3477687@stuart.lexacorp.com.pg>
	<001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>
Message-ID: <009701d1bfe8$4f5bcff0$ee136fd0$@gmail.com>

David, I might not understand what you're looking for, but the following
syntax will return the current form's filter value: 

Forms![formname].Form.Filter

Susan H. 

Thanks Stuart and Rocky,

The problem is that I am not in control of the filter.  It depends on how
the user filters the records using the Access functionality.  

Currently I do what Stuart is suggesting but this sets all records in the
forms recordset, not just the ones that are left after the user has applied
their filters.

I was hoping that Access stored the filter somewhere so that I could get it
and apply it to the base records.

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Monday, 6 June 2016 11:46 a.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Not as far as I know,  but I've done a similar thing before by just stepping
through  the filtered recordset and setting each one in turn.  I'll see if I
can dig up an example.



On 6 Jun 2016 at 11:26, David Emerson wrote:

> Hi Listers,
> 
> I have a form that is displayed in Datasheet view.  The records can be 
> filtered using the built in filtering menus.
> 
> I want to be able to identify the records that are showing so that I 
> can update a field (specifically setting a yes/no field to true).  Is 
> there a property or method that will let me know which records are 
> left when filtering is applied on a datasheet?
> 
> Regards
> 
> David Emerson
> Dalyn Software Ltd
> Wellington, New Zealand
> 
> 
> 
> 
> --
> 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


From newsgrps at dalyn.co.nz  Mon Jun  6 14:29:36 2016
From: newsgrps at dalyn.co.nz (David Emerson)
Date: Tue, 7 Jun 2016 07:29:36 +1200
Subject: [AccessD] Selecting Filtered records in Datasheet
In-Reply-To: <009701d1bfe8$4f5bcff0$ee136fd0$@gmail.com>
References: <001801d1bf81$c0cc5cc0$42651640$@dalyn.co.nz>	<5754B9C5.16541.3477687@stuart.lexacorp.com.pg>	<001c01d1bf8c$b2a046b0$17e0d410$@dalyn.co.nz>
	<009701d1bfe8$4f5bcff0$ee136fd0$@gmail.com>
Message-ID: <000c01d1c029$c394b530$4abe1f90$@dalyn.co.nz>

Thanks Susan.  That's what we eventually discovered.  Regards David

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Susan Harkins
Sent: Monday, 6 June 2016 11:41 p.m.
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

David, I might not understand what you're looking for, but the following
syntax will return the current form's filter value: 

Forms![formname].Form.Filter

Susan H. 

Thanks Stuart and Rocky,

The problem is that I am not in control of the filter.  It depends on how
the user filters the records using the Access functionality.  

Currently I do what Stuart is suggesting but this sets all records in the
forms recordset, not just the ones that are left after the user has applied
their filters.

I was hoping that Access stored the filter somewhere so that I could get it
and apply it to the base records.

Regards

David Emerson
Dalyn Software Ltd
Wellington, New Zealand


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Monday, 6 June 2016 11:46 a.m.
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Selecting Filtered records in Datasheet

Not as far as I know,  but I've done a similar thing before by just stepping
through  the filtered recordset and setting each one in turn.  I'll see if I
can dig up an example.



On 6 Jun 2016 at 11:26, David Emerson wrote:

> Hi Listers,
> 
> I have a form that is displayed in Datasheet view.  The records can be 
> filtered using the built in filtering menus.
> 
> I want to be able to identify the records that are showing so that I 
> can update a field (specifically setting a yes/no field to true).  Is 
> there a property or method that will let me know which records are 
> left when filtering is applied on a datasheet?
> 
> Regards
> 
> David Emerson
> Dalyn Software Ltd
> Wellington, New Zealand



From ewaldt at gdls.com  Tue Jun  7 12:21:51 2016
From: ewaldt at gdls.com (ewaldt at gdls.com)
Date: Tue, 7 Jun 2016 13:21:51 -0400
Subject: [AccessD] Data Macros Unavailable
In-Reply-To: <mailman.3421.1464718050.9929.accessd@databaseadvisors.com>
References: <mailman.3421.1464718050.9929.accessd@databaseadvisors.com>
Message-ID: <OFF5471258.447C742D-ON85257FCB.005F15AB-85257FCB.005F624C@gdls.com>

I've used VBA in Access for several years, and have ignored macros, except 
for the autoexec on occasion. Now we have Access 2013 (64 bit), in which 
macros have taken major steps forward. I was interested in data macros, 
but when I open a table and click on the Table tab, the icons for 
Properties, Before Events, and After Events are all greyed out. I'm 
guessing I've got a setting off somewhere. Could someone help, please? 
Thanks.

Tom Ewald
Mass Properties
General Dynamics Land Systems

----------------------------------------------------------------------
This is an e-mail from General Dynamics Land Systems. It is for the intended recipient only and may contain confidential and privileged information.  No one else may read, print, store, copy, forward or act in reliance on it or its attachments.  If you are not the intended recipient, please return this message to the sender and delete the message and any attachments from your computer. Your cooperation is appreciated.
&&

From charlotte.foust at gmail.com  Tue Jun  7 12:53:08 2016
From: charlotte.foust at gmail.com (Charlotte Foust)
Date: Tue, 7 Jun 2016 10:53:08 -0700
Subject: [AccessD] Data Macros Unavailable
In-Reply-To: <OFF5471258.447C742D-ON85257FCB.005F15AB-85257FCB.005F624C@gdls.com>
References: <mailman.3421.1464718050.9929.accessd@databaseadvisors.com>
	<OFF5471258.447C742D-ON85257FCB.005F15AB-85257FCB.005F624C@gdls.com>
Message-ID: <CAH+Met_jqvdbUbd_+h2y07KgrxTab517cKb1UNthYsUZemkZ2A@mail.gmail.com>

You have to be in design view for the table to get at the data macro tools.

Charlotte Foust
(916) 206-4336
On Jun 7, 2016 10:24 AM, <ewaldt at gdls.com> wrote:

> I've used VBA in Access for several years, and have ignored macros, except
> for the autoexec on occasion. Now we have Access 2013 (64 bit), in which
> macros have taken major steps forward. I was interested in data macros,
> but when I open a table and click on the Table tab, the icons for
> Properties, Before Events, and After Events are all greyed out. I'm
> guessing I've got a setting off somewhere. Could someone help, please?
> Thanks.
>
> Tom Ewald
> Mass Properties
> General Dynamics Land Systems
>
> ----------------------------------------------------------------------
> This is an e-mail from General Dynamics Land Systems. It is for the
> intended recipient only and may contain confidential and privileged
> information.  No one else may read, print, store, copy, forward or act in
> reliance on it or its attachments.  If you are not the intended recipient,
> please return this message to the sender and delete the message and any
> attachments from your computer. Your cooperation is appreciated.
> &&
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>

From dw-murphy at cox.net  Tue Jun  7 12:58:49 2016
From: dw-murphy at cox.net (Doug Murphy)
Date: Tue, 7 Jun 2016 10:58:49 -0700
Subject: [AccessD] Data Macros Unavailable
In-Reply-To: <3tP61t01H0xgD8Z01tPF1e>
References: <mailman.3421.1464718050.9929.accessd@databaseadvisors.com>
	<3tP61t01H0xgD8Z01tPF1e>
Message-ID: <00a301d1c0e6$3eceb400$bc6c1c00$@cox.net>

Tom,

Is this a legacy project with mdb file type?

Doug

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
ewaldt at gdls.com
Sent: Tuesday, June 07, 2016 10:22 AM
To: accessd at databaseadvisors.com
Subject: [AccessD] Data Macros Unavailable

I've used VBA in Access for several years, and have ignored macros, except
for the autoexec on occasion. Now we have Access 2013 (64 bit), in which
macros have taken major steps forward. I was interested in data macros, but
when I open a table and click on the Table tab, the icons for Properties,
Before Events, and After Events are all greyed out. I'm guessing I've got a
setting off somewhere. Could someone help, please? 
Thanks.

Tom Ewald
Mass Properties
General Dynamics Land Systems

----------------------------------------------------------------------
This is an e-mail from General Dynamics Land Systems. It is for the intended
recipient only and may contain confidential and privileged information.  No
one else may read, print, store, copy, forward or act in reliance on it or
its attachments.  If you are not the intended recipient, please return this
message to the sender and delete the message and any attachments from your
computer. Your cooperation is appreciated.
&&
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From rockysmolin at bchacc.com  Tue Jun  7 16:02:10 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 7 Jun 2016 14:02:10 -0700
Subject: [AccessD] Create and Link Table in external database
Message-ID: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>

Dear List:
 
I am trying to create and link to a new table in an external database.  The
create part works fine but the linking part fails on the last line:
dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001 Invalid argument,
but I can't see why.  
 
I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As DAO.TableDef
but same result.  Here's the code:
 
Dim db As DAO.Database
Dim dbFrontEnd As DAO.Database
 
Dim wrk As DAO.Workspace
 
Dim tdf As DAO.TableDef
Dim tdfLinked As TableDef

' Create Table
    Set tdf = db.CreateTableDef("tblPODetailRemarks")
    Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
    fld.Attributes = dbAutoIncrField
    tdf.Fields.Append fld
    
    Set ind = tdf.CreateIndex("PrimaryKey")
    With ind
        .Fields.Append .CreateField("fldPODetailRemarksID")
        .Unique = False
        .Primary = True
    End With
    tdf.Indexes.Append ind
 
    Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
    tdf.Fields.Append fld
 
    db.TableDefs.Append tdf

' Link Table    
    Set dbFrontEnd = CurrentDb
    Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
    tdfLinked.Connect = ";Database = " & gstrDatabaseName
    tdfLinked.SourceTableName = "tblPODetailRemarks"
    dbFrontEnd.TableDefs.Append tdfLinked
 
Does anyone see what I'm doing wrong?
 
MTIA
 
Rocky Smolin
Beach Access Software
760-683-5777
www.bchacc.com <http://www.bchacc.com/> 
www.e-z-mrp.com <http://www.e-z-mrp.com/> 
Skype: rocky.smolin
 

From stuart at lexacorp.com.pg  Tue Jun  7 17:13:08 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 08 Jun 2016 08:13:08 +1000
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>
Message-ID: <575746F4.23403.4578D09@stuart.lexacorp.com.pg>

"If the object you're appending isn't complete ... using the Append method triggers a 
run-time error."
You have not specified any Attributes.

Try adding: tdfLinked.Attributes = dbAttachedTable  

-- 
Stuart

On 7 Jun 2016 at 14:02, Rocky Smolin wrote:

> Dear List:
> 
> I am trying to create and link to a new table in an external database.
>  The create part works fine but the linking part fails on the last
> line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001
> Invalid argument, but I can't see why.  
> 
> I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As
> DAO.TableDef but same result.  Here's the code:
> 
> Dim db As DAO.Database
> Dim dbFrontEnd As DAO.Database
> 
> Dim wrk As DAO.Workspace
> 
> Dim tdf As DAO.TableDef
> Dim tdfLinked As TableDef
> 
> ' Create Table
>     Set tdf = db.CreateTableDef("tblPODetailRemarks")
>     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
>     fld.Attributes = dbAutoIncrField
>     tdf.Fields.Append fld
> 
>     Set ind = tdf.CreateIndex("PrimaryKey")
>     With ind
>         .Fields.Append .CreateField("fldPODetailRemarksID")
>         .Unique = False
>         .Primary = True
>     End With
>     tdf.Indexes.Append ind
> 
>     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
>     tdf.Fields.Append fld
> 
>     db.TableDefs.Append tdf
> 
> ' Link Table    
>     Set dbFrontEnd = CurrentDb
>     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
>     tdfLinked.Connect = ";Database = " & gstrDatabaseName
>     tdfLinked.SourceTableName = "tblPODetailRemarks"
>     dbFrontEnd.TableDefs.Append tdfLinked
> 
> Does anyone see what I'm doing wrong?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> 
> www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> Skype: rocky.smolin
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 



From rockysmolin at bchacc.com  Tue Jun  7 17:29:49 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 7 Jun 2016 15:29:49 -0700
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <575746F4.23403.4578D09@stuart.lexacorp.com.pg>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>
	<575746F4.23403.4578D09@stuart.lexacorp.com.pg>
Message-ID: <0BA77FAC7EB4477995D85677E256A5A7@HAL9007>

tdfLinked.Attributes = dbAttachedTable also generates an error 3001 Invalid
argument. (I get enough of those on OT) 

I added it before: dbFrontEnd.TableDefs.Append tdfLinked

Scoured the internets on this but no cigar.  Any other ideas?

TIA

Rocky




-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Tuesday, June 07, 2016 3:13 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Create and Link Table in external database

"If the object you're appending isn't complete ... using the Append method
triggers a run-time error."
You have not specified any Attributes.

Try adding: tdfLinked.Attributes = dbAttachedTable  

--
Stuart

On 7 Jun 2016 at 14:02, Rocky Smolin wrote:

> Dear List:
> 
> I am trying to create and link to a new table in an external database.
>  The create part works fine but the linking part fails on the last
> line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001 
> Invalid argument, but I can't see why.
> 
> I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As 
> DAO.TableDef but same result.  Here's the code:
> 
> Dim db As DAO.Database
> Dim dbFrontEnd As DAO.Database
> 
> Dim wrk As DAO.Workspace
> 
> Dim tdf As DAO.TableDef
> Dim tdfLinked As TableDef
> 
> ' Create Table
>     Set tdf = db.CreateTableDef("tblPODetailRemarks")
>     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
>     fld.Attributes = dbAutoIncrField
>     tdf.Fields.Append fld
> 
>     Set ind = tdf.CreateIndex("PrimaryKey")
>     With ind
>         .Fields.Append .CreateField("fldPODetailRemarksID")
>         .Unique = False
>         .Primary = True
>     End With
>     tdf.Indexes.Append ind
> 
>     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
>     tdf.Fields.Append fld
> 
>     db.TableDefs.Append tdf
> 
> ' Link Table    
>     Set dbFrontEnd = CurrentDb
>     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
>     tdfLinked.Connect = ";Database = " & gstrDatabaseName
>     tdfLinked.SourceTableName = "tblPODetailRemarks"
>     dbFrontEnd.TableDefs.Append tdfLinked
> 
> Does anyone see what I'm doing wrong?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> <http://www.e-z-mrp.com/>
> Skype: rocky.smolin
> 
> --
> 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


From stuart at lexacorp.com.pg  Tue Jun  7 19:37:08 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 08 Jun 2016 10:37:08 +1000
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <0BA77FAC7EB4477995D85677E256A5A7@HAL9007>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>,
	<575746F4.23403.4578D09@stuart.lexacorp.com.pg>,
	<0BA77FAC7EB4477995D85677E256A5A7@HAL9007>
Message-ID: <575768B4.20190.4DB6418@stuart.lexacorp.com.pg>

Have you tried it with the DAO. back in
"Dim tdfLinked As DAO.TableDef"


On 7 Jun 2016 at 15:29, Rocky Smolin wrote:

> tdfLinked.Attributes = dbAttachedTable also generates an error 3001
> Invalid argument. (I get enough of those on OT) 
> 
> I added it before: dbFrontEnd.TableDefs.Append tdfLinked
> 
> Scoured the internets on this but no cigar.  Any other ideas?
> 
> TIA
> 
> Rocky
> 
> 
> 
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Stuart McLachlan Sent: Tuesday, June 07, 2016 3:13 PM To: Access
> Developers discussion and problem solving Subject: Re: [AccessD]
> Create and Link Table in external database
> 
> "If the object you're appending isn't complete ... using the Append
> method triggers a run-time error." You have not specified any
> Attributes.
> 
> Try adding: tdfLinked.Attributes = dbAttachedTable  
> 
> --
> Stuart
> 
> On 7 Jun 2016 at 14:02, Rocky Smolin wrote:
> 
> > Dear List:
> > 
> > I am trying to create and link to a new table in an external
> > database.
> >  The create part works fine but the linking part fails on the last
> > line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001
> > Invalid argument, but I can't see why.
> > 
> > I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As
> > DAO.TableDef but same result.  Here's the code:
> > 
> > Dim db As DAO.Database
> > Dim dbFrontEnd As DAO.Database
> > 
> > Dim wrk As DAO.Workspace
> > 
> > Dim tdf As DAO.TableDef
> > Dim tdfLinked As TableDef
> > 
> > ' Create Table
> >     Set tdf = db.CreateTableDef("tblPODetailRemarks")
> >     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
> >     fld.Attributes = dbAutoIncrField
> >     tdf.Fields.Append fld
> > 
> >     Set ind = tdf.CreateIndex("PrimaryKey")
> >     With ind
> >         .Fields.Append .CreateField("fldPODetailRemarksID")
> >         .Unique = False
> >         .Primary = True
> >     End With
> >     tdf.Indexes.Append ind
> > 
> >     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
> >     tdf.Fields.Append fld
> > 
> >     db.TableDefs.Append tdf
> > 
> > ' Link Table    
> >     Set dbFrontEnd = CurrentDb
> >     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
> >     tdfLinked.Connect = ";Database = " & gstrDatabaseName
> >     tdfLinked.SourceTableName = "tblPODetailRemarks"
> >     dbFrontEnd.TableDefs.Append tdfLinked
> > 
> > Does anyone see what I'm doing wrong?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> > <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> > 
> > --
> > 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
> 



From stuart at lexacorp.com.pg  Tue Jun  7 20:06:10 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 08 Jun 2016 11:06:10 +1000
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <0BA77FAC7EB4477995D85677E256A5A7@HAL9007>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>,
	<575746F4.23403.4578D09@stuart.lexacorp.com.pg>,
	<0BA77FAC7EB4477995D85677E256A5A7@HAL9007>
Message-ID: <57576F82.16594.4F5F7C0@stuart.lexacorp.com.pg>

Don't know what is going wrong, but I've just stepped back and  looked at what you are trying 
to do. :)

Simple one line solution:

' Link Table
DoCmd.TransferDatabase acLink, "Microsoft Access", gstrDatabaseName, _
             acTable, "tblPODetailRemarks", "tblPODetailRemarks", False




On 7 Jun 2016 at 15:29, Rocky Smolin wrote:

> tdfLinked.Attributes = dbAttachedTable also generates an error 3001
> Invalid argument. (I get enough of those on OT) 
> 
> I added it before: dbFrontEnd.TableDefs.Append tdfLinked
> 
> Scoured the internets on this but no cigar.  Any other ideas?
> 
> TIA
> 
> Rocky
> 
> 
> 
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Stuart McLachlan Sent: Tuesday, June 07, 2016 3:13 PM To: Access
> Developers discussion and problem solving Subject: Re: [AccessD]
> Create and Link Table in external database
> 
> "If the object you're appending isn't complete ... using the Append
> method triggers a run-time error." You have not specified any
> Attributes.
> 
> Try adding: tdfLinked.Attributes = dbAttachedTable  
> 
> --
> Stuart
> 
> On 7 Jun 2016 at 14:02, Rocky Smolin wrote:
> 
> > Dear List:
> > 
> > I am trying to create and link to a new table in an external
> > database.
> >  The create part works fine but the linking part fails on the last
> > line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001
> > Invalid argument, but I can't see why.
> > 
> > I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As
> > DAO.TableDef but same result.  Here's the code:
> > 
> > Dim db As DAO.Database
> > Dim dbFrontEnd As DAO.Database
> > 
> > Dim wrk As DAO.Workspace
> > 
> > Dim tdf As DAO.TableDef
> > Dim tdfLinked As TableDef
> > 
> > ' Create Table
> >     Set tdf = db.CreateTableDef("tblPODetailRemarks")
> >     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
> >     fld.Attributes = dbAutoIncrField
> >     tdf.Fields.Append fld
> > 
> >     Set ind = tdf.CreateIndex("PrimaryKey")
> >     With ind
> >         .Fields.Append .CreateField("fldPODetailRemarksID")
> >         .Unique = False
> >         .Primary = True
> >     End With
> >     tdf.Indexes.Append ind
> > 
> >     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
> >     tdf.Fields.Append fld
> > 
> >     db.TableDefs.Append tdf
> > 
> > ' Link Table    
> >     Set dbFrontEnd = CurrentDb
> >     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
> >     tdfLinked.Connect = ";Database = " & gstrDatabaseName
> >     tdfLinked.SourceTableName = "tblPODetailRemarks"
> >     dbFrontEnd.TableDefs.Append tdfLinked
> > 
> > Does anyone see what I'm doing wrong?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> > <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> > 
> > --
> > 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
> 



From stuart at lexacorp.com.pg  Tue Jun  7 20:17:47 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 08 Jun 2016 11:17:47 +1000
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <0BA77FAC7EB4477995D85677E256A5A7@HAL9007>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>,
	<575746F4.23403.4578D09@stuart.lexacorp.com.pg>,
	<0BA77FAC7EB4477995D85677E256A5A7@HAL9007>
Message-ID: <5757723B.24493.5009CD5@stuart.lexacorp.com.pg>

Reading a bit deeper, I came across this:

" Also, you can't append a TableDef object to the TableDefs collection until you define at 
least one Field for the TableDef object."

Which suggests to me that doing it the way you are trying to means you have to define the 
linked table completely by repeating the relevant  tdf lines for tdflinked.

I guess that the  Docmd.TransferDatabase   method does all of that "under the hood".

 -- 
Stuart


On 7 Jun 2016 at 15:29, Rocky Smolin wrote:

> tdfLinked.Attributes = dbAttachedTable also generates an error 3001
> Invalid argument. (I get enough of those on OT) 
> 
> I added it before: dbFrontEnd.TableDefs.Append tdfLinked
> 
> Scoured the internets on this but no cigar.  Any other ideas?
> 
> TIA
> 
> Rocky
> 
> 
> 
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Stuart McLachlan Sent: Tuesday, June 07, 2016 3:13 PM To: Access
> Developers discussion and problem solving Subject: Re: [AccessD]
> Create and Link Table in external database
> 
> "If the object you're appending isn't complete ... using the Append
> method triggers a run-time error." You have not specified any
> Attributes.
> 
> Try adding: tdfLinked.Attributes = dbAttachedTable  
> 
> --
> Stuart
> 
> On 7 Jun 2016 at 14:02, Rocky Smolin wrote:
> 
> > Dear List:
> > 
> > I am trying to create and link to a new table in an external
> > database.
> >  The create part works fine but the linking part fails on the last
> > line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001
> > Invalid argument, but I can't see why.
> > 
> > I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As
> > DAO.TableDef but same result.  Here's the code:
> > 
> > Dim db As DAO.Database
> > Dim dbFrontEnd As DAO.Database
> > 
> > Dim wrk As DAO.Workspace
> > 
> > Dim tdf As DAO.TableDef
> > Dim tdfLinked As TableDef
> > 
> > ' Create Table
> >     Set tdf = db.CreateTableDef("tblPODetailRemarks")
> >     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
> >     fld.Attributes = dbAutoIncrField
> >     tdf.Fields.Append fld
> > 
> >     Set ind = tdf.CreateIndex("PrimaryKey")
> >     With ind
> >         .Fields.Append .CreateField("fldPODetailRemarksID")
> >         .Unique = False
> >         .Primary = True
> >     End With
> >     tdf.Indexes.Append ind
> > 
> >     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
> >     tdf.Fields.Append fld
> > 
> >     db.TableDefs.Append tdf
> > 
> > ' Link Table    
> >     Set dbFrontEnd = CurrentDb
> >     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
> >     tdfLinked.Connect = ";Database = " & gstrDatabaseName
> >     tdfLinked.SourceTableName = "tblPODetailRemarks"
> >     dbFrontEnd.TableDefs.Append tdfLinked
> > 
> > Does anyone see what I'm doing wrong?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> > <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> > 
> > --
> > 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
> 



From stuart at lexacorp.com.pg  Tue Jun  7 20:47:44 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 08 Jun 2016 11:47:44 +1000
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>
Message-ID: <57577940.6946.51C073B@stuart.lexacorp.com.pg>

Sheesh!  After a lot of playing around, eventually, it was so simple!

You don't need to specify anything additional info, you just need to get what you are currently 
specifying correct :-)

Change:  
tdfLinked.Connect = ";Database = " & gstrDatabaseName
TO:
tdfLinked.Connect = ";Database=" & gstrDatabaseName

i.e. without the two spaces.  


On 7 Jun 2016 at 14:02, Rocky Smolin wrote:

> Dear List:
> 
> I am trying to create and link to a new table in an external database.
>  The create part works fine but the linking part fails on the last
> line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001
> Invalid argument, but I can't see why.  
> 
> I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As
> DAO.TableDef but same result.  Here's the code:
> 
> Dim db As DAO.Database
> Dim dbFrontEnd As DAO.Database
> 
> Dim wrk As DAO.Workspace
> 
> Dim tdf As DAO.TableDef
> Dim tdfLinked As TableDef
> 
> ' Create Table
>     Set tdf = db.CreateTableDef("tblPODetailRemarks")
>     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
>     fld.Attributes = dbAutoIncrField
>     tdf.Fields.Append fld
> 
>     Set ind = tdf.CreateIndex("PrimaryKey")
>     With ind
>         .Fields.Append .CreateField("fldPODetailRemarksID")
>         .Unique = False
>         .Primary = True
>     End With
>     tdf.Indexes.Append ind
> 
>     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
>     tdf.Fields.Append fld
> 
>     db.TableDefs.Append tdf
> 
> ' Link Table    
>     Set dbFrontEnd = CurrentDb
>     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
>     tdfLinked.Connect = ";Database = " & gstrDatabaseName
>     tdfLinked.SourceTableName = "tblPODetailRemarks"
>     dbFrontEnd.TableDefs.Append tdfLinked
> 
> Does anyone see what I'm doing wrong?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> 
> www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> Skype: rocky.smolin
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 



From jackandpat.d at gmail.com  Tue Jun  7 21:11:04 2016
From: jackandpat.d at gmail.com (jack drawbridge)
Date: Tue, 7 Jun 2016 22:11:04 -0400
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <57577940.6946.51C073B@stuart.lexacorp.com.pg>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>
	<57577940.6946.51C073B@stuart.lexacorp.com.pg>
Message-ID: <CAKvidAte1yf9oiWafw4ttJ6XkA9YOZo2iDRj_XuT62vhu-sMEg@mail.gmail.com>

Thanks Stuart, finally got it to work after your last post.

On Tue, Jun 7, 2016 at 9:47 PM, Stuart McLachlan <stuart at lexacorp.com.pg>
wrote:

> Sheesh!  After a lot of playing around, eventually, it was so simple!
>
> You don't need to specify anything additional info, you just need to get
> what you are currently
> specifying correct :-)
>
> Change:
> tdfLinked.Connect = ";Database = " & gstrDatabaseName
> TO:
> tdfLinked.Connect = ";Database=" & gstrDatabaseName
>
> i.e. without the two spaces.
>
>
> On 7 Jun 2016 at 14:02, Rocky Smolin wrote:
>
> > Dear List:
> >
> > I am trying to create and link to a new table in an external database.
> >  The create part works fine but the linking part fails on the last
> > line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001
> > Invalid argument, but I can't see why.
> >
> > I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As
> > DAO.TableDef but same result.  Here's the code:
> >
> > Dim db As DAO.Database
> > Dim dbFrontEnd As DAO.Database
> >
> > Dim wrk As DAO.Workspace
> >
> > Dim tdf As DAO.TableDef
> > Dim tdfLinked As TableDef
> >
> > ' Create Table
> >     Set tdf = db.CreateTableDef("tblPODetailRemarks")
> >     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
> >     fld.Attributes = dbAutoIncrField
> >     tdf.Fields.Append fld
> >
> >     Set ind = tdf.CreateIndex("PrimaryKey")
> >     With ind
> >         .Fields.Append .CreateField("fldPODetailRemarksID")
> >         .Unique = False
> >         .Primary = True
> >     End With
> >     tdf.Indexes.Append ind
> >
> >     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
> >     tdf.Fields.Append fld
> >
> >     db.TableDefs.Append tdf
> >
> > ' Link Table
> >     Set dbFrontEnd = CurrentDb
> >     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
> >     tdfLinked.Connect = ";Database = " & gstrDatabaseName
> >     tdfLinked.SourceTableName = "tblPODetailRemarks"
> >     dbFrontEnd.TableDefs.Append tdfLinked
> >
> > Does anyone see what I'm doing wrong?
> >
> > MTIA
> >
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/>
> > www.e-z-mrp.com <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> >
> > --
> > 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
>

From rockysmolin at bchacc.com  Tue Jun  7 23:18:53 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 7 Jun 2016 21:18:53 -0700
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <575768B4.20190.4DB6418@stuart.lexacorp.com.pg>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>,
	<575746F4.23403.4578D09@stuart.lexacorp.com.pg>,
	<0BA77FAC7EB4477995D85677E256A5A7@HAL9007>
	<575768B4.20190.4DB6418@stuart.lexacorp.com.pg>
Message-ID: <386D5223C01A44E2B7D980DA86966149@HAL9007>

Yeah, same result. :(

r 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Tuesday, June 07, 2016 5:37 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Create and Link Table in external database

Have you tried it with the DAO. back in
"Dim tdfLinked As DAO.TableDef"


On 7 Jun 2016 at 15:29, Rocky Smolin wrote:

> tdfLinked.Attributes = dbAttachedTable also generates an error 3001 
> Invalid argument. (I get enough of those on OT)
> 
> I added it before: dbFrontEnd.TableDefs.Append tdfLinked
> 
> Scoured the internets on this but no cigar.  Any other ideas?
> 
> TIA
> 
> Rocky
> 
> 
> 
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf 
> Of Stuart McLachlan Sent: Tuesday, June 07, 2016 3:13 PM To: Access 
> Developers discussion and problem solving Subject: Re: [AccessD] 
> Create and Link Table in external database
> 
> "If the object you're appending isn't complete ... using the Append 
> method triggers a run-time error." You have not specified any 
> Attributes.
> 
> Try adding: tdfLinked.Attributes = dbAttachedTable
> 
> --
> Stuart
> 
> On 7 Jun 2016 at 14:02, Rocky Smolin wrote:
> 
> > Dear List:
> > 
> > I am trying to create and link to a new table in an external 
> > database.
> >  The create part works fine but the linking part fails on the last
> > line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001 
> > Invalid argument, but I can't see why.
> > 
> > I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As 
> > DAO.TableDef but same result.  Here's the code:
> > 
> > Dim db As DAO.Database
> > Dim dbFrontEnd As DAO.Database
> > 
> > Dim wrk As DAO.Workspace
> > 
> > Dim tdf As DAO.TableDef
> > Dim tdfLinked As TableDef
> > 
> > ' Create Table
> >     Set tdf = db.CreateTableDef("tblPODetailRemarks")
> >     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
> >     fld.Attributes = dbAutoIncrField
> >     tdf.Fields.Append fld
> > 
> >     Set ind = tdf.CreateIndex("PrimaryKey")
> >     With ind
> >         .Fields.Append .CreateField("fldPODetailRemarksID")
> >         .Unique = False
> >         .Primary = True
> >     End With
> >     tdf.Indexes.Append ind
> > 
> >     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
> >     tdf.Fields.Append fld
> > 
> >     db.TableDefs.Append tdf
> > 
> > ' Link Table    
> >     Set dbFrontEnd = CurrentDb
> >     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
> >     tdfLinked.Connect = ";Database = " & gstrDatabaseName
> >     tdfLinked.SourceTableName = "tblPODetailRemarks"
> >     dbFrontEnd.TableDefs.Append tdfLinked
> > 
> > Does anyone see what I'm doing wrong?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> > <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> > 
> > --
> > 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
> 


-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From rockysmolin at bchacc.com  Tue Jun  7 23:22:25 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 7 Jun 2016 21:22:25 -0700
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <57576F82.16594.4F5F7C0@stuart.lexacorp.com.pg>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>,
	<575746F4.23403.4578D09@stuart.lexacorp.com.pg>,
	<0BA77FAC7EB4477995D85677E256A5A7@HAL9007>
	<57576F82.16594.4F5F7C0@stuart.lexacorp.com.pg>
Message-ID: <54EA66FB2BCF4A079CE0456103E61A79@HAL9007>

Ta-da! Worked like a charm.  Thank you Stuart.  (TransferDatabase - who
knew?)

best,

r
 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Tuesday, June 07, 2016 6:06 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Create and Link Table in external database

Don't know what is going wrong, but I've just stepped back and  looked at
what you are trying to do. :)

Simple one line solution:

' Link Table
DoCmd.TransferDatabase acLink, "Microsoft Access", gstrDatabaseName, _
             acTable, "tblPODetailRemarks", "tblPODetailRemarks", False




On 7 Jun 2016 at 15:29, Rocky Smolin wrote:

> tdfLinked.Attributes = dbAttachedTable also generates an error 3001 
> Invalid argument. (I get enough of those on OT)
> 
> I added it before: dbFrontEnd.TableDefs.Append tdfLinked
> 
> Scoured the internets on this but no cigar.  Any other ideas?
> 
> TIA
> 
> Rocky
> 
> 
> 
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf 
> Of Stuart McLachlan Sent: Tuesday, June 07, 2016 3:13 PM To: Access 
> Developers discussion and problem solving Subject: Re: [AccessD] 
> Create and Link Table in external database
> 
> "If the object you're appending isn't complete ... using the Append 
> method triggers a run-time error." You have not specified any 
> Attributes.
> 
> Try adding: tdfLinked.Attributes = dbAttachedTable
> 
> --
> Stuart
> 
> On 7 Jun 2016 at 14:02, Rocky Smolin wrote:
> 
> > Dear List:
> > 
> > I am trying to create and link to a new table in an external 
> > database.
> >  The create part works fine but the linking part fails on the last
> > line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001 
> > Invalid argument, but I can't see why.
> > 
> > I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As 
> > DAO.TableDef but same result.  Here's the code:
> > 
> > Dim db As DAO.Database
> > Dim dbFrontEnd As DAO.Database
> > 
> > Dim wrk As DAO.Workspace
> > 
> > Dim tdf As DAO.TableDef
> > Dim tdfLinked As TableDef
> > 
> > ' Create Table
> >     Set tdf = db.CreateTableDef("tblPODetailRemarks")
> >     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
> >     fld.Attributes = dbAutoIncrField
> >     tdf.Fields.Append fld
> > 
> >     Set ind = tdf.CreateIndex("PrimaryKey")
> >     With ind
> >         .Fields.Append .CreateField("fldPODetailRemarksID")
> >         .Unique = False
> >         .Primary = True
> >     End With
> >     tdf.Indexes.Append ind
> > 
> >     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
> >     tdf.Fields.Append fld
> > 
> >     db.TableDefs.Append tdf
> > 
> > ' Link Table    
> >     Set dbFrontEnd = CurrentDb
> >     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
> >     tdfLinked.Connect = ";Database = " & gstrDatabaseName
> >     tdfLinked.SourceTableName = "tblPODetailRemarks"
> >     dbFrontEnd.TableDefs.Append tdfLinked
> > 
> > Does anyone see what I'm doing wrong?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> > <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> > 
> > --
> > 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
> 


-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From rockysmolin at bchacc.com  Tue Jun  7 23:26:35 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 7 Jun 2016 21:26:35 -0700
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <57577940.6946.51C073B@stuart.lexacorp.com.pg>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>
	<57577940.6946.51C073B@stuart.lexacorp.com.pg>
Message-ID: <33DC3078BCD242F68C9F38445082623C@HAL9007>

Really? No spaces?  I always spaced out everything because the spaces never
were critical - not in any SQL type stuff.

Anyway the TransferDatabase thing worked beautifully.  Is there any
advantage, you think, of one over the other?

r 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Tuesday, June 07, 2016 6:48 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Create and Link Table in external database

Sheesh!  After a lot of playing around, eventually, it was so simple!

You don't need to specify anything additional info, you just need to get
what you are currently specifying correct :-)

Change:  
tdfLinked.Connect = ";Database = " & gstrDatabaseName
TO:
tdfLinked.Connect = ";Database=" & gstrDatabaseName

i.e. without the two spaces.  


On 7 Jun 2016 at 14:02, Rocky Smolin wrote:

> Dear List:
> 
> I am trying to create and link to a new table in an external database.
>  The create part works fine but the linking part fails on the last
> line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001 
> Invalid argument, but I can't see why.
> 
> I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As 
> DAO.TableDef but same result.  Here's the code:
> 
> Dim db As DAO.Database
> Dim dbFrontEnd As DAO.Database
> 
> Dim wrk As DAO.Workspace
> 
> Dim tdf As DAO.TableDef
> Dim tdfLinked As TableDef
> 
> ' Create Table
>     Set tdf = db.CreateTableDef("tblPODetailRemarks")
>     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
>     fld.Attributes = dbAutoIncrField
>     tdf.Fields.Append fld
> 
>     Set ind = tdf.CreateIndex("PrimaryKey")
>     With ind
>         .Fields.Append .CreateField("fldPODetailRemarksID")
>         .Unique = False
>         .Primary = True
>     End With
>     tdf.Indexes.Append ind
> 
>     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
>     tdf.Fields.Append fld
> 
>     db.TableDefs.Append tdf
> 
> ' Link Table    
>     Set dbFrontEnd = CurrentDb
>     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
>     tdfLinked.Connect = ";Database = " & gstrDatabaseName
>     tdfLinked.SourceTableName = "tblPODetailRemarks"
>     dbFrontEnd.TableDefs.Append tdfLinked
> 
> Does anyone see what I'm doing wrong?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> <http://www.e-z-mrp.com/>
> Skype: rocky.smolin
> 
> --
> 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


From stuart at lexacorp.com.pg  Tue Jun  7 23:53:45 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 08 Jun 2016 14:53:45 +1000
Subject: [AccessD] Create and Link Table in external database
In-Reply-To: <33DC3078BCD242F68C9F38445082623C@HAL9007>
References: <F5B81EB27BA24EE8ADAE3A1197BD68F8@HAL9007>,
	<57577940.6946.51C073B@stuart.lexacorp.com.pg>,
	<33DC3078BCD242F68C9F38445082623C@HAL9007>
Message-ID: <5757A4D9.17966.5C65686@stuart.lexacorp.com.pg>

Docmd.Transfer is a simple one line command.   :)


On 7 Jun 2016 at 21:26, Rocky Smolin wrote:

> Really? No spaces?  I always spaced out everything because the spaces
> never were critical - not in any SQL type stuff.
> 
> Anyway the TransferDatabase thing worked beautifully.  Is there any
> advantage, you think, of one over the other?
> 
> r 
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Stuart McLachlan Sent: Tuesday, June 07, 2016 6:48 PM To: Access
> Developers discussion and problem solving Subject: Re: [AccessD]
> Create and Link Table in external database
> 
> Sheesh!  After a lot of playing around, eventually, it was so simple!
> 
> You don't need to specify anything additional info, you just need to
> get what you are currently specifying correct :-)
> 
> Change:  
> tdfLinked.Connect = ";Database = " & gstrDatabaseName
> TO:
> tdfLinked.Connect = ";Database=" & gstrDatabaseName
> 
> i.e. without the two spaces.  
> 
> 
> On 7 Jun 2016 at 14:02, Rocky Smolin wrote:
> 
> > Dear List:
> > 
> > I am trying to create and link to a new table in an external
> > database.
> >  The create part works fine but the linking part fails on the last
> > line: dbFrontEnd.TableDefs.Append tdfLinked, with an Error 3001
> > Invalid argument, but I can't see why.
> > 
> > I tried changing  Dim tdfLinked As TableDef to Dim tdfLinked As
> > DAO.TableDef but same result.  Here's the code:
> > 
> > Dim db As DAO.Database
> > Dim dbFrontEnd As DAO.Database
> > 
> > Dim wrk As DAO.Workspace
> > 
> > Dim tdf As DAO.TableDef
> > Dim tdfLinked As TableDef
> > 
> > ' Create Table
> >     Set tdf = db.CreateTableDef("tblPODetailRemarks")
> >     Set fld = tdf.CreateField("fldPODetailRemarksID", dbLong)
> >     fld.Attributes = dbAutoIncrField
> >     tdf.Fields.Append fld
> > 
> >     Set ind = tdf.CreateIndex("PrimaryKey")
> >     With ind
> >         .Fields.Append .CreateField("fldPODetailRemarksID")
> >         .Unique = False
> >         .Primary = True
> >     End With
> >     tdf.Indexes.Append ind
> > 
> >     Set fld = tdf.CreateField("fldPODetailRemarks", dbText, 255)
> >     tdf.Fields.Append fld
> > 
> >     db.TableDefs.Append tdf
> > 
> > ' Link Table    
> >     Set dbFrontEnd = CurrentDb
> >     Set tdfLinked = dbFrontEnd.CreateTableDef("tblPODetailRemarks")
> >     tdfLinked.Connect = ";Database = " & gstrDatabaseName
> >     tdfLinked.SourceTableName = "tblPODetailRemarks"
> >     dbFrontEnd.TableDefs.Append tdfLinked
> > 
> > Does anyone see what I'm doing wrong?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> > <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> > 
> > --
> > 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
> 



From ewaldt at gdls.com  Wed Jun  8 05:46:46 2016
From: ewaldt at gdls.com (ewaldt at gdls.com)
Date: Wed, 8 Jun 2016 06:46:46 -0400
Subject: [AccessD] Data Macros Unavailable
In-Reply-To: <mailman.3598.1465346241.9929.accessd@databaseadvisors.com>
References: <mailman.3598.1465346241.9929.accessd@databaseadvisors.com>
Message-ID: <OF546851FB.A8F5D6C2-ON85257FCC.0039F15D-85257FCC.003B36CA@gdls.com>

Charlotte and Doug, thanks.

Charlotte, thanks but that's not strictly true. Following a book's 
instructions, I double-click on a table (which opens it, of course), and a 
Table Tools section appears on the ribbon, containing Fields and Tables 
tabs. Clicking on the Tables tab (sorry that I wasn't this specific the 
first time) yields several icons, including before change and delete, etc. 
Those are greyed out within my app, although the book says that's how I'm 
to access them. In another app, though, they're available. I can't find 
any difference between the two apps that would cause this. OTOH, opening 
in design view as you suggest DOES bring up the Table Tools section again, 
but this time without only one tab, Design. Under that is an icon for 
Create Data Macros, and the same options (before change and delete, etc.) 
are present, and are NOT greyed out, so I definitely thank you for that. 
Still wondering why that other way is available in one app but not the 
other.

Doug, I created the app in Access 2007. Since I'm using 2013 now, I guess 
that's kinda, sorta a legacy app. :-)  But not really.

Thanks, again.

Tom Ewald
Mass Properties
General Dynamics Land Systems


You have to be in design view for the table to get at the data macro 
tools.

Charlotte Foust


From: "Doug Murphy" <dw-murphy at cox.net>
To: "'Access Developers discussion and problem solving'"
                 <accessd at databaseadvisors.com>
Subject: Re: [AccessD] Data Macros Unavailable
Message-ID: <00a301d1c0e6$3eceb400$bc6c1c00$@cox.net>
Content-Type: text/plain;                charset="us-ascii"

Tom,

Is this a legacy project with mdb file type?

Doug

> I've used VBA in Access for several years, and have ignored macros, 
except
> for the autoexec on occasion. Now we have Access 2013 (64 bit), in which
> macros have taken major steps forward. I was interested in data macros,
> but when I open a table and click on the Table tab, the icons for
> Properties, Before Events, and After Events are all greyed out. I'm
> guessing I've got a setting off somewhere. Could someone help, please?
> Thanks.

----------------------------------------------------------------------
This is an e-mail from General Dynamics Land Systems. It is for the intended recipient only and may contain confidential and privileged information.  No one else may read, print, store, copy, forward or act in reliance on it or its attachments.  If you are not the intended recipient, please return this message to the sender and delete the message and any attachments from your computer. Your cooperation is appreciated.
&&

From stuart at lexacorp.com.pg  Wed Jun  8 07:29:24 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 08 Jun 2016 22:29:24 +1000
Subject: [AccessD] Data Macros Unavailable
In-Reply-To: <OF546851FB.A8F5D6C2-ON85257FCC.0039F15D-85257FCC.003B36CA@gdls.com>
References: <mailman.3598.1465346241.9929.accessd@databaseadvisors.com>,
	<OF546851FB.A8F5D6C2-ON85257FCC.0039F15D-85257FCC.003B36CA@gdls.com>
Message-ID: <57580FA4.15387.76783D5@stuart.lexacorp.com.pg>

The difference between your applications is the state of the checkbox:

File - Options - Current Database - Enable Design Changes For Tables in Datasheet View.

-- 
Stuart

On 8 Jun 2016 at 6:46, ewaldt at gdls.com wrote:

> Charlotte and Doug, thanks.
> 
> Charlotte, thanks but that's not strictly true. Following a book's
> instructions, I double-click on a table (which opens it, of course),
> and a Table Tools section appears on the ribbon, containing Fields and
> Tables tabs. Clicking on the Tables tab (sorry that I wasn't this
> specific the first time) yields several icons, including before change
> and delete, etc. Those are greyed out within my app, although the book
> says that's how I'm to access them. In another app, though, they're
> available. I can't find any difference between the two apps that would
> cause this. OTOH, opening in design view as you suggest DOES bring up
> the Table Tools section again, but this time without only one tab,
> Design. Under that is an icon for Create Data Macros, and the same
> options (before change and delete, etc.) are present, and are NOT
> greyed out, so I definitely thank you for that. Still wondering why
> that other way is available in one app but not the other.
> 
> Doug, I created the app in Access 2007. Since I'm using 2013 now, I
> guess that's kinda, sorta a legacy app. :-)  But not really.
> 
> Thanks, again.
> 
> Tom Ewald
> Mass Properties
> General Dynamics Land Systems
> 


From rockysmolin at bchacc.com  Tue Jun 14 12:00:28 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 14 Jun 2016 10:00:28 -0700
Subject: [AccessD] Need rectangle with rounded corners
Message-ID: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>

Dear List:
 
I have a requirement from a client for a purchase order where they want the
Vendor, Bill To, and Ship To info in a rectangle with rounded corners.
 
Been trying to make one that will stretch with no luck.  Not an image off
the web.
 
But I'll bet there's an easy way to this this that I'm not aware of.
 
What is the easiest way to create a stretchable or zoomable box with rounded
corners.
 
MTIA,
 
Rocky
 

From davidmcafee at gmail.com  Tue Jun 14 12:16:26 2016
From: davidmcafee at gmail.com (David McAfee)
Date: Tue, 14 Jun 2016 10:16:26 -0700
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>
Message-ID: <CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com>

You can make a rounded rectangle in Paint and save it as a bmp file.
The only thing is paint doesn't allow for transparent cells (or at least I
don't know how to do that), so you'll have to make sure the form/report's
background is white, or the corners of the bmp file have to be colored to
match the form/report background color.

I used to love MS Draw form making my own shapes / buttons.

D


On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin <rockysmolin at bchacc.com>
wrote:

> Dear List:
>
> I have a requirement from a client for a purchase order where they want the
> Vendor, Bill To, and Ship To info in a rectangle with rounded corners.
>
> Been trying to make one that will stretch with no luck.  Not an image off
> the web.
>
> But I'll bet there's an easy way to this this that I'm not aware of.
>
> What is the easiest way to create a stretchable or zoomable box with
> rounded
> corners.
>
> MTIA,
>
> Rocky
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>

From rockysmolin at bchacc.com  Tue Jun 14 16:15:07 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 14 Jun 2016 14:15:07 -0700
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>
	<CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com>
Message-ID: <4FB35B05AF7C42819A7D12E25F6CAB16@HAL9007>

thanks.  will try that.

r 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
David McAfee
Sent: Tuesday, June 14, 2016 10:16 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Need rectangle with rounded corners

You can make a rounded rectangle in Paint and save it as a bmp file.
The only thing is paint doesn't allow for transparent cells (or at least I
don't know how to do that), so you'll have to make sure the form/report's
background is white, or the corners of the bmp file have to be colored to
match the form/report background color.

I used to love MS Draw form making my own shapes / buttons.

D


On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin <rockysmolin at bchacc.com>
wrote:

> Dear List:
>
> I have a requirement from a client for a purchase order where they 
> want the Vendor, Bill To, and Ship To info in a rectangle with rounded
corners.
>
> Been trying to make one that will stretch with no luck.  Not an image 
> off the web.
>
> But I'll bet there's an easy way to this this that I'm not aware of.
>
> What is the easiest way to create a stretchable or zoomable box with 
> rounded corners.
>
> MTIA,
>
> Rocky
>
> --
> 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


From rockysmolin at bchacc.com  Tue Jun 14 16:18:31 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 14 Jun 2016 14:18:31 -0700
Subject: [AccessD] CompTIA-IT Certification Career Advancement Bundle
Message-ID: <2488DB3E585A4DC59C33330E6C176EE1@HAL9007>

Does anyone know this outfit and have an opinion?
 
http://tinyurl.com/gwovpfk
 
TIA
 
Rocky
 

From stuart at lexacorp.com.pg  Tue Jun 14 17:10:45 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 15 Jun 2016 08:10:45 +1000
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>,
	<CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com>
Message-ID: <576080E5.345.151EE5@stuart.lexacorp.com.pg>

You can also do it it Irfanview - and have transparent cells.

-- 
Stuart

On 14 Jun 2016 at 10:16, David McAfee wrote:

> You can make a rounded rectangle in Paint and save it as a bmp file.
> The only thing is paint doesn't allow for transparent cells (or at
> least I don't know how to do that), so you'll have to make sure the
> form/report's background is white, or the corners of the bmp file have
> to be colored to match the form/report background color.
> 
> I used to love MS Draw form making my own shapes / buttons.
> 
> D
> 
> 
> On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin
> <rockysmolin at bchacc.com> wrote:
> 
> > Dear List:
> >
> > I have a requirement from a client for a purchase order where they
> > want the Vendor, Bill To, and Ship To info in a rectangle with
> > rounded corners.
> >
> > Been trying to make one that will stretch with no luck.  Not an
> > image off the web.
> >
> > But I'll bet there's an easy way to this this that I'm not aware of.
> >
> > What is the easiest way to create a stretchable or zoomable box with
> > rounded corners.
> >
> > MTIA,
> >
> > Rocky
> >
> > --
> > 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
> 



From paul.hartland at googlemail.com  Tue Jun 14 18:42:04 2016
From: paul.hartland at googlemail.com (Paul Hartland)
Date: Wed, 15 Jun 2016 00:42:04 +0100
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <4FB35B05AF7C42819A7D12E25F6CAB16@HAL9007>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>
	<CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com>
	<4FB35B05AF7C42819A7D12E25F6CAB16@HAL9007>
Message-ID: <CALGJE96S=GvdtvsRXwTXeNycG+yVvm=OLzvZgfgE+3GqFtnPjQ@mail.gmail.com>

If that would work for you, download a free product called gimp, you can
use transparency with that if makes it easier for you
On 14 Jun 2016 22:16, "Rocky Smolin" <rockysmolin at bchacc.com> wrote:

> thanks.  will try that.
>
> r
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> David McAfee
> Sent: Tuesday, June 14, 2016 10:16 AM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Need rectangle with rounded corners
>
> You can make a rounded rectangle in Paint and save it as a bmp file.
> The only thing is paint doesn't allow for transparent cells (or at least I
> don't know how to do that), so you'll have to make sure the form/report's
> background is white, or the corners of the bmp file have to be colored to
> match the form/report background color.
>
> I used to love MS Draw form making my own shapes / buttons.
>
> D
>
>
> On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin <rockysmolin at bchacc.com>
> wrote:
>
> > Dear List:
> >
> > I have a requirement from a client for a purchase order where they
> > want the Vendor, Bill To, and Ship To info in a rectangle with rounded
> corners.
> >
> > Been trying to make one that will stretch with no luck.  Not an image
> > off the web.
> >
> > But I'll bet there's an easy way to this this that I'm not aware of.
> >
> > What is the easiest way to create a stretchable or zoomable box with
> > rounded corners.
> >
> > MTIA,
> >
> > Rocky
> >
> > --
> > 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
>

From rockysmolin at bchacc.com  Tue Jun 14 18:50:16 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 14 Jun 2016 16:50:16 -0700
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <576080E5.345.151EE5@stuart.lexacorp.com.pg>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>,
	<CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com>
	<576080E5.345.151EE5@stuart.lexacorp.com.pg>
Message-ID: <12B3FDCB24B94FD9A8BED39E0BA931C1@HAL9007>

My MS Paint isn't working but I have Irfan and tried it but couldn't see how
to draw the figure and get it into the Access report so that it is
stretchable.  There don't seem to be any tools like you have in Word.

r

 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Tuesday, June 14, 2016 3:11 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Need rectangle with rounded corners

You can also do it it Irfanview - and have transparent cells.

--
Stuart

On 14 Jun 2016 at 10:16, David McAfee wrote:

> You can make a rounded rectangle in Paint and save it as a bmp file.
> The only thing is paint doesn't allow for transparent cells (or at 
> least I don't know how to do that), so you'll have to make sure the 
> form/report's background is white, or the corners of the bmp file have 
> to be colored to match the form/report background color.
> 
> I used to love MS Draw form making my own shapes / buttons.
> 
> D
> 
> 
> On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin 
> <rockysmolin at bchacc.com> wrote:
> 
> > Dear List:
> >
> > I have a requirement from a client for a purchase order where they 
> > want the Vendor, Bill To, and Ship To info in a rectangle with 
> > rounded corners.
> >
> > Been trying to make one that will stretch with no luck.  Not an 
> > image off the web.
> >
> > But I'll bet there's an easy way to this this that I'm not aware of.
> >
> > What is the easiest way to create a stretchable or zoomable box with 
> > rounded corners.
> >
> > MTIA,
> >
> > Rocky
> >
> > --
> > 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


From rockysmolin at bchacc.com  Tue Jun 14 19:08:37 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 14 Jun 2016 17:08:37 -0700
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <CALGJE96S=GvdtvsRXwTXeNycG+yVvm=OLzvZgfgE+3GqFtnPjQ@mail.gmail.com>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007><CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com><4FB35B05AF7C42819A7D12E25F6CAB16@HAL9007>
	<CALGJE96S=GvdtvsRXwTXeNycG+yVvm=OLzvZgfgE+3GqFtnPjQ@mail.gmail.com>
Message-ID: <62D732DEE1B3494D8B23425540F86DDB@HAL9007>

Lot of stuff in that GIMP, but not too intuitive. :)

Thx.  Will play.

r
 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Paul Hartland
Sent: Tuesday, June 14, 2016 4:42 PM
To: Access List
Subject: Re: [AccessD] Need rectangle with rounded corners

If that would work for you, download a free product called gimp, you can use
transparency with that if makes it easier for you On 14 Jun 2016 22:16,
"Rocky Smolin" <rockysmolin at bchacc.com> wrote:

> thanks.  will try that.
>
> r
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf 
> Of David McAfee
> Sent: Tuesday, June 14, 2016 10:16 AM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Need rectangle with rounded corners
>
> You can make a rounded rectangle in Paint and save it as a bmp file.
> The only thing is paint doesn't allow for transparent cells (or at 
> least I don't know how to do that), so you'll have to make sure the 
> form/report's background is white, or the corners of the bmp file have 
> to be colored to match the form/report background color.
>
> I used to love MS Draw form making my own shapes / buttons.
>
> D
>
>
> On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin 
> <rockysmolin at bchacc.com>
> wrote:
>
> > Dear List:
> >
> > I have a requirement from a client for a purchase order where they 
> > want the Vendor, Bill To, and Ship To info in a rectangle with 
> > rounded
> corners.
> >
> > Been trying to make one that will stretch with no luck.  Not an 
> > image off the web.
> >
> > But I'll bet there's an easy way to this this that I'm not aware of.
> >
> > What is the easiest way to create a stretchable or zoomable box with 
> > rounded corners.
> >
> > MTIA,
> >
> > Rocky
> >
> > --
> > 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
>
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From stuart at lexacorp.com.pg  Tue Jun 14 19:34:23 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 15 Jun 2016 10:34:23 +1000
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <576080E5.345.151EE5@stuart.lexacorp.com.pg>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>,
	<CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com>,
	<576080E5.345.151EE5@stuart.lexacorp.com.pg>
Message-ID: <5760A28F.29659.98A076@stuart.lexacorp.com.pg>

Darn it!  Irfan doesn't do rounded rectangle :(

But at least you could draw it in Word and then doing a screen cap with Irfanview :)

On 15 Jun 2016 at 8:10, Stuart McLachlan wrote:

> You can also do it it Irfanview - and have transparent cells.
> 
> -- 
> Stuart
> 
> On 14 Jun 2016 at 10:16, David McAfee wrote:
> 
> > You can make a rounded rectangle in Paint and save it as a bmp file.
> > The only thing is paint doesn't allow for transparent cells (or at
> > least I don't know how to do that), so you'll have to make sure the
> > form/report's background is white, or the corners of the bmp file
> > have to be colored to match the form/report background color.
> > 
> > I used to love MS Draw form making my own shapes / buttons.
> > 
> > D
> > 
> > 
> > On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin
> > <rockysmolin at bchacc.com> wrote:
> > 
> > > Dear List:
> > >
> > > I have a requirement from a client for a purchase order where they
> > > want the Vendor, Bill To, and Ship To info in a rectangle with
> > > rounded corners.
> > >
> > > Been trying to make one that will stretch with no luck.  Not an
> > > image off the web.
> > >
> > > But I'll bet there's an easy way to this this that I'm not aware
> > > of.
> > >
> > > What is the easiest way to create a stretchable or zoomable box
> > > with rounded corners.
> > >
> > > MTIA,
> > >
> > > Rocky
> > >
> > > --
> > > 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
> 



From stuart at lexacorp.com.pg  Tue Jun 14 19:50:30 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 15 Jun 2016 10:50:30 +1000
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <12B3FDCB24B94FD9A8BED39E0BA931C1@HAL9007>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>,
	<576080E5.345.151EE5@stuart.lexacorp.com.pg>,
	<12B3FDCB24B94FD9A8BED39E0BA931C1@HAL9007>
Message-ID: <5760A656.11377.A75F90@stuart.lexacorp.com.pg>

Word uses Vector graphics.  Paint, Irfanview etc work with Bitmaps.



On 14 Jun 2016 at 16:50, Rocky Smolin wrote:

> My MS Paint isn't working but I have Irfan and tried it but couldn't
> see how to draw the figure and get it into the Access report so that
> it is stretchable.  There don't seem to be any tools like you have in
> Word.
> 
> r
> 
> 
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Stuart McLachlan Sent: Tuesday, June 14, 2016 3:11 PM To: Access
> Developers discussion and problem solving Subject: Re: [AccessD] Need
> rectangle with rounded corners
> 
> You can also do it it Irfanview - and have transparent cells.
> 
> --
> Stuart
> 
> On 14 Jun 2016 at 10:16, David McAfee wrote:
> 
> > You can make a rounded rectangle in Paint and save it as a bmp file.
> > The only thing is paint doesn't allow for transparent cells (or at
> > least I don't know how to do that), so you'll have to make sure the
> > form/report's background is white, or the corners of the bmp file
> > have to be colored to match the form/report background color.
> > 
> > I used to love MS Draw form making my own shapes / buttons.
> > 
> > D
> > 
> > 
> > On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin 
> > <rockysmolin at bchacc.com> wrote:
> > 
> > > Dear List:
> > >
> > > I have a requirement from a client for a purchase order where they
> > > want the Vendor, Bill To, and Ship To info in a rectangle with
> > > rounded corners.
> > >
> > > Been trying to make one that will stretch with no luck.  Not an
> > > image off the web.
> > >
> > > But I'll bet there's an easy way to this this that I'm not aware
> > > of.
> > >
> > > What is the easiest way to create a stretchable or zoomable box
> > > with rounded corners.
> > >
> > > MTIA,
> > >
> > > Rocky
> > >
> > > --
> > > 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
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 



From stuart at lexacorp.com.pg  Tue Jun 14 19:55:43 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Wed, 15 Jun 2016 10:55:43 +1000
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <62D732DEE1B3494D8B23425540F86DDB@HAL9007>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>,
	<CALGJE96S=GvdtvsRXwTXeNycG+yVvm=OLzvZgfgE+3GqFtnPjQ@mail.gmail.com>,
	<62D732DEE1B3494D8B23425540F86DDB@HAL9007>
Message-ID: <5760A78F.5867.AC2889@stuart.lexacorp.com.pg>

Just experimented and this works:

Open a word document,  Go to "Insert - Shapes".
Draw your shape hit Ctrl+C (Copy)
Switch to your report in Design and View and hit Ctrl+P (Paste)

Voila!

Note that this actually copies as a bitmap  so make the original as large as possibe and 
shrink it to size in Access to avoid excess "jaggies".




On 14 Jun 2016 at 17:08, Rocky Smolin wrote:

> Lot of stuff in that GIMP, but not too intuitive. :)
> 
> Thx.  Will play.
> 
> r
> 
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Paul Hartland Sent: Tuesday, June 14, 2016 4:42 PM To: Access List
> Subject: Re: [AccessD] Need rectangle with rounded corners
> 
> If that would work for you, download a free product called gimp, you
> can use transparency with that if makes it easier for you On 14 Jun
> 2016 22:16, "Rocky Smolin" <rockysmolin at bchacc.com> wrote:
> 
> > thanks.  will try that.
> >
> > r
> >
> > -----Original Message-----
> > From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On
> > Behalf Of David McAfee Sent: Tuesday, June 14, 2016 10:16 AM To:
> > Access Developers discussion and problem solving Subject: Re:
> > [AccessD] Need rectangle with rounded corners
> >
> > You can make a rounded rectangle in Paint and save it as a bmp file.
> > The only thing is paint doesn't allow for transparent cells (or at
> > least I don't know how to do that), so you'll have to make sure the
> > form/report's background is white, or the corners of the bmp file
> > have to be colored to match the form/report background color.
> >
> > I used to love MS Draw form making my own shapes / buttons.
> >
> > D
> >
> >
> > On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin 
> > <rockysmolin at bchacc.com>
> > wrote:
> >
> > > Dear List:
> > >
> > > I have a requirement from a client for a purchase order where they
> > > want the Vendor, Bill To, and Ship To info in a rectangle with
> > > rounded
> > corners.
> > >
> > > Been trying to make one that will stretch with no luck.  Not an
> > > image off the web.
> > >
> > > But I'll bet there's an easy way to this this that I'm not aware
> > > of.
> > >
> > > What is the easiest way to create a stretchable or zoomable box
> > > with rounded corners.
> > >
> > > MTIA,
> > >
> > > Rocky
> > >
> > > --
> > > 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
> >
> --
> 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
> 



From davidmcafee at gmail.com  Tue Jun 14 23:31:27 2016
From: davidmcafee at gmail.com (David McAfee)
Date: Tue, 14 Jun 2016 21:31:27 -0700
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <12B3FDCB24B94FD9A8BED39E0BA931C1@HAL9007>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>
	<CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com>
	<576080E5.345.151EE5@stuart.lexacorp.com.pg>
	<12B3FDCB24B94FD9A8BED39E0BA931C1@HAL9007>
Message-ID: <CAMhYZWbA+uO=o=9KfnAmDAJaRR-zfnAPJ+tQ65BzObn72v_Z6A@mail.gmail.com>

What didn't work with paint?

I was able to put one on a form
On Jun 14, 2016 4:51 PM, "Rocky Smolin" <rockysmolin at bchacc.com> wrote:

> My MS Paint isn't working but I have Irfan and tried it but couldn't see
> how
> to draw the figure and get it into the Access report so that it is
> stretchable.  There don't seem to be any tools like you have in Word.
>
> r
>
>
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> Stuart McLachlan
> Sent: Tuesday, June 14, 2016 3:11 PM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Need rectangle with rounded corners
>
> You can also do it it Irfanview - and have transparent cells.
>
> --
> Stuart
>
> On 14 Jun 2016 at 10:16, David McAfee wrote:
>
> > You can make a rounded rectangle in Paint and save it as a bmp file.
> > The only thing is paint doesn't allow for transparent cells (or at
> > least I don't know how to do that), so you'll have to make sure the
> > form/report's background is white, or the corners of the bmp file have
> > to be colored to match the form/report background color.
> >
> > I used to love MS Draw form making my own shapes / buttons.
> >
> > D
> >
> >
> > On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin
> > <rockysmolin at bchacc.com> wrote:
> >
> > > Dear List:
> > >
> > > I have a requirement from a client for a purchase order where they
> > > want the Vendor, Bill To, and Ship To info in a rectangle with
> > > rounded corners.
> > >
> > > Been trying to make one that will stretch with no luck.  Not an
> > > image off the web.
> > >
> > > But I'll bet there's an easy way to this this that I'm not aware of.
> > >
> > > What is the easiest way to create a stretchable or zoomable box with
> > > rounded corners.
> > >
> > > MTIA,
> > >
> > > Rocky
> > >
> > > --
> > > 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
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>

From rockysmolin at bchacc.com  Wed Jun 15 00:24:21 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 14 Jun 2016 22:24:21 -0700
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <CAMhYZWbA+uO=o=9KfnAmDAJaRR-zfnAPJ+tQ65BzObn72v_Z6A@mail.gmail.com>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007><CAMhYZWYwAmoMKY7a1yFWLNCWLEFACPtw39K3BPVr2WwRTtM52w@mail.gmail.com><576080E5.345.151EE5@stuart.lexacorp.com.pg><12B3FDCB24B94FD9A8BED39E0BA931C1@HAL9007>
	<CAMhYZWbA+uO=o=9KfnAmDAJaRR-zfnAPJ+tQ65BzObn72v_Z6A@mail.gmail.com>
Message-ID: <2202FF50156949EAB5FF696B2ECC69FD@HAL9007>

Trying to start it from in the folder.  Just tried it from the search and
that worked.

r
 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
David McAfee
Sent: Tuesday, June 14, 2016 9:31 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Need rectangle with rounded corners

What didn't work with paint?

I was able to put one on a form
On Jun 14, 2016 4:51 PM, "Rocky Smolin" <rockysmolin at bchacc.com> wrote:

> My MS Paint isn't working but I have Irfan and tried it but couldn't 
> see how to draw the figure and get it into the Access report so that 
> it is stretchable.  There don't seem to be any tools like you have in 
> Word.
>
> r
>
>
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf 
> Of Stuart McLachlan
> Sent: Tuesday, June 14, 2016 3:11 PM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Need rectangle with rounded corners
>
> You can also do it it Irfanview - and have transparent cells.
>
> --
> Stuart
>
> On 14 Jun 2016 at 10:16, David McAfee wrote:
>
> > You can make a rounded rectangle in Paint and save it as a bmp file.
> > The only thing is paint doesn't allow for transparent cells (or at 
> > least I don't know how to do that), so you'll have to make sure the 
> > form/report's background is white, or the corners of the bmp file 
> > have to be colored to match the form/report background color.
> >
> > I used to love MS Draw form making my own shapes / buttons.
> >
> > D
> >
> >
> > On Tue, Jun 14, 2016 at 10:00 AM, Rocky Smolin 
> > <rockysmolin at bchacc.com> wrote:
> >
> > > Dear List:
> > >
> > > I have a requirement from a client for a purchase order where they 
> > > want the Vendor, Bill To, and Ship To info in a rectangle with 
> > > rounded corners.
> > >
> > > Been trying to make one that will stretch with no luck.  Not an 
> > > image off the web.
> > >
> > > But I'll bet there's an easy way to this this that I'm not aware of.
> > >
> > > What is the easiest way to create a stretchable or zoomable box 
> > > with rounded corners.
> > >
> > > MTIA,
> > >
> > > Rocky
> > >
> > > --
> > > 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
>
> --
> 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


From gustav at cactus.dk  Wed Jun 15 01:12:05 2016
From: gustav at cactus.dk (Gustav Brock)
Date: Wed, 15 Jun 2016 06:12:05 +0000
Subject: [AccessD] Need rectangle with rounded corners
Message-ID: <DB6PR0601MB219832FF88AD39CBB1C3A9A5CA550@DB6PR0601MB2198.eurprd06.prod.outlook.com>

Hi Rocky

Alternatively, tell the client that rounded corners is so much yesterday that he doesn't really want it.

/gustav

-----Oprindelig meddelelse-----
Fra: AccessD [mailto:accessd-bounces at databaseadvisors.com] P? vegne af Rocky Smolin
Sendt: 14. juni 2016 19:00
Til: 'Access Developers discussion and problem solving' <accessd at databaseadvisors.com>
Emne: [AccessD] Need rectangle with rounded corners

Dear List:
 
I have a requirement from a client for a purchase order where they want the Vendor, Bill To, and Ship To info in a rectangle with rounded corners.
 
Been trying to make one that will stretch with no luck.  Not an image off the web.
 
But I'll bet there's an easy way to this this that I'm not aware of.
 
What is the easiest way to create a stretchable or zoomable box with rounded corners.
 
MTIA,
 
Rocky 


From darryl at whittleconsulting.com.au  Wed Jun 15 01:21:10 2016
From: darryl at whittleconsulting.com.au (Darryl Collins)
Date: Wed, 15 Jun 2016 06:21:10 +0000
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <DB6PR0601MB219832FF88AD39CBB1C3A9A5CA550@DB6PR0601MB2198.eurprd06.prod.outlook.com>
References: <DB6PR0601MB219832FF88AD39CBB1C3A9A5CA550@DB6PR0601MB2198.eurprd06.prod.outlook.com>
Message-ID: <ME1PR01MB05805FC0D477583508E6A60BFC550@ME1PR01MB0580.ausprd01.prod.outlook.com>

Haha... Yes, given the new square flat look that is currently all the rage in UI design you might just get away with that.  

I see that the use of drop shadows are largely pass? as well.

Finally make sure you colour everything with your 'My Little Pony" pastel set and make nothing black. 
Only shades of grey.  Probably about 50 of them would be about right. ;)

cheers
Darryl

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock
Sent: 15 June, 2016 4:12 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Need rectangle with rounded corners

Hi Rocky

Alternatively, tell the client that rounded corners is so much yesterday that he doesn't really want it.

/gustav

-----Oprindelig meddelelse-----
Fra: AccessD [mailto:accessd-bounces at databaseadvisors.com] P? vegne af Rocky Smolin
Sendt: 14. juni 2016 19:00
Til: 'Access Developers discussion and problem solving' <accessd at databaseadvisors.com>
Emne: [AccessD] Need rectangle with rounded corners

Dear List:
 
I have a requirement from a client for a purchase order where they want the Vendor, Bill To, and Ship To info in a rectangle with rounded corners.
 
Been trying to make one that will stretch with no luck.  Not an image off the web.
 
But I'll bet there's an easy way to this this that I'm not aware of.
 
What is the easiest way to create a stretchable or zoomable box with rounded corners.
 
MTIA,
 
Rocky 

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From ewaldt at gdls.com  Wed Jun 15 05:29:29 2016
From: ewaldt at gdls.com (ewaldt at gdls.com)
Date: Wed, 15 Jun 2016 06:29:29 -0400
Subject: [AccessD] Data Macros Unavailable
In-Reply-To: <mailman.3952.1465952171.9929.accessd@databaseadvisors.com>
References: <mailman.3952.1465952171.9929.accessd@databaseadvisors.com>
Message-ID: <OF314471E8.5738D77F-ON85257FD3.00394798-85257FD3.0039A181@gdls.com>

Aha! You nailed it, Stuart!  Thanks! I always like to turn that off, but 
the app in which the data macros were more available was a "junk" database 
(actually named Junk.accdb) for experimenting, and somehow I'd not done so 
in that one. Thanks, again, Stuart. That's exactly what I was looking for 
- I just wanted to understand it.

Tom Ewald
Mass Properties
General Dynamics Land Systems


Date: Wed, 08 Jun 2016 22:29:24 +1000
Subject: Re: [AccessD] Data Macros Unavailable

The difference between your applications is the state of the checkbox:

File - Options - Current Database - Enable Design Changes For Tables in 
Datasheet View.

-- 
Stuart

----------------------------------------------------------------------
This is an e-mail from General Dynamics Land Systems. It is for the intended recipient only and may contain confidential and privileged information.  No one else may read, print, store, copy, forward or act in reliance on it or its attachments.  If you are not the intended recipient, please return this message to the sender and delete the message and any attachments from your computer. Your cooperation is appreciated.
&&

From rockysmolin at bchacc.com  Wed Jun 15 11:13:49 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Wed, 15 Jun 2016 09:13:49 -0700
Subject: [AccessD] Microsoft's June Patch Tuesday features 16 bulletins,
	five rated critical
Message-ID: <182A395C8913434FBF174F66967AE592@HAL9007>

FYI
 
http://tinyurl.com/zas76hd
 
Rocky
 

From marksimms at verizon.net  Wed Jun 15 13:19:35 2016
From: marksimms at verizon.net (Mark Simms)
Date: Wed, 15 Jun 2016 14:19:35 -0400
Subject: [AccessD] Microsoft's June Patch Tuesday features 16 bulletins,
	five rated critical
In-Reply-To: <182A395C8913434FBF174F66967AE592@HAL9007>
References: <182A395C8913434FBF174F66967AE592@HAL9007>
Message-ID: <015901d1c732$78f269e0$6ad73da0$@net>

So many numbers....which one is the Office-related one ?

Were the Office bugs FUNCTIONAL or just SECURITY related ?

Man, Microsoft just loves to hide their dirty laundry.

> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Rocky Smolin
> Sent: Wednesday, June 15, 2016 12:14 PM
> To: 'Access Developers discussion and problem solving'; 'Off Topic'
> Subject: [AccessD] Microsoft's June Patch Tuesday features 16
> bulletins, five rated critical
>
> FYI
>
> http://tinyurl.com/zas76hd
>
> Rocky
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com



From accessd at gfconsultants.com  Wed Jun 15 14:30:09 2016
From: accessd at gfconsultants.com (AccessD)
Date: Wed, 15 Jun 2016 15:30:09 -0400
Subject: [AccessD] Access 2000 Runtime
Message-ID: <001b01d1c73c$548bd370$fda37a50$@gfconsultants.com>

Hey, All.  I'm not around much as I'm slowly leaving Access, but I could use
some help.

I need a mde made for an Access 2000 app.
Unfortunately, I know longer have a computer capable of creating it as my
Win 7 with XP mode just went down about 2 months ago.
Anyone still have Access 2000 Developer installed that could make a mde for
me if I send the mdb?

Thanks.






From rockysmolin at bchacc.com  Wed Jun 15 14:37:39 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Wed, 15 Jun 2016 12:37:39 -0700
Subject: [AccessD] Access 2000 Runtime
In-Reply-To: <001b01d1c73c$548bd370$fda37a50$@gfconsultants.com>
References: <001b01d1c73c$548bd370$fda37a50$@gfconsultants.com>
Message-ID: <3FE195EA5DDB44D2950EA2926670D9F8@HAL9007>

I have A2003 and would be happy to make your mde with that if that will work
in the absence of A2000.

Rocky


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
AccessD
Sent: Wednesday, June 15, 2016 12:30 PM
To: accessd at databaseadvisors.com
Subject: [AccessD] Access 2000 Runtime

Hey, All.  I'm not around much as I'm slowly leaving Access, but I could use
some help.

I need a mde made for an Access 2000 app.
Unfortunately, I know longer have a computer capable of creating it as my
Win 7 with XP mode just went down about 2 months ago.
Anyone still have Access 2000 Developer installed that could make a mde for
me if I send the mdb?

Thanks.





--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From jimdettman at verizon.net  Wed Jun 15 15:37:04 2016
From: jimdettman at verizon.net (Jim Dettman)
Date: Wed, 15 Jun 2016 16:37:04 -0400
Subject: [AccessD] Access 2000 Runtime
In-Reply-To: <001b01d1c73c$548bd370$fda37a50$@gfconsultants.com>
References: <001b01d1c73c$548bd370$fda37a50$@gfconsultants.com>
Message-ID: <916C17D7DEF44482AFE6437597BCE0A6@XPS>


 Can do here.

Jim. 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
AccessD
Sent: Wednesday, June 15, 2016 03:30 PM
To: accessd at databaseadvisors.com
Subject: [AccessD] Access 2000 Runtime

Hey, All.  I'm not around much as I'm slowly leaving Access, but I could use
some help.

I need a mde made for an Access 2000 app.
Unfortunately, I know longer have a computer capable of creating it as my
Win 7 with XP mode just went down about 2 months ago.
Anyone still have Access 2000 Developer installed that could make a mde for
me if I send the mdb?

Thanks.





-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From bensonforums at gmail.com  Thu Jun 16 20:30:40 2016
From: bensonforums at gmail.com (Bill Benson)
Date: Thu, 16 Jun 2016 21:30:40 -0400
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>
Message-ID: <CAJLzs_25bHFAjRAc871GTmH4FS3DgjEu0Z-+qHDYvLFpGs4Eqg@mail.gmail.com>

Maybe try 8 "corner-builder" shapes that can be overlaid on top of the
original rectangle (the shape most sent to back), The outer corners
(squares) would be white interior with no border, The inner portion of the
corner would be quarter-arcs with the same border color as the rectangle,
brought to front.

On Tue, Jun 14, 2016 at 1:00 PM, Rocky Smolin <rockysmolin at bchacc.com>
wrote:

> Dear List:
>
> I have a requirement from a client for a purchase order where they want the
> Vendor, Bill To, and Ship To info in a rectangle with rounded corners.
>
> Been trying to make one that will stretch with no luck.  Not an image off
> the web.
>
> But I'll bet there's an easy way to this this that I'm not aware of.
>
> What is the easiest way to create a stretchable or zoomable box with
> rounded
> corners.
>
> MTIA,
>
> Rocky
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>

From rockysmolin at bchacc.com  Fri Jun 17 01:03:57 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Thu, 16 Jun 2016 23:03:57 -0700
Subject: [AccessD] Need rectangle with rounded corners
In-Reply-To: <CAJLzs_25bHFAjRAc871GTmH4FS3DgjEu0Z-+qHDYvLFpGs4Eqg@mail.gmail.com>
References: <363A650FBAAA40DA911FF304EDA251F0@HAL9007>
	<CAJLzs_25bHFAjRAc871GTmH4FS3DgjEu0Z-+qHDYvLFpGs4Eqg@mail.gmail.com>
Message-ID: <A731C4B7669E48F18C932DD09691DBB4@HAL9007>

I fudged it by creating one in word and copying it over using Lightshot -
great screen cap program, btw (https://app.prntscr.com/en/index.html).  Just
gave the client the First Look and didn't get any push back on the graphic
so I think it's gonna be OK.

Thx.

r 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Bill Benson
Sent: Thursday, June 16, 2016 6:31 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Need rectangle with rounded corners

Maybe try 8 "corner-builder" shapes that can be overlaid on top of the
original rectangle (the shape most sent to back), The outer corners
(squares) would be white interior with no border, The inner portion of the
corner would be quarter-arcs with the same border color as the rectangle,
brought to front.

On Tue, Jun 14, 2016 at 1:00 PM, Rocky Smolin <rockysmolin at bchacc.com>
wrote:

> Dear List:
>
> I have a requirement from a client for a purchase order where they 
> want the Vendor, Bill To, and Ship To info in a rectangle with rounded
corners.
>
> Been trying to make one that will stretch with no luck.  Not an image 
> off the web.
>
> But I'll bet there's an easy way to this this that I'm not aware of.
>
> What is the easiest way to create a stretchable or zoomable box with 
> rounded corners.
>
> MTIA,
>
> Rocky
>
> --
> 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


From gustav at cactus.dk  Fri Jun 17 13:52:56 2016
From: gustav at cactus.dk (Gustav Brock)
Date: Fri, 17 Jun 2016 18:52:56 +0000
Subject: [AccessD] vbTrue vbFalse
Message-ID: <DB6PR0601MB21981F4ADF17114AA0218191CA570@DB6PR0601MB2198.eurprd06.prod.outlook.com>

Hi all

I discovered these new constants:

https://msdn.microsoft.com/en-us/library/office/gg278431(v=office.15).aspx

There is also a vbUseDefault.

Where/how would you use those?

/gustav

From bensonforums at gmail.com  Fri Jun 17 16:19:39 2016
From: bensonforums at gmail.com (Bill Benson)
Date: Fri, 17 Jun 2016 17:19:39 -0400
Subject: [AccessD] vbTrue vbFalse
In-Reply-To: <DB6PR0601MB21981F4ADF17114AA0218191CA570@DB6PR0601MB2198.eurprd06.prod.outlook.com>
References: <DB6PR0601MB21981F4ADF17114AA0218191CA570@DB6PR0601MB2198.eurprd06.prod.outlook.com>
Message-ID: <CAJLzs_0k-Df3RCmBzh35zT5-FAuaR0DHQMA3+bODiPasrwx0sQ@mail.gmail.com>

Looks applicable to the FormatNumber function in Access VBA?

https://support.office.com/en-us/article/FormatNumber-Function-91030eab-2887-43d4-9c17-311ab6ebf43b?ui=en-US&rs=en-US&ad=US&fromAR=1


On Fri, Jun 17, 2016 at 2:52 PM, Gustav Brock <gustav at cactus.dk> wrote:

> Hi all
>
> I discovered these new constants:
>
> https://msdn.microsoft.com/en-us/library/office/gg278431(v=office.15).aspx
>
> There is also a vbUseDefault.
>
> Where/how would you use those?
>
> /gustav
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>

From stuart at lexacorp.com.pg  Fri Jun 17 17:31:42 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Sat, 18 Jun 2016 08:31:42 +1000
Subject: [AccessD] vbTrue vbFalse
In-Reply-To: <DB6PR0601MB21981F4ADF17114AA0218191CA570@DB6PR0601MB2198.eurprd06.prod.outlook.com>
References: <DB6PR0601MB21981F4ADF17114AA0218191CA570@DB6PR0601MB2198.eurprd06.prod.outlook.com>
Message-ID: <57647A4E.12123.F9B6078@stuart.lexacorp.com.pg>

They are intended for use whereever there is a tri-state possibility (i.e. true/false/not stated).

Commonly used with TriState checkboxes and various Format functions.
  

And they are not new - they're described in the Getz/Gilbert VBA Handbook (circa 2000)


On 17 Jun 2016 at 18:52, Gustav Brock wrote:

> Hi all
> 
> I discovered these new constants:
> 
> https://msdn.microsoft.com/en-us/library/office/gg278431(v=office.15).
> aspx
> 
> There is also a vbUseDefault.
> 
> Where/how would you use those?
> 
> /gustav
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 



From rockysmolin at bchacc.com  Sat Jun 18 07:40:53 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sat, 18 Jun 2016 05:40:53 -0700
Subject: [AccessD] Vertical line in detail section
Message-ID: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>

Dear List:
 
I have a client who wants vertical lines in the detail section between data
fields.  This is no problem when the detail section is a fixed height. I've
done lots of those before - just make the vertical line the exact height of
the detail section and you get a nice continuous vertical line wherever you
want it on the report.
 
Problem in this case is that there are "Can Grow" fields in the detail
section which makes the detail height different for each detail line.
 
I put a MsgBox Me.Detail.Height in the Format, Retreat and Print events to
see if I could find out how high the section was but it always comes up with
the original design height, not the height of the detail section with the
expanded "Can Grow" text boxes.
 
So is there a way to know the height of the detail section at a point where
I could still adjust the vertical line height to fill the section?
 
MTIA
 
Rocky Smolin
Beach Access Software
760-683-5777
www.bchacc.com <http://www.bchacc.com/> 
www.e-z-mrp.com <http://www.e-z-mrp.com/> 
Skype: rocky.smolin
 

From stuart at lexacorp.com.pg  Sat Jun 18 08:16:54 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Sat, 18 Jun 2016 23:16:54 +1000
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
Message-ID: <576549C6.29742.12C5CF52@stuart.lexacorp.com.pg>

I've got some code to do it somewhere.  I'll try to locate it.


On 18 Jun 2016 at 5:40, Rocky Smolin wrote:

> Dear List:
> 
> I have a client who wants vertical lines in the detail section between
> data fields.  This is no problem when the detail section is a fixed
> height. I've done lots of those before - just make the vertical line
> the exact height of the detail section and you get a nice continuous
> vertical line wherever you want it on the report.
> 
> Problem in this case is that there are "Can Grow" fields in the detail
> section which makes the detail height different for each detail line.
> 
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print
> events to see if I could find out how high the section was but it
> always comes up with the original design height, not the height of the
> detail section with the expanded "Can Grow" text boxes.
> 
> So is there a way to know the height of the detail section at a point
> where I could still adjust the vertical line height to fill the
> section?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> 
> www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> Skype: rocky.smolin
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 



From stuart at lexacorp.com.pg  Sat Jun 18 08:31:01 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Sat, 18 Jun 2016 23:31:01 +1000
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
Message-ID: <57654D15.24882.12D2B9EE@stuart.lexacorp.com.pg>

Don't use a Line control.  Use  Me.Line (X, 0)-(X, Y)  in the Detail_Print

Set Y to 22 inches or the equivalent number in cms, twips, pixels depending on how you 
Scale your report.  (i.e. maximum possible size).  The detail will NOT be expanded to the full 
line length - the line will be truncated to the length of the detail.

-- 
Stuart




On 18 Jun 2016 at 5:40, Rocky Smolin wrote:

> Dear List:
> 
> I have a client who wants vertical lines in the detail section between
> data fields.  This is no problem when the detail section is a fixed
> height. I've done lots of those before - just make the vertical line
> the exact height of the detail section and you get a nice continuous
> vertical line wherever you want it on the report.
> 
> Problem in this case is that there are "Can Grow" fields in the detail
> section which makes the detail height different for each detail line.
> 
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print
> events to see if I could find out how high the section was but it
> always comes up with the original design height, not the height of the
> detail section with the expanded "Can Grow" text boxes.
> 
> So is there a way to know the height of the detail section at a point
> where I could still adjust the vertical line height to fill the
> section?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> 
> www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> Skype: rocky.smolin
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 



From rockysmolin at bchacc.com  Sat Jun 18 09:14:55 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sat, 18 Jun 2016 07:14:55 -0700
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <576549C6.29742.12C5CF52@stuart.lexacorp.com.pg>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
	<576549C6.29742.12C5CF52@stuart.lexacorp.com.pg>
Message-ID: <8684B02AC9454E4EBB4D65B94E4FA865@HAL9007>

That would be wonderful.  I don't know why this is so important to this
client but he's insisting on it.

Thanks

r 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Saturday, June 18, 2016 6:17 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Vertical line in detail section

I've got some code to do it somewhere.  I'll try to locate it.


On 18 Jun 2016 at 5:40, Rocky Smolin wrote:

> Dear List:
> 
> I have a client who wants vertical lines in the detail section between 
> data fields.  This is no problem when the detail section is a fixed 
> height. I've done lots of those before - just make the vertical line 
> the exact height of the detail section and you get a nice continuous 
> vertical line wherever you want it on the report.
> 
> Problem in this case is that there are "Can Grow" fields in the detail 
> section which makes the detail height different for each detail line.
> 
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print 
> events to see if I could find out how high the section was but it 
> always comes up with the original design height, not the height of the 
> detail section with the expanded "Can Grow" text boxes.
> 
> So is there a way to know the height of the detail section at a point 
> where I could still adjust the vertical line height to fill the 
> section?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> <http://www.e-z-mrp.com/>
> Skype: rocky.smolin
> 
> --
> 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


From rockysmolin at bchacc.com  Sat Jun 18 09:55:14 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sat, 18 Jun 2016 07:55:14 -0700
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <57654D15.24882.12D2B9EE@stuart.lexacorp.com.pg>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
	<57654D15.24882.12D2B9EE@stuart.lexacorp.com.pg>
Message-ID: <942DF8053CDC40CEB9647487EE12B04C@HAL9007>

Dang.  Forgot about Line.  But I didn't know it would truncate the line to
the height of the detail section. Mil gracias for that!

Now the last thing (OK it's never last, but...) I need to draw a horizontal
line across the page below the last detail line on the page.  Originally I
had a line separating each detail line and that looked OK to me.  But not to
him.

I could make that line invisible and make it visible only when printing the
last detail line on the page.  But how to know when the line being printed
is the last one on the page?

Or is there some other method that you know of to get that line across the
bottom of the last detail line on the page.

MMTIA

r

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Saturday, June 18, 2016 6:31 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Vertical line in detail section

Don't use a Line control.  Use  Me.Line (X, 0)-(X, Y)  in the Detail_Print

Set Y to 22 inches or the equivalent number in cms, twips, pixels depending
on how you Scale your report.  (i.e. maximum possible size).  The detail
will NOT be expanded to the full line length - the line will be truncated to
the length of the detail.

--
Stuart




On 18 Jun 2016 at 5:40, Rocky Smolin wrote:

> Dear List:
> 
> I have a client who wants vertical lines in the detail section between
> data fields.  This is no problem when the detail section is a fixed
> height. I've done lots of those before - just make the vertical line
> the exact height of the detail section and you get a nice continuous
> vertical line wherever you want it on the report.
> 
> Problem in this case is that there are "Can Grow" fields in the detail
> section which makes the detail height different for each detail line.
> 
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print
> events to see if I could find out how high the section was but it
> always comes up with the original design height, not the height of the
> detail section with the expanded "Can Grow" text boxes.
> 
> So is there a way to know the height of the detail section at a point
> where I could still adjust the vertical line height to fill the
> section?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> 
> www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> Skype: rocky.smolin
> 
> -- 
> 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


From rford at terra.com.br  Sat Jun 18 09:58:34 2016
From: rford at terra.com.br (Roberto Ford Long)
Date: Sat, 18 Jun 2016 11:58:34 -0300
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
Message-ID: <b7c5eaf2-8b1a-8265-b891-2b9037e60d1c@terra.com.br>

     Hi Rocky.
     I drop a text box on a section and set left and right control 
border line from transparent to line, set height of control to height of 
section with can grow/shrink property set true, and if I recall 
correctly, set it to back of others controls. I guess that you can set 
the background control color to transparent too.
     Regards,
     Roberto.

Em 18/06/2016 09:40, Rocky Smolin escreveu:
> Dear List:
>   
> I have a client who wants vertical lines in the detail section between data
> fields.  This is no problem when the detail section is a fixed height. I've
> done lots of those before - just make the vertical line the exact height of
> the detail section and you get a nice continuous vertical line wherever you
> want it on the report.
>   
> Problem in this case is that there are "Can Grow" fields in the detail
> section which makes the detail height different for each detail line.
>   
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print events to
> see if I could find out how high the section was but it always comes up with
> the original design height, not the height of the detail section with the
> expanded "Can Grow" text boxes.
>   
> So is there a way to know the height of the detail section at a point where
> I could still adjust the vertical line height to fill the section?
>   
> MTIA
>   
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/>
> www.e-z-mrp.com <http://www.e-z-mrp.com/>
> Skype: rocky.smolin
>   


From rford at terra.com.br  Sat Jun 18 10:22:05 2016
From: rford at terra.com.br (Roberto Ford Long)
Date: Sat, 18 Jun 2016 12:22:05 -0300
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <942DF8053CDC40CEB9647487EE12B04C@HAL9007>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
	<57654D15.24882.12D2B9EE@stuart.lexacorp.com.pg>
	<942DF8053CDC40CEB9647487EE12B04C@HAL9007>
Message-ID: <c4f87a52-2a50-2e49-318c-d6b14e7a6634@terra.com.br>

     Hi Rocky,
     I use page-footer section, and put a line on top of if.
     Regards,
     Roberto
Em 18/06/2016 11:55, Rocky Smolin escreveu:
> Dang.  Forgot about Line.  But I didn't know it would truncate the line to
> the height of the detail section. Mil gracias for that!
>
> Now the last thing (OK it's never last, but...) I need to draw a horizontal
> line across the page below the last detail line on the page.  Originally I
> had a line separating each detail line and that looked OK to me.  But not to
> him.
>
> I could make that line invisible and make it visible only when printing the
> last detail line on the page.  But how to know when the line being printed
> is the last one on the page?
>
> Or is there some other method that you know of to get that line across the
> bottom of the last detail line on the page.
>
> MMTIA
>
> r
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> Stuart McLachlan
> Sent: Saturday, June 18, 2016 6:31 AM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Vertical line in detail section
>
> Don't use a Line control.  Use  Me.Line (X, 0)-(X, Y)  in the Detail_Print
>
> Set Y to 22 inches or the equivalent number in cms, twips, pixels depending
> on how you Scale your report.  (i.e. maximum possible size).  The detail
> will NOT be expanded to the full line length - the line will be truncated to
> the length of the detail.
>
> --
> Stuart
>
>
>
>
> On 18 Jun 2016 at 5:40, Rocky Smolin wrote:
>
>> Dear List:
>>
>> I have a client who wants vertical lines in the detail section between
>> data fields.  This is no problem when the detail section is a fixed
>> height. I've done lots of those before - just make the vertical line
>> the exact height of the detail section and you get a nice continuous
>> vertical line wherever you want it on the report.
>>
>> Problem in this case is that there are "Can Grow" fields in the detail
>> section which makes the detail height different for each detail line.
>>
>> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print
>> events to see if I could find out how high the section was but it
>> always comes up with the original design height, not the height of the
>> detail section with the expanded "Can Grow" text boxes.
>>
>> So is there a way to know the height of the detail section at a point
>> where I could still adjust the vertical line height to fill the
>> section?
>>
>> MTIA
>>
>> Rocky Smolin
>> Beach Access Software
>> 760-683-5777
>> www.bchacc.com <http://www.bchacc.com/>
>> www.e-z-mrp.com <http://www.e-z-mrp.com/>
>> Skype: rocky.smolin
>>
>> -- 
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>>
>


From rockysmolin at bchacc.com  Sat Jun 18 14:24:06 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sat, 18 Jun 2016 12:24:06 -0700
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <c4f87a52-2a50-2e49-318c-d6b14e7a6634@terra.com.br>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007><57654D15.24882.12D2B9EE@stuart.lexacorp.com.pg><942DF8053CDC40CEB9647487EE12B04C@HAL9007>
	<c4f87a52-2a50-2e49-318c-d6b14e7a6634@terra.com.br>
Message-ID: <4B9B30BF0DD14450A295AAA193AD717B@HAL9007>

Tried that but the detail section is a sub Report. :) So no page event
triggered on the sub-report.  On the main report's page footer the line
doesn't butt up against the bottom of the vertical column separators.

On the bright side the client seems to have unlimited patience and budget
while I figure this out.  

But your post gives me an idea to try getting rid of the sub report and just
bringing the detail data into the main report. (Not sure why I made it a
sub-report in the first place.)

So...stay calm and code on!

Rocky Smolin
Beach Access Software
760-683-5777
www.bchacc.com
www.e-z-mrp.com
Skype: rocky.smolin
 


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Roberto Ford Long
Sent: Saturday, June 18, 2016 8:22 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Vertical line in detail section

     Hi Rocky,
     I use page-footer section, and put a line on top of if.
     Regards,
     Roberto
Em 18/06/2016 11:55, Rocky Smolin escreveu:
> Dang.  Forgot about Line.  But I didn't know it would truncate the 
> line to the height of the detail section. Mil gracias for that!
>
> Now the last thing (OK it's never last, but...) I need to draw a 
> horizontal line across the page below the last detail line on the 
> page.  Originally I had a line separating each detail line and that 
> looked OK to me.  But not to him.
>
> I could make that line invisible and make it visible only when 
> printing the last detail line on the page.  But how to know when the 
> line being printed is the last one on the page?
>
> Or is there some other method that you know of to get that line across 
> the bottom of the last detail line on the page.
>
> MMTIA
>
> r
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf 
> Of Stuart McLachlan
> Sent: Saturday, June 18, 2016 6:31 AM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Vertical line in detail section
>
> Don't use a Line control.  Use  Me.Line (X, 0)-(X, Y)  in the 
> Detail_Print
>
> Set Y to 22 inches or the equivalent number in cms, twips, pixels 
> depending on how you Scale your report.  (i.e. maximum possible size).  
> The detail will NOT be expanded to the full line length - the line 
> will be truncated to the length of the detail.
>
> --
> Stuart
>
>
>
>
> On 18 Jun 2016 at 5:40, Rocky Smolin wrote:
>
>> Dear List:
>>
>> I have a client who wants vertical lines in the detail section 
>> between data fields.  This is no problem when the detail section is a 
>> fixed height. I've done lots of those before - just make the vertical 
>> line the exact height of the detail section and you get a nice 
>> continuous vertical line wherever you want it on the report.
>>
>> Problem in this case is that there are "Can Grow" fields in the 
>> detail section which makes the detail height different for each detail
line.
>>
>> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print 
>> events to see if I could find out how high the section was but it 
>> always comes up with the original design height, not the height of 
>> the detail section with the expanded "Can Grow" text boxes.
>>
>> So is there a way to know the height of the detail section at a point 
>> where I could still adjust the vertical line height to fill the 
>> section?
>>
>> MTIA
>>
>> Rocky Smolin
>> Beach Access Software
>> 760-683-5777
>> www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
>> <http://www.e-z-mrp.com/>
>> Skype: rocky.smolin
>>
>> --
>> 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


From jimdettman at verizon.net  Sat Jun 18 16:34:01 2016
From: jimdettman at verizon.net (Jim Dettman)
Date: Sat, 18 Jun 2016 17:34:01 -0400
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
Message-ID: <940728A1-17B9-4F95-98FA-B8802E1CAB96@verizon.net>

Rocky,

A couple of tricks here:

1. You can grab the start of the detail section at the end of the page header and get the end of the details section starting with the page footer. Then draw a line in the on page event after everything is been placed.

Leban had a class module for doing this.

2. But a really slick trick (and this is absolutely great for preprinted forms), is to underlie the entire page in the page header event with an image.  

I did this with a VICS BOL and it worked well.  There is an article on EE which I'll get a link for to point you towards.

The technique is simple though; put an image the size of your entire page in the page header event and then set move layout equal false.  You also need a dummy had her group to soak up the actual heading height.

Jim



Sent from my iPhone

> On Jun 18, 2016, at 8:40 AM, Rocky Smolin <rockysmolin at bchacc.com> wrote:
> 
> Dear List:
> 
> I have a client who wants vertical lines in the detail section between data
> fields.  This is no problem when the detail section is a fixed height. I've
> done lots of those before - just make the vertical line the exact height of
> the detail section and you get a nice continuous vertical line wherever you
> want it on the report.
> 
> Problem in this case is that there are "Can Grow" fields in the detail
> section which makes the detail height different for each detail line.
> 
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print events to
> see if I could find out how high the section was but it always comes up with
> the original design height, not the height of the detail section with the
> expanded "Can Grow" text boxes.
> 
> So is there a way to know the height of the detail section at a point where
> I could still adjust the vertical line height to fill the section?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> 
> www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> Skype: rocky.smolin
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com



From stuart at lexacorp.com.pg  Sun Jun 19 00:15:44 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Sun, 19 Jun 2016 15:15:44 +1000
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <942DF8053CDC40CEB9647487EE12B04C@HAL9007>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>,
	<57654D15.24882.12D2B9EE@stuart.lexacorp.com.pg>,
	<942DF8053CDC40CEB9647487EE12B04C@HAL9007>
Message-ID: <57662A80.18328.1633A400@stuart.lexacorp.com.pg>

An ugly kludge, but it works:

http://www.access-programmers.co.uk/forums/showthread.php?t=194657


On 18 Jun 2016 at 7:55, Rocky Smolin wrote:

> Dang.  Forgot about Line.  But I didn't know it would truncate the
> line to the height of the detail section. Mil gracias for that!
> 
> Now the last thing (OK it's never last, but...) I need to draw a
> horizontal line across the page below the last detail line on the
> page.  Originally I had a line separating each detail line and that
> looked OK to me.  But not to him.
> 
> I could make that line invisible and make it visible only when
> printing the last detail line on the page.  But how to know when the
> line being printed is the last one on the page?
> 
> Or is there some other method that you know of to get that line across
> the bottom of the last detail line on the page.
> 
> MMTIA
> 
> r
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Stuart McLachlan Sent: Saturday, June 18, 2016 6:31 AM To: Access
> Developers discussion and problem solving Subject: Re: [AccessD]
> Vertical line in detail section
> 
> Don't use a Line control.  Use  Me.Line (X, 0)-(X, Y)  in the
> Detail_Print
> 
> Set Y to 22 inches or the equivalent number in cms, twips, pixels
> depending on how you Scale your report.  (i.e. maximum possible size).
>  The detail will NOT be expanded to the full line length - the line
> will be truncated to the length of the detail.
> 
> --
> Stuart
> 
> 
> 
> 
> On 18 Jun 2016 at 5:40, Rocky Smolin wrote:
> 
> > Dear List:
> > 
> > I have a client who wants vertical lines in the detail section
> > between data fields.  This is no problem when the detail section is
> > a fixed height. I've done lots of those before - just make the
> > vertical line the exact height of the detail section and you get a
> > nice continuous vertical line wherever you want it on the report.
> > 
> > Problem in this case is that there are "Can Grow" fields in the
> > detail section which makes the detail height different for each
> > detail line.
> > 
> > I put a MsgBox Me.Detail.Height in the Format, Retreat and Print
> > events to see if I could find out how high the section was but it
> > always comes up with the original design height, not the height of
> > the detail section with the expanded "Can Grow" text boxes.
> > 
> > So is there a way to know the height of the detail section at a
> > point where I could still adjust the vertical line height to fill
> > the section?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> 
> > www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> > Skype: rocky.smolin
> > 
> > -- 
> > 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
> 



From rockysmolin at bchacc.com  Sun Jun 19 09:44:42 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sun, 19 Jun 2016 07:44:42 -0700
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <57662A80.18328.1633A400@stuart.lexacorp.com.pg>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>,
	<57654D15.24882.12D2B9EE@stuart.lexacorp.com.pg>,
	<942DF8053CDC40CEB9647487EE12B04C@HAL9007>
	<57662A80.18328.1633A400@stuart.lexacorp.com.pg>
Message-ID: <46D1DE76412E480AB4ABDDAECF8C92A1@HAL9007>

Actually, that might work if I move the details out of the subreport and
into the main report.

Thx.

r
 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Saturday, June 18, 2016 10:16 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Vertical line in detail section

An ugly kludge, but it works:

http://www.access-programmers.co.uk/forums/showthread.php?t=194657


On 18 Jun 2016 at 7:55, Rocky Smolin wrote:

> Dang.  Forgot about Line.  But I didn't know it would truncate the 
> line to the height of the detail section. Mil gracias for that!
> 
> Now the last thing (OK it's never last, but...) I need to draw a 
> horizontal line across the page below the last detail line on the 
> page.  Originally I had a line separating each detail line and that 
> looked OK to me.  But not to him.
> 
> I could make that line invisible and make it visible only when 
> printing the last detail line on the page.  But how to know when the 
> line being printed is the last one on the page?
> 
> Or is there some other method that you know of to get that line across 
> the bottom of the last detail line on the page.
> 
> MMTIA
> 
> r
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf 
> Of Stuart McLachlan Sent: Saturday, June 18, 2016 6:31 AM To: Access 
> Developers discussion and problem solving Subject: Re: [AccessD] 
> Vertical line in detail section
> 
> Don't use a Line control.  Use  Me.Line (X, 0)-(X, Y)  in the 
> Detail_Print
> 
> Set Y to 22 inches or the equivalent number in cms, twips, pixels 
> depending on how you Scale your report.  (i.e. maximum possible size).
>  The detail will NOT be expanded to the full line length - the line 
> will be truncated to the length of the detail.
> 
> --
> Stuart
> 
> 
> 
> 
> On 18 Jun 2016 at 5:40, Rocky Smolin wrote:
> 
> > Dear List:
> > 
> > I have a client who wants vertical lines in the detail section 
> > between data fields.  This is no problem when the detail section is 
> > a fixed height. I've done lots of those before - just make the 
> > vertical line the exact height of the detail section and you get a 
> > nice continuous vertical line wherever you want it on the report.
> > 
> > Problem in this case is that there are "Can Grow" fields in the 
> > detail section which makes the detail height different for each 
> > detail line.
> > 
> > I put a MsgBox Me.Detail.Height in the Format, Retreat and Print 
> > events to see if I could find out how high the section was but it 
> > always comes up with the original design height, not the height of 
> > the detail section with the expanded "Can Grow" text boxes.
> > 
> > So is there a way to know the height of the detail section at a 
> > point where I could still adjust the vertical line height to fill 
> > the section?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> > <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> > 
> > --
> > 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
> 


-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From jimdettman at verizon.net  Sun Jun 19 10:37:30 2016
From: jimdettman at verizon.net (Jim Dettman)
Date: Sun, 19 Jun 2016 11:37:30 -0400
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <940728A1-17B9-4F95-98FA-B8802E1CAB96@verizon.net>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
	<940728A1-17B9-4F95-98FA-B8802E1CAB96@verizon.net>
Message-ID: <A11A79E789B449E387DFEB4962EBEF58@XPS>


Here's a link to the original thread on EE:

https://rdsrc.us/M8O57q

And here's the link to the article, which is well worth the read.   Great
technique to use in general.

How to underlay a section in Microsoft Access Reports
https://rdsrc.us/RcePO2 

 and a link the to Lebans print class for drawing lines in the On Page
event.

http://www.lebans.com/PrintLines.htm

Jim.

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim
Dettman
Sent: Saturday, June 18, 2016 05:34 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Vertical line in detail section

Rocky,

A couple of tricks here:

1. You can grab the start of the detail section at the end of the page
header and get the end of the details section starting with the page footer.
Then draw a line in the on page event after everything is been placed.

Leban had a class module for doing this.

2. But a really slick trick (and this is absolutely great for preprinted
forms), is to underlie the entire page in the page header event with an
image.  

I did this with a VICS BOL and it worked well.  There is an article on EE
which I'll get a link for to point you towards.

The technique is simple though; put an image the size of your entire page in
the page header event and then set move layout equal false.  You also need a
dummy had her group to soak up the actual heading height.

Jim



Sent from my iPhone

> On Jun 18, 2016, at 8:40 AM, Rocky Smolin <rockysmolin at bchacc.com> wrote:
> 
> Dear List:
> 
> I have a client who wants vertical lines in the detail section between
data
> fields.  This is no problem when the detail section is a fixed height.
I've
> done lots of those before - just make the vertical line the exact height
of
> the detail section and you get a nice continuous vertical line wherever
you
> want it on the report.
> 
> Problem in this case is that there are "Can Grow" fields in the detail
> section which makes the detail height different for each detail line.
> 
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print events to
> see if I could find out how high the section was but it always comes up
with
> the original design height, not the height of the detail section with the
> expanded "Can Grow" text boxes.
> 
> So is there a way to know the height of the detail section at a point
where
> I could still adjust the vertical line height to fill the section?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> 
> www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> Skype: rocky.smolin
> 
> -- 
> 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


From rockysmolin at bchacc.com  Sun Jun 19 11:21:04 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sun, 19 Jun 2016 09:21:04 -0700
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <A11A79E789B449E387DFEB4962EBEF58@XPS>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007><940728A1-17B9-4F95-98FA-B8802E1CAB96@verizon.net>
	<A11A79E789B449E387DFEB4962EBEF58@XPS>
Message-ID: <B020BD87575545CDAA42CEC6AA2C6169@HAL9007>

Thanks JD.  I made some progress and I'm hoping the client buys off on
having the horizontal lines between the details instead of insisting that
they go away.  

I did generate another issue though in the process of drawing those vertical
lines in the Format event and that is that one of the fields has to be wide
enough so that it overlaps a couple of the vertical column divider lines.  

The text box has Back Style Normal so I was hoping it would be in front of
the vertical lines and the lines wouldn't cut through the text in the box.
But since I'm drawing those line using the Line function apparently they end
up in front of the text box regardless of what I do in the design more.  And
BrigToFront in VBA is not available at run time. 

Any ideas how to get those lines behind the text box?

MTIA

r

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim
Dettman
Sent: Sunday, June 19, 2016 8:38 AM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] Vertical line in detail section


Here's a link to the original thread on EE:

https://rdsrc.us/M8O57q

And here's the link to the article, which is well worth the read.   Great
technique to use in general.

How to underlay a section in Microsoft Access Reports
https://rdsrc.us/RcePO2 

 and a link the to Lebans print class for drawing lines in the On Page
event.

http://www.lebans.com/PrintLines.htm

Jim.

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim
Dettman
Sent: Saturday, June 18, 2016 05:34 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Vertical line in detail section

Rocky,

A couple of tricks here:

1. You can grab the start of the detail section at the end of the page
header and get the end of the details section starting with the page footer.
Then draw a line in the on page event after everything is been placed.

Leban had a class module for doing this.

2. But a really slick trick (and this is absolutely great for preprinted
forms), is to underlie the entire page in the page header event with an
image.  

I did this with a VICS BOL and it worked well.  There is an article on EE
which I'll get a link for to point you towards.

The technique is simple though; put an image the size of your entire page in
the page header event and then set move layout equal false.  You also need a
dummy had her group to soak up the actual heading height.

Jim



Sent from my iPhone

> On Jun 18, 2016, at 8:40 AM, Rocky Smolin <rockysmolin at bchacc.com> wrote:
> 
> Dear List:
> 
> I have a client who wants vertical lines in the detail section between
data
> fields.  This is no problem when the detail section is a fixed height.
I've
> done lots of those before - just make the vertical line the exact 
> height
of
> the detail section and you get a nice continuous vertical line 
> wherever
you
> want it on the report.
> 
> Problem in this case is that there are "Can Grow" fields in the detail 
> section which makes the detail height different for each detail line.
> 
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print 
> events to see if I could find out how high the section was but it 
> always comes up
with
> the original design height, not the height of the detail section with 
> the expanded "Can Grow" text boxes.
> 
> So is there a way to know the height of the detail section at a point
where
> I could still adjust the vertical line height to fill the section?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> <http://www.e-z-mrp.com/>
> Skype: rocky.smolin
> 
> --
> 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


From stuart at lexacorp.com.pg  Sun Jun 19 16:21:11 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Mon, 20 Jun 2016 07:21:11 +1000
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <A11A79E789B449E387DFEB4962EBEF58@XPS>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>,
	<940728A1-17B9-4F95-98FA-B8802E1CAB96@verizon.net>,
	<A11A79E789B449E387DFEB4962EBEF58@XPS>
Message-ID: <57670CC7.24371.1E513B@stuart.lexacorp.com.pg>

Jim,  

Thank you for those links.   Your comment in the second one from 2012 was an eye opener!

"I think the major thing to walk away with from this is the fact that you can address the entire 
page in a header event and with .movelayout false, continue on down the page overlaying 
anything you've placed on it.

That's never been obvious to anyone before and opens up the door for a wide range of 
things.  For example, placing a water mark on the page."



-- 
Stuart



On 19 Jun 2016 at 11:37, Jim Dettman wrote:

> 
> Here's a link to the original thread on EE:
> 
> https://rdsrc.us/M8O57q
> 
> And here's the link to the article, which is well worth the read.  
> Great technique to use in general.
> 
> How to underlay a section in Microsoft Access Reports
> https://rdsrc.us/RcePO2 
> 
>  and a link the to Lebans print class for drawing lines in the On Page
> event.
> 
> http://www.lebans.com/PrintLines.htm
> 
> Jim.
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Jim Dettman Sent: Saturday, June 18, 2016 05:34 PM To: Access
> Developers discussion and problem solving Subject: Re: [AccessD]
> Vertical line in detail section
> 
> Rocky,
> 
> A couple of tricks here:
> 
> 1. You can grab the start of the detail section at the end of the page
> header and get the end of the details section starting with the page
> footer. Then draw a line in the on page event after everything is been
> placed.
> 
> Leban had a class module for doing this.
> 
> 2. But a really slick trick (and this is absolutely great for
> preprinted forms), is to underlie the entire page in the page header
> event with an image.  
> 
> I did this with a VICS BOL and it worked well.  There is an article on
> EE which I'll get a link for to point you towards.
> 
> The technique is simple though; put an image the size of your entire
> page in the page header event and then set move layout equal false. 
> You also need a dummy had her group to soak up the actual heading
> height.
> 
> Jim
> 
> 
> 
> Sent from my iPhone
> 
> > On Jun 18, 2016, at 8:40 AM, Rocky Smolin <rockysmolin at bchacc.com>
> > wrote:
> > 
> > Dear List:
> > 
> > I have a client who wants vertical lines in the detail section
> > between
> data
> > fields.  This is no problem when the detail section is a fixed
> > height.
> I've
> > done lots of those before - just make the vertical line the exact
> > height
> of
> > the detail section and you get a nice continuous vertical line
> > wherever
> you
> > want it on the report.
> > 
> > Problem in this case is that there are "Can Grow" fields in the
> > detail section which makes the detail height different for each
> > detail line.
> > 
> > I put a MsgBox Me.Detail.Height in the Format, Retreat and Print
> > events to see if I could find out how high the section was but it
> > always comes up
> with
> > the original design height, not the height of the detail section
> > with the expanded "Can Grow" text boxes.
> > 
> > So is there a way to know the height of the detail section at a
> > point
> where
> > I could still adjust the vertical line height to fill the section?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> 
> > www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> > Skype: rocky.smolin
> > 
> > -- 
> > 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
> 



From darryl at whittleconsulting.com.au  Sun Jun 19 18:18:27 2016
From: darryl at whittleconsulting.com.au (Darryl Collins)
Date: Sun, 19 Jun 2016 23:18:27 +0000
Subject: [AccessD] vbTrue vbFalse
In-Reply-To: <57647A4E.12123.F9B6078@stuart.lexacorp.com.pg>
References: <DB6PR0601MB21981F4ADF17114AA0218191CA570@DB6PR0601MB2198.eurprd06.prod.outlook.com>
	<57647A4E.12123.F9B6078@stuart.lexacorp.com.pg>
Message-ID: <ME1PR01MB0580F540204026C865719431FC290@ME1PR01MB0580.ausprd01.prod.outlook.com>

Yes... This is how I have used them.

In the specific case of say a customer form where you prefill out as much of the detail as possible based on either the most common / likely response or known customer information / preferences.

So you might have a set or check boxes or radio buttons that you pre populate with code using 

Me.chkbxMailMe = vbtrue
Me.chkbxWeeklyUpdate = vbfalse

Blah blah..

Cheers
Darryl

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Stuart McLachlan
Sent: 18 June, 2016 8:32 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] vbTrue vbFalse

They are intended for use whereever there is a tri-state possibility (i.e. true/false/not stated).

Commonly used with TriState checkboxes and various Format functions.
  

And they are not new - they're described in the Getz/Gilbert VBA Handbook (circa 2000)


On 17 Jun 2016 at 18:52, Gustav Brock wrote:

> Hi all
> 
> I discovered these new constants:
> 
> https://msdn.microsoft.com/en-us/library/office/gg278431(v=office.15).
> aspx
> 
> There is also a vbUseDefault.
> 
> Where/how would you use those?
> 
> /gustav
> -- 
> 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


From gustav at cactus.dk  Mon Jun 20 09:05:45 2016
From: gustav at cactus.dk (Gustav Brock)
Date: Mon, 20 Jun 2016 14:05:45 +0000
Subject: [AccessD] vbTrue vbFalse
Message-ID: <HE1PR0601MB22023236A447BA1B3351C0B3CA2A0@HE1PR0601MB2202.eurprd06.prod.outlook.com>

Hi Bill

Yes, I can see them being used for the three possible options for the parameter in FormatNumber.

And I misread the explanation at the link. "Optional. Tristate constant ... " doesn't mean an optional tristate constant but: "(one of) _the_ vbTriState constants as vbTriState is an enumeration holding the three constants:

    vbFalse
    vbTrue
    vbUseDefault

so they are intended for use where you have parameters declared as vbTriState.

Now it makes sense to me. Thanks!

/gustav

-----Oprindelig meddelelse-----
Fra: AccessD [mailto:accessd-bounces at databaseadvisors.com] P? vegne af Bill Benson
Sendt: 17. juni 2016 23:20
Til: Access Developers discussion and problem solving <accessd at databaseadvisors.com>
Emne: Re: [AccessD] vbTrue vbFalse

Looks applicable to the FormatNumber function in Access VBA?

https://support.office.com/en-us/article/FormatNumber-Function-91030eab-2887-43d4-9c17-311ab6ebf43b?ui=en-US&rs=en-US&ad=US&fromAR=1


On Fri, Jun 17, 2016 at 2:52 PM, Gustav Brock <gustav at cactus.dk> wrote:

> Hi all
>
> I discovered these new constants:
>
> https://msdn.microsoft.com/en-us/library/office/gg278431(v=office.15).aspx
>
> There is also a vbUseDefault.
>
> Where/how would you use those?
>
> /gustav 


From gustav at cactus.dk  Mon Jun 20 09:16:29 2016
From: gustav at cactus.dk (Gustav Brock)
Date: Mon, 20 Jun 2016 14:16:29 +0000
Subject: [AccessD] vbTrue vbFalse
Message-ID: <HE1PR0601MB2202F47479B281E224F35385CA2A0@HE1PR0601MB2202.eurprd06.prod.outlook.com>

Hi Stuart

I also had tristate checkboxes in mind, but I believe we have been fooled - see my note to Bill.

If the checkbox option Tristate is marked as False, it will switch between True and False when clicked. However, marked as True, it will switch between True and False and Undetermined where the value it holds when Undetermined is Null.
Also, Null is the only value that - when assigned to its Value - will set the checkbox as Undetermined. Any other value except 0 will set it to checked (True).

So vbTriState (with the equivalent numeric value of -2) is not intended for use with tristate checkboxes.

/gustav

-----Oprindelig meddelelse-----
Fra: AccessD [mailto:accessd-bounces at databaseadvisors.com] P? vegne af Stuart McLachlan
Sendt: 18. juni 2016 00:32
Til: Access Developers discussion and problem solving <accessd at databaseadvisors.com>
Emne: Re: [AccessD] vbTrue vbFalse

They are intended for use whereever there is a tri-state possibility (i.e. true/false/not stated).

Commonly used with TriState checkboxes and various Format functions.
  

And they are not new - they're described in the Getz/Gilbert VBA Handbook (circa 2000)


On 17 Jun 2016 at 18:52, Gustav Brock wrote:

> Hi all
> 
> I discovered these new constants:
> 
> https://msdn.microsoft.com/en-us/library/office/gg278431(v=office.15).
> aspx
> 
> There is also a vbUseDefault.
> 
> Where/how would you use those?
> 
> /gustav 


From jimdettman at verizon.net  Mon Jun 20 13:33:06 2016
From: jimdettman at verizon.net (Jim Dettman)
Date: Mon, 20 Jun 2016 14:33:06 -0400
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <57670CC7.24371.1E513B@stuart.lexacorp.com.pg>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>,
	<940728A1-17B9-4F95-98FA-B8802E1CAB96@verizon.net>,
	<A11A79E789B449E387DFEB4962EBEF58@XPS>
	<57670CC7.24371.1E513B@stuart.lexacorp.com.pg>
Message-ID: <A97E7EA130A148BF995BB7F1AB482EC9@XPS>


 
 Yes, that was quite the surprise after all these years.

 Up until then, it was either try to do things in-line with the sections, or
the OnPage event, which is limited.

 There is one problem with it though; Access still balks of the page size -
margins - page header - page footer < 0.

 So it might not work in every situation, but the couple times I've tried
it, it's worked pretty well overall.  The last thing I did, which was a VICS
Bill Of Lading, came out pretty nice.

Jim.

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Stuart McLachlan
Sent: Sunday, June 19, 2016 05:21 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Vertical line in detail section

Jim,  

Thank you for those links.   Your comment in the second one from 2012 was an
eye opener!

"I think the major thing to walk away with from this is the fact that you
can address the entire 
page in a header event and with .movelayout false, continue on down the page
overlaying 
anything you've placed on it.

That's never been obvious to anyone before and opens up the door for a wide
range of 
things.  For example, placing a water mark on the page."



-- 
Stuart



On 19 Jun 2016 at 11:37, Jim Dettman wrote:

> 
> Here's a link to the original thread on EE:
> 
> https://rdsrc.us/M8O57q
> 
> And here's the link to the article, which is well worth the read.  
> Great technique to use in general.
> 
> How to underlay a section in Microsoft Access Reports
> https://rdsrc.us/RcePO2 
> 
>  and a link the to Lebans print class for drawing lines in the On Page
> event.
> 
> http://www.lebans.com/PrintLines.htm
> 
> Jim.
> 
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf
> Of Jim Dettman Sent: Saturday, June 18, 2016 05:34 PM To: Access
> Developers discussion and problem solving Subject: Re: [AccessD]
> Vertical line in detail section
> 
> Rocky,
> 
> A couple of tricks here:
> 
> 1. You can grab the start of the detail section at the end of the page
> header and get the end of the details section starting with the page
> footer. Then draw a line in the on page event after everything is been
> placed.
> 
> Leban had a class module for doing this.
> 
> 2. But a really slick trick (and this is absolutely great for
> preprinted forms), is to underlie the entire page in the page header
> event with an image.  
> 
> I did this with a VICS BOL and it worked well.  There is an article on
> EE which I'll get a link for to point you towards.
> 
> The technique is simple though; put an image the size of your entire
> page in the page header event and then set move layout equal false. 
> You also need a dummy had her group to soak up the actual heading
> height.
> 
> Jim
> 
> 
> 
> Sent from my iPhone
> 
> > On Jun 18, 2016, at 8:40 AM, Rocky Smolin <rockysmolin at bchacc.com>
> > wrote:
> > 
> > Dear List:
> > 
> > I have a client who wants vertical lines in the detail section
> > between
> data
> > fields.  This is no problem when the detail section is a fixed
> > height.
> I've
> > done lots of those before - just make the vertical line the exact
> > height
> of
> > the detail section and you get a nice continuous vertical line
> > wherever
> you
> > want it on the report.
> > 
> > Problem in this case is that there are "Can Grow" fields in the
> > detail section which makes the detail height different for each
> > detail line.
> > 
> > I put a MsgBox Me.Detail.Height in the Format, Retreat and Print
> > events to see if I could find out how high the section was but it
> > always comes up
> with
> > the original design height, not the height of the detail section
> > with the expanded "Can Grow" text boxes.
> > 
> > So is there a way to know the height of the detail section at a
> > point
> where
> > I could still adjust the vertical line height to fill the section?
> > 
> > MTIA
> > 
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/> 
> > www.e-z-mrp.com <http://www.e-z-mrp.com/> 
> > Skype: rocky.smolin
> > 
> > -- 
> > 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
> 


-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From bensonforums at gmail.com  Mon Jun 20 16:14:51 2016
From: bensonforums at gmail.com (Bill Benson)
Date: Mon, 20 Jun 2016 17:14:51 -0400
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <A11A79E789B449E387DFEB4962EBEF58@XPS>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
	<940728A1-17B9-4F95-98FA-B8802E1CAB96@verizon.net>
	<A11A79E789B449E387DFEB4962EBEF58@XPS>
Message-ID: <CAJLzs_31TvHKxxWPOmx=DHgLVkz4BrZJ92h=8fPtWQUJQgJaiw@mail.gmail.com>

Can you believe my company policy has blocked me from looking at the 1st
two websites?! They do that with one of the major excel forums too.

On Sun, Jun 19, 2016 at 11:37 AM, Jim Dettman <jimdettman at verizon.net>
wrote:

>
> Here's a link to the original thread on EE:
>
> https://rdsrc.us/M8O57q
>
> And here's the link to the article, which is well worth the read.   Great
> technique to use in general.
>
> How to underlay a section in Microsoft Access Reports
> https://rdsrc.us/RcePO2
>
>  and a link the to Lebans print class for drawing lines in the On Page
> event.
>
> http://www.lebans.com/PrintLines.htm
>
> Jim.
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> Jim
> Dettman
> Sent: Saturday, June 18, 2016 05:34 PM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Vertical line in detail section
>
> Rocky,
>
> A couple of tricks here:
>
> 1. You can grab the start of the detail section at the end of the page
> header and get the end of the details section starting with the page
> footer.
> Then draw a line in the on page event after everything is been placed.
>
> Leban had a class module for doing this.
>
> 2. But a really slick trick (and this is absolutely great for preprinted
> forms), is to underlie the entire page in the page header event with an
> image.
>
> I did this with a VICS BOL and it worked well.  There is an article on EE
> which I'll get a link for to point you towards.
>
> The technique is simple though; put an image the size of your entire page
> in
> the page header event and then set move layout equal false.  You also need
> a
> dummy had her group to soak up the actual heading height.
>
> Jim
>
>
>
> Sent from my iPhone
>
> > On Jun 18, 2016, at 8:40 AM, Rocky Smolin <rockysmolin at bchacc.com>
> wrote:
> >
> > Dear List:
> >
> > I have a client who wants vertical lines in the detail section between
> data
> > fields.  This is no problem when the detail section is a fixed height.
> I've
> > done lots of those before - just make the vertical line the exact height
> of
> > the detail section and you get a nice continuous vertical line wherever
> you
> > want it on the report.
> >
> > Problem in this case is that there are "Can Grow" fields in the detail
> > section which makes the detail height different for each detail line.
> >
> > I put a MsgBox Me.Detail.Height in the Format, Retreat and Print events
> to
> > see if I could find out how high the section was but it always comes up
> with
> > the original design height, not the height of the detail section with the
> > expanded "Can Grow" text boxes.
> >
> > So is there a way to know the height of the detail section at a point
> where
> > I could still adjust the vertical line height to fill the section?
> >
> > MTIA
> >
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/>
> > www.e-z-mrp.com <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> >
> > --
> > 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
>

From stuart at lexacorp.com.pg  Mon Jun 20 16:41:52 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Tue, 21 Jun 2016 07:41:52 +1000
Subject: [AccessD] vbTrue vbFalse
In-Reply-To: <HE1PR0601MB2202F47479B281E224F35385CA2A0@HE1PR0601MB2202.eurprd06.prod.outlook.com>
References: <HE1PR0601MB2202F47479B281E224F35385CA2A0@HE1PR0601MB2202.eurprd06.prod.outlook.com>
Message-ID: <57686320.29410.2F01D01@stuart.lexacorp.com.pg>

Yes, you're correct.   They've confused us by using the word TriState in different ways in 
differetn places :-(

-- 
Stuart

On 20 Jun 2016 at 14:16, Gustav Brock wrote:

> Hi Stuart
> 
> I also had tristate checkboxes in mind, but I believe we have been
> fooled - see my note to Bill.
> 
> If the checkbox option Tristate is marked as False, it will switch
> between True and False when clicked. However, marked as True, it will
> switch between True and False and Undetermined where the value it
> holds when Undetermined is Null. Also, Null is the only value that -
> when assigned to its Value - will set the checkbox as Undetermined.
> Any other value except 0 will set it to checked (True).
> 
> So vbTriState (with the equivalent numeric value of -2) is not
> intended for use with tristate checkboxes.
> 
> /gustav
> 
> -----Oprindelig meddelelse-----
> Fra: AccessD [mailto:accessd-bounces at databaseadvisors.com] P? vegne af
> Stuart McLachlan Sendt: 18. juni 2016 00:32 Til: Access Developers
> discussion and problem solving <accessd at databaseadvisors.com> Emne:
> Re: [AccessD] vbTrue vbFalse
> 
> They are intended for use whereever there is a tri-state possibility
> (i.e. true/false/not stated).
> 
> Commonly used with TriState checkboxes and various Format functions.
> 
> 
> And they are not new - they're described in the Getz/Gilbert VBA
> Handbook (circa 2000)
> 
> 
> On 17 Jun 2016 at 18:52, Gustav Brock wrote:
> 
> > Hi all
> > 
> > I discovered these new constants:
> > 
> > https://msdn.microsoft.com/en-us/library/office/gg278431(v=office.15
> > ). aspx
> > 
> > There is also a vbUseDefault.
> > 
> > Where/how would you use those?
> > 
> > /gustav 
> 
> -- 
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
> 




From davidmcafee at gmail.com  Mon Jun 20 18:14:24 2016
From: davidmcafee at gmail.com (David McAfee)
Date: Mon, 20 Jun 2016 16:14:24 -0700
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
Message-ID: <CAMhYZWY0TBq=jXWo0LB1kO1FNeTcuS_OOdDPBNg_cX5c5q1Ujg@mail.gmail.com>

If you are trying to make a data grid on a report, this is how I've done it
in the past:

First, take all of your borders off of the cells in question.
Set the Textbox Control(s) CanGrow to Yes/true
Tag all of the cells in the row with something such as "grid",
 then place the following code in the report detail's OnFormat event:

Dim ctl As Control
Me.ScaleMode = 5
For Each ctl In Me.Controls
   If ctl.Tag = "grid" Then
      Me.Line ((ctl.Left / 1440), 0)-((ctl.Left / 1440), 10)
      Me.Line (((ctl.Left + ctl.Width) / 1440), 0)-(((ctl.Left + ctl.Width)
/ 1440), 10)
   End If
Next ctl

You will have to make a horizontal line above and below the row as well.
HTH David McAfee

On Sat, Jun 18, 2016 at 5:40 AM, Rocky Smolin <rockysmolin at bchacc.com>
wrote:

> Dear List:
>
> I have a client who wants vertical lines in the detail section between data
> fields.  This is no problem when the detail section is a fixed height. I've
> done lots of those before - just make the vertical line the exact height of
> the detail section and you get a nice continuous vertical line wherever you
> want it on the report.
>
> Problem in this case is that there are "Can Grow" fields in the detail
> section which makes the detail height different for each detail line.
>
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print events to
> see if I could find out how high the section was but it always comes up
> with
> the original design height, not the height of the detail section with the
> expanded "Can Grow" text boxes.
>
> So is there a way to know the height of the detail section at a point where
> I could still adjust the vertical line height to fill the section?
>
> MTIA
>
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/>
> www.e-z-mrp.com <http://www.e-z-mrp.com/>
> Skype: rocky.smolin
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com
>

From bensonforums at gmail.com  Mon Jun 20 18:33:55 2016
From: bensonforums at gmail.com (Bill Benson)
Date: Mon, 20 Jun 2016 19:33:55 -0400
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <CAMhYZWY0TBq=jXWo0LB1kO1FNeTcuS_OOdDPBNg_cX5c5q1Ujg@mail.gmail.com>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
	<CAMhYZWY0TBq=jXWo0LB1kO1FNeTcuS_OOdDPBNg_cX5c5q1Ujg@mail.gmail.com>
Message-ID: <CAJLzs_29-=vY0d0471FcefHn_9vo8GFvLdLbgMSa2q-YMwsvyw@mail.gmail.com>

I can't wait until I have a report that needs all this jazz, it looks so
fun, creative, and cool. Sadly I haven't created interesting reports in
years and years. I just had to say it, my heart was about to bust!
On Jun 20, 2016 7:16 PM, "David McAfee" <davidmcafee at gmail.com> wrote:

> If you are trying to make a data grid on a report, this is how I've done it
> in the past:
>
> First, take all of your borders off of the cells in question.
> Set the Textbox Control(s) CanGrow to Yes/true
> Tag all of the cells in the row with something such as "grid",
>  then place the following code in the report detail's OnFormat event:
>
> Dim ctl As Control
> Me.ScaleMode = 5
> For Each ctl In Me.Controls
>    If ctl.Tag = "grid" Then
>       Me.Line ((ctl.Left / 1440), 0)-((ctl.Left / 1440), 10)
>       Me.Line (((ctl.Left + ctl.Width) / 1440), 0)-(((ctl.Left + ctl.Width)
> / 1440), 10)
>    End If
> Next ctl
>
> You will have to make a horizontal line above and below the row as well.
> HTH David McAfee
>
> On Sat, Jun 18, 2016 at 5:40 AM, Rocky Smolin <rockysmolin at bchacc.com>
> wrote:
>
> > Dear List:
> >
> > I have a client who wants vertical lines in the detail section between
> data
> > fields.  This is no problem when the detail section is a fixed height.
> I've
> > done lots of those before - just make the vertical line the exact height
> of
> > the detail section and you get a nice continuous vertical line wherever
> you
> > want it on the report.
> >
> > Problem in this case is that there are "Can Grow" fields in the detail
> > section which makes the detail height different for each detail line.
> >
> > I put a MsgBox Me.Detail.Height in the Format, Retreat and Print events
> to
> > see if I could find out how high the section was but it always comes up
> > with
> > the original design height, not the height of the detail section with the
> > expanded "Can Grow" text boxes.
> >
> > So is there a way to know the height of the detail section at a point
> where
> > I could still adjust the vertical line height to fill the section?
> >
> > MTIA
> >
> > Rocky Smolin
> > Beach Access Software
> > 760-683-5777
> > www.bchacc.com <http://www.bchacc.com/>
> > www.e-z-mrp.com <http://www.e-z-mrp.com/>
> > Skype: rocky.smolin
> >
> > --
> > 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
>

From rockysmolin at bchacc.com  Thu Jun 23 13:01:45 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Thu, 23 Jun 2016 11:01:45 -0700
Subject: [AccessD] Lookout vs Lookeen
Message-ID: <000001d1cd79$4e67fdf0$eb37f9d0$@bchacc.com>

Dear List(s):

 

I just abandoned O2003 in favor of O2010.  I loved Lookout in Outlook to
search for emails.  Not (easily) compatible with O2010.  A forum post
suggested Lookeen.  Does anyone have any experience with this program?  

 

Or alternatively is the Search function in 2010 good enough that I don't
need a third party searcher as I did in O2003?

 

TIA

 

Rocky

 


From paul.hartland at googlemail.com  Fri Jun 24 08:45:01 2016
From: paul.hartland at googlemail.com (Paul Hartland)
Date: Fri, 24 Jun 2016 14:45:01 +0100
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is Clicked
Message-ID: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>

To all,

A little background...I was given a task where an Excel sheet has upto 300
different branches on it and about 6 sheets....The branch name is in each
sheet and can be in there multiple times.  So I wrote a little VBA module
that looked at the first sheet, gets a unique list of branch names, then
one by one filters the six excel sheets by the branch name....ends up
making a workbook with six sheets for each branch with only that branch
name on.....

But now I want to try and make a little front-end application, where the
user is given an open file dialog to select the Excel sheet, then the user
is presented with each of the six sheets in turn and asked to click a row
and/or a column and the row number and/or column letter are stored in
Access.....Is this possible, I have never done anything like that before, I
have played with Excel objects etc, but nothing where the user selects a
row from an Excel sheet and the value is passed back into Access, and I
can't really seem to find anything on the internet...

Thanks in advance for any help on this.



-- 
Paul Hartland
paul.hartland at googlemail.com

From jimdettman at verizon.net  Fri Jun 24 08:56:29 2016
From: jimdettman at verizon.net (Jim Dettman)
Date: Fri, 24 Jun 2016 09:56:29 -0400
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is
	Clicked
In-Reply-To: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>
References: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>
Message-ID: <F45923C68DE4456487957779AA20A961@XPS>


 Yes that is possible.

 Via automation, anything you can do in Excel manually, you can do through
VBA and the object interface.

 It's also possible to link to an Excel spreadsheet and read it as a table.

 And last, you can just transfer the data into Access with
Transferspreadsheet.

 Not quite sure though which method would work best for you, but what your
looking to do can be done one way or another.

Jim. 

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Paul Hartland
Sent: Friday, June 24, 2016 09:45 AM
To: Access List
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is Clicked

To all,

A little background...I was given a task where an Excel sheet has upto 300
different branches on it and about 6 sheets....The branch name is in each
sheet and can be in there multiple times.  So I wrote a little VBA module
that looked at the first sheet, gets a unique list of branch names, then
one by one filters the six excel sheets by the branch name....ends up
making a workbook with six sheets for each branch with only that branch
name on.....

But now I want to try and make a little front-end application, where the
user is given an open file dialog to select the Excel sheet, then the user
is presented with each of the six sheets in turn and asked to click a row
and/or a column and the row number and/or column letter are stored in
Access.....Is this possible, I have never done anything like that before, I
have played with Excel objects etc, but nothing where the user selects a
row from an Excel sheet and the value is passed back into Access, and I
can't really seem to find anything on the internet...

Thanks in advance for any help on this.



-- 
Paul Hartland
paul.hartland at googlemail.com
-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From paul.hartland at googlemail.com  Fri Jun 24 09:15:24 2016
From: paul.hartland at googlemail.com (Paul Hartland)
Date: Fri, 24 Jun 2016 15:15:24 +0100
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is
	Clicked
In-Reply-To: <F45923C68DE4456487957779AA20A961@XPS>
References: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>
	<F45923C68DE4456487957779AA20A961@XPS>
Message-ID: <CALGJE97s9kHHq-nyokEsrv5ELGur4NpeOSMRZEaMp18qH6UTag@mail.gmail.com>

Thanks Jim,

The vision I sort of have for this is an Access form with a button to
select the Excel file, then open the Excel file and show it on that form
for the user to select a row and/or column depending on what sheet is open,
store the row and/or column values in Access along with the Excel sheet
index, then once the user has done this for all six sheets close the Excel
object, then I can run the rest of my code which I have already....I just
need to know how to open the selected Excel file on a Access form and store
the row/column values that the user selects into Access variables.....Would
you be able to point me to a site with something similar so I can get a
better idea of how to do this please.

Many thanks in advance once more.

Paul

On 24 June 2016 at 14:56, Jim Dettman <jimdettman at verizon.net> wrote:

>
>  Yes that is possible.
>
>  Via automation, anything you can do in Excel manually, you can do through
> VBA and the object interface.
>
>  It's also possible to link to an Excel spreadsheet and read it as a table.
>
>  And last, you can just transfer the data into Access with
> Transferspreadsheet.
>
>  Not quite sure though which method would work best for you, but what your
> looking to do can be done one way or another.
>
> Jim.
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> Paul Hartland
> Sent: Friday, June 24, 2016 09:45 AM
> To: Access List
> Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is
> Clicked
>
> To all,
>
> A little background...I was given a task where an Excel sheet has upto 300
> different branches on it and about 6 sheets....The branch name is in each
> sheet and can be in there multiple times.  So I wrote a little VBA module
> that looked at the first sheet, gets a unique list of branch names, then
> one by one filters the six excel sheets by the branch name....ends up
> making a workbook with six sheets for each branch with only that branch
> name on.....
>
> But now I want to try and make a little front-end application, where the
> user is given an open file dialog to select the Excel sheet, then the user
> is presented with each of the six sheets in turn and asked to click a row
> and/or a column and the row number and/or column letter are stored in
> Access.....Is this possible, I have never done anything like that before, I
> have played with Excel objects etc, but nothing where the user selects a
> row from an Excel sheet and the value is passed back into Access, and I
> can't really seem to find anything on the internet...
>
> Thanks in advance for any help on this.
>
>
>
> --
> Paul Hartland
> paul.hartland at googlemail.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
>



-- 
Paul Hartland
paul.hartland at googlemail.com

From jamesbutton at blueyonder.co.uk  Fri Jun 24 09:50:57 2016
From: jamesbutton at blueyonder.co.uk (James Button)
Date: Fri, 24 Jun 2016 15:50:57 +0100
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column
	Is	Clicked
In-Reply-To: <F45923C68DE4456487957779AA20A961@XPS>
References: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>
	<F45923C68DE4456487957779AA20A961@XPS>
Message-ID: <!&!AAAAAAAAAAAYAAAAAAAAAO8VDlNCBfdEkctCy61lm0HCgAAAEAAAAM6Pxvg543xIhcAuKYKSwHsBAAAAAA==@blueyonder.co.uk>

You may find some of the following code scraps useful
   DefaultwindowCapn = Windows(1).Caption

   DefaultLocation = CurDir()
   Defaultfile = ActiveWorkbook.FullName
   Defaultbook = ActiveWorkbook.Name
   DefaultSheet = ActiveSheet.Name

   Defaultversion = Application.Version
   DefaultPath = Application.DefaultFilePath
   DefaultOS = Application.OperatingSystem
   DefaultName = Application.Name

   Defaultrow = ActiveCell.Row
   Defaultcol = ActiveCell.Column

   wbformat = ActiveWorkbook.FileFormat
   wbreadonly = ActiveWorkbook.ReadOnly
   wbsaved = ActiveWorkbook.Saved
   wbreserver = ActiveWorkbook.WriteReservedBy
   wbuser = Application.UserName

DefaultwindowCapn = Windows(1).Caption
' Then to put the session back to the earlier window (multiple views) follow any
file or sheet closure with 
   Windows(DefaultwindowCapn).Activate

wbsaved = ActiveWorkbook.Saved
If wbsaved <> True Then
   If wcreadonly <> False _
        Or wcuser <> wcreserver Then
        If wcformat <> xlNormal And _
           wcformat <> 50 And _
           wcformat <> 51 And _
           wcformat <> 52 And _
           wcformat <> 56 Then _
            Ab = MsgBox("Control File has one or more unexpected attributes
which may cause problems" _
                        & vbCrLf & " Format of file is """ & wbformat & """,
expected Normal code ""-4143"" " _
                        & vbCrLf & " ReadOnly Mode of file is """ & wbreadonly &
""", expected False" _
                        & vbCrLf & " Current Updater of file is """ & wbreserver
_
                                 & """, expected current user """ & wbuser &
"""" _
                        & vbCrLf _
                        & vbCrLf & "Select ""OK"" to continue with attempted
save of file and rest of processing." _
                        & vbCrLf _
                        & vbCrLf & " Format codes within Excel 97 to 2003 are "
_
                        & vbCrLf & "    -4143=Normal (XLS) -4158=text  2=SYLK
4=WKS  5=WK1  6=CSV  7=DBF2  8=DBF3" _
                        & vbCrLf & "       9=DIF  11=DBF4  14=WJ2WD1  15=WK3
16=Excel2  17=Template  18=Addin" _
                        & vbCrLf & "       19=TextMac  20=TextWindows
21=TextMSDOS  22=CSVMac  23=CSVWindows" _
                        & vbCrLf & "       24=CSVMSDOS  25=IntlMacro
26=IntlAddin  27=Excel2FarEast" _
                        & vbCrLf & "       28=Works2FarEast  29=Excel3
30=WK1FMT  31=WK1ALL  32=WK3FM3  33=Excel4" _
                        & vbCrLf & "       34=WQ1  35=Excel4Workbook
36=TextPrinter" _
                        & vbCrLf & " Format codes within Excel 2007 are " _
                        & vbCrLf & "       50=xlsb   51=xlsx (no macros)
52=xlsm   56=xls", _
                        Buttons:=vbOKCancel + vbCritical + vbDefaultButton1, _
                        Title:=DefaultProcname & " File status")
            If Ab = vbCancel Then
                Exit Sub
            End If
        End If
   ActiveWorkbook.Save
End If

And - for basic debugging

If Infos Then
      Ab = MsgBox("This macro has ended ", _
                 Title:=DefaultsubProcname & " has ended")
   End If
NocloseCtrlsn = False
   For Each Wrkbk In Workbooks()
      If Wrkbk.FullName = Controldata Then
         NocloseCtrlfn = True
      ElseIf Wrkbk.Name = controlfile Then
         NocloseCtrlsn = True
         NocloseCtrlfn = True
         Ab = MsgBox("Cannot access expected ""Control"" workbook" _
                          & vbCrLf & "This session of Excel appears to already
have a ""Control"" file named " _
                          & vbCrLf & "   " & Wrkbk.FullName & "\" _
                          & vbCrLf & "  open." _
                          & vbCrLf & "This file has the same name as the
specified control file," _
                          & vbCrLf & "  but is in a different directory from
that specified:- " _
                          & vbCrLf & "   " & controldiry & "\" _
                          & vbCrLf & "As Excell will only allow 1 file of each
short name to be open" _
                                   & " at a time," _
                          & vbCrLf & "  the file that is already open will be
used as is by the macro" _
                                   & " and neither saved or closed" _
                          & vbCrLf & vbCrLf & " Either select ""OK"" to
continue, using the open file," _
                                   & " or ""Cancel"" the process", _
                           Buttons:=vbOKCancel + vbCritical + vbDefaultButton1,
_
                           Title:=DefaultProcname & "Alternate Controls open")
         If Ab = vbCancel Then
            Exit Sub
         End If
      End If
   Next Wrkbk
'
'     If file is not already open then open and activate it  otherwise    If
going to update file say it will be saved twice,     activate it and save it If
not going to be updated, warn that it will be used as is     and just activate
it 
   If NocloseCtrlfn = False Then
      Workbooks.Open Filename:=Controldata, Updatelinks:=0,
ReadOnly:=ReadOnlyControlFile
      Workbooks(controlfile).Activate
   Else
      If ReadOnlyControlFile = True Then
         Ab = MsgBox("This session of Excel appears to already have the
""Control"" file named " _
                          & vbCrLf & Controldata _
                          & vbCrLf & " open, it will be used as is by the macro
and neither saved or closed" _
                          & vbCrLf & vbCrLf & "If that is acceptable then select
""OK"" - " _
                          & " otherwise select ""Cancel"" to abandon this
process", _
                          Buttons:=vbOKCancel + vbInformation +
vbDefaultButton1, _
                          Title:=DefaultProcname & "Controls already in use")
         If Ab = vbCancel Then
            Exit Sub
         End If
         Workbooks(controlfile).Activate
      Else
' test if we can save the workbook,  - note that we are to update it, so we
should save it
        Workbooks(controlfile).Activate
        wcformat = ActiveWorkbook.FileFormat
        wcreadonly = ActiveWorkbook.ReadOnly
        wcuser = Application.UserName
        wcreserver = ActiveWorkbook.WriteReservedBy
    If wcreadonly <> False _
        Or wcuser <> wcreserver Then
        If wcformat <> xlNormal And _
           wcformat <> 50 And _
           wcformat <> 51 And _
           wcformat <> 52 And _
           wcformat <> 56 Then _
            Ab = MsgBox("Control File has one or more unexpected attributes
which may cause problems" _
                        & vbCrLf & " Format of file is """ & wbformat & """,
expected Normal code ""-4143"" " _
                        & vbCrLf & " ReadOnly Mode of file is """ & wbreadonly &
""", expected False" _
                        & vbCrLf & " Current Updater of file is """ & wbreserver
_
                                 & """, expected current user """ & wbuser &
"""" _
                        & vbCrLf _
                        & vbCrLf & "Select ""OK"" to continue with attempted
save of file and rest of processing." _
                        & vbCrLf _
                        & vbCrLf & " Format codes within Excel 97 to 2003 are "
_
                        & vbCrLf & "    -4143=Normal (XLS) -4158=text  2=SYLK
4=WKS  5=WK1  6=CSV  7=DBF2  8=DBF3" _
                        & vbCrLf & "       9=DIF  11=DBF4  14=WJ2WD1  15=WK3
16=Excel2  17=Template  18=Addin" _
                        & vbCrLf & "       19=TextMac  20=TextWindows
21=TextMSDOS  22=CSVMac  23=CSVWindows" _
                        & vbCrLf & "       24=CSVMSDOS  25=IntlMacro
26=IntlAddin  27=Excel2FarEast" _
                        & vbCrLf & "       28=Works2FarEast  29=Excel3
30=WK1FMT  31=WK1ALL  32=WK3FM3  33=Excel4" _
                        & vbCrLf & "       34=WQ1  35=Excel4Workbook
36=TextPrinter" _
                        & vbCrLf & " Format codes within Excel 2007 are " _
                        & vbCrLf & "       50=xlsb   51=xlsx (no macros)
52=xlsm   56=xls", _
                        Buttons:=vbOKCancel + vbCritical + vbDefaultButton1, _
                        Title:=DefaultProcname & " File status")
            If Ab = vbCancel Then
                Exit Sub
            End If
        End If
' tested if we should be able to save the workbook,  - as we are to update it,
so warn and save it
         Ab = MsgBox("This session of Excel appears to already have the
""Control"" file named " _
                          & vbCrLf & Controldata _
                          & vbCrLf & " open, it will now be saved, used by the
macro and then re-saved, not closed" _
                          & vbCrLf & vbCrLf & "If that is acceptable then select
""OK"" - " _
                          & " otherwise select ""Cancel"" to abandon this
process", _
                          Buttons:=vbOKCancel + vbInformation +
vbDefaultButton1, _
                          Title:=DefaultProcname & "Controls already open")
         If Ab = vbCancel Then
            Exit Sub
         End If
     
      Workbooks(controlfile).Activate
      ActiveWorkbook.Save
      End If
   End If
      
'        SaveChanges=True if opened with READONLY=False
'         (indicates that Serial number is to be incremented)    
'            Now go and look for the control values
Lastrow = ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Row




From jamesbutton at blueyonder.co.uk  Fri Jun 24 09:53:16 2016
From: jamesbutton at blueyonder.co.uk (James Button)
Date: Fri, 24 Jun 2016 15:53:16 +0100
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column
	Is	Clicked
In-Reply-To: <CALGJE97s9kHHq-nyokEsrv5ELGur4NpeOSMRZEaMp18qH6UTag@mail.gmail.com>
References: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>	<F45923C68DE4456487957779AA20A961@XPS>
	<CALGJE97s9kHHq-nyokEsrv5ELGur4NpeOSMRZEaMp18qH6UTag@mail.gmail.com>
Message-ID: <!&!AAAAAAAAAAAYAAAAAAAAAO8VDlNCBfdEkctCy61lm0HCgAAAEAAAALWtuxEnz35Am+/5NjLYjcsBAAAAAA==@blueyonder.co.uk>

Paul,

You will probably get actual code to use if you post to 
Microsoft Excel Developers List <EXCEL-L at PEACH.EASE.LSOFT.COM>

With a fully specified definition of what you need, and from what
files/folders/current data layouts.

JimB

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Paul
Hartland
Sent: Friday, June 24, 2016 3:15 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Excel Object - Can You Tell What Row Or Column Is Clicked

Thanks Jim,

The vision I sort of have for this is an Access form with a button to
select the Excel file, then open the Excel file and show it on that form
for the user to select a row and/or column depending on what sheet is open,
store the row and/or column values in Access along with the Excel sheet
index, then once the user has done this for all six sheets close the Excel
object, then I can run the rest of my code which I have already....I just
need to know how to open the selected Excel file on a Access form and store
the row/column values that the user selects into Access variables.....Would
you be able to point me to a site with something similar so I can get a
better idea of how to do this please.

Many thanks in advance once more.

Paul

On 24 June 2016 at 14:56, Jim Dettman <jimdettman at verizon.net> wrote:

>
>  Yes that is possible.
>
>  Via automation, anything you can do in Excel manually, you can do through
> VBA and the object interface.
>
>  It's also possible to link to an Excel spreadsheet and read it as a table.
>
>  And last, you can just transfer the data into Access with
> Transferspreadsheet.
>
>  Not quite sure though which method would work best for you, but what your
> looking to do can be done one way or another.
>
> Jim.
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> Paul Hartland
> Sent: Friday, June 24, 2016 09:45 AM
> To: Access List
> Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is
> Clicked
>
> To all,
>
> A little background...I was given a task where an Excel sheet has upto 300
> different branches on it and about 6 sheets....The branch name is in each
> sheet and can be in there multiple times.  So I wrote a little VBA module
> that looked at the first sheet, gets a unique list of branch names, then
> one by one filters the six excel sheets by the branch name....ends up
> making a workbook with six sheets for each branch with only that branch
> name on.....
>
> But now I want to try and make a little front-end application, where the
> user is given an open file dialog to select the Excel sheet, then the user
> is presented with each of the six sheets in turn and asked to click a row
> and/or a column and the row number and/or column letter are stored in
> Access.....Is this possible, I have never done anything like that before, I
> have played with Excel objects etc, but nothing where the user selects a
> row from an Excel sheet and the value is passed back into Access, and I
> can't really seem to find anything on the internet...
>
> Thanks in advance for any help on this.
>
>
>
> --
> Paul Hartland
> paul.hartland at googlemail.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
>



-- 
Paul Hartland
paul.hartland at googlemail.com
-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From paul.hartland at googlemail.com  Fri Jun 24 09:58:19 2016
From: paul.hartland at googlemail.com (Paul Hartland)
Date: Fri, 24 Jun 2016 15:58:19 +0100
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is
	Clicked
In-Reply-To: <!&!AAAAAAAAAAAYAAAAAAAAAO8VDlNCBfdEkctCy61lm0HCgAAAEAAAALWtuxEnz35Am+/5NjLYjcsBAAAAAA==@blueyonder.co.uk>
References: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>
	<F45923C68DE4456487957779AA20A961@XPS>
	<CALGJE97s9kHHq-nyokEsrv5ELGur4NpeOSMRZEaMp18qH6UTag@mail.gmail.com>
	<!&!AAAAAAAAAAAYAAAAAAAAAO8VDlNCBfdEkctCy61lm0HCgAAAEAAAALWtuxEnz35Am+/5NjLYjcsBAAAAAA==@blueyonder.co.uk>
Message-ID: <CALGJE95j4yOuE7v4ZFJZG8U=f6MONijg87A5=vq0qZZESFYhGQ@mail.gmail.com>

Thanks again all, will have a closer look over the weekend or Monday as
just about to leave work now and there is beer to be drank ;)....

Thanks again to all that have replied, have a great weekend.

Paul

On 24 June 2016 at 15:53, James Button <jamesbutton at blueyonder.co.uk> wrote:

> Paul,
>
> You will probably get actual code to use if you post to
> Microsoft Excel Developers List <EXCEL-L at PEACH.EASE.LSOFT.COM>
>
> With a fully specified definition of what you need, and from what
> files/folders/current data layouts.
>
> JimB
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> Paul
> Hartland
> Sent: Friday, June 24, 2016 3:15 PM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Excel Object - Can You Tell What Row Or Column Is
> Clicked
>
> Thanks Jim,
>
> The vision I sort of have for this is an Access form with a button to
> select the Excel file, then open the Excel file and show it on that form
> for the user to select a row and/or column depending on what sheet is open,
> store the row and/or column values in Access along with the Excel sheet
> index, then once the user has done this for all six sheets close the Excel
> object, then I can run the rest of my code which I have already....I just
> need to know how to open the selected Excel file on a Access form and store
> the row/column values that the user selects into Access variables.....Would
> you be able to point me to a site with something similar so I can get a
> better idea of how to do this please.
>
> Many thanks in advance once more.
>
> Paul
>
> On 24 June 2016 at 14:56, Jim Dettman <jimdettman at verizon.net> wrote:
>
> >
> >  Yes that is possible.
> >
> >  Via automation, anything you can do in Excel manually, you can do
> through
> > VBA and the object interface.
> >
> >  It's also possible to link to an Excel spreadsheet and read it as a
> table.
> >
> >  And last, you can just transfer the data into Access with
> > Transferspreadsheet.
> >
> >  Not quite sure though which method would work best for you, but what
> your
> > looking to do can be done one way or another.
> >
> > Jim.
> >
> > -----Original Message-----
> > From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> > Paul Hartland
> > Sent: Friday, June 24, 2016 09:45 AM
> > To: Access List
> > Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is
> > Clicked
> >
> > To all,
> >
> > A little background...I was given a task where an Excel sheet has upto
> 300
> > different branches on it and about 6 sheets....The branch name is in each
> > sheet and can be in there multiple times.  So I wrote a little VBA module
> > that looked at the first sheet, gets a unique list of branch names, then
> > one by one filters the six excel sheets by the branch name....ends up
> > making a workbook with six sheets for each branch with only that branch
> > name on.....
> >
> > But now I want to try and make a little front-end application, where the
> > user is given an open file dialog to select the Excel sheet, then the
> user
> > is presented with each of the six sheets in turn and asked to click a row
> > and/or a column and the row number and/or column letter are stored in
> > Access.....Is this possible, I have never done anything like that
> before, I
> > have played with Excel objects etc, but nothing where the user selects a
> > row from an Excel sheet and the value is passed back into Access, and I
> > can't really seem to find anything on the internet...
> >
> > Thanks in advance for any help on this.
> >
> >
> >
> > --
> > Paul Hartland
> > paul.hartland at googlemail.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
> >
>
>
>
> --
> Paul Hartland
> paul.hartland at googlemail.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
>



-- 
Paul Hartland
paul.hartland at googlemail.com

From rockysmolin at bchacc.com  Fri Jun 24 10:17:50 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Fri, 24 Jun 2016 08:17:50 -0700
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is
	Clicked
In-Reply-To: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>
References: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>
Message-ID: <002d01d1ce2b$92a27150$b7e753f0$@bchacc.com>

Paul:

I did an application years ago which required extensive manipulation of
Excel spreadsheets.  I discovered, as you probably know, that anything you
can do in Excel you can do to Excel from Access.  The automation is
terrific.  And I did it both ways - pushing data from the back end into a
spreadsheet template so the accountant could massage the numbers, then using
VBA behind Excel to push the data back into the Access back end.

I think what you might need in this case is some VBA behind your Excel to
tell your Access app when the user selects a row.  And pushes that answer
back into your app and also triggers an event so you wknow when the user did
that.

OTOH, an easier solution, though more work, would be to import the
spreadsheet into a temp front end table and present that to the user in a
form that maybe mimics a spreadsheet.  Easier to trap their actions that
way.

BTW, I never did really learn how to automate Excel from Access - I just
used the macro recorder in Excel, cribbed out the code the recorder created
and used that in my Access app. 

HTH

Rocky


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Paul Hartland
Sent: Friday, June 24, 2016 6:45 AM
To: Access List
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is Clicked

To all,

A little background...I was given a task where an Excel sheet has upto 300
different branches on it and about 6 sheets....The branch name is in each
sheet and can be in there multiple times.  So I wrote a little VBA module
that looked at the first sheet, gets a unique list of branch names, then one
by one filters the six excel sheets by the branch name....ends up making a
workbook with six sheets for each branch with only that branch name on.....

But now I want to try and make a little front-end application, where the
user is given an open file dialog to select the Excel sheet, then the user
is presented with each of the six sheets in turn and asked to click a row
and/or a column and the row number and/or column letter are stored in
Access.....Is this possible, I have never done anything like that before, I
have played with Excel objects etc, but nothing where the user selects a row
from an Excel sheet and the value is passed back into Access, and I can't
really seem to find anything on the internet...

Thanks in advance for any help on this.



--
Paul Hartland
paul.hartland at googlemail.com
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From jamesbutton at blueyonder.co.uk  Fri Jun 24 10:29:52 2016
From: jamesbutton at blueyonder.co.uk (James Button)
Date: Fri, 24 Jun 2016 16:29:52 +0100
Subject: [AccessD] Excel Object - Can You Tell What Row Or Column
	Is	Clicked
In-Reply-To: <CALGJE95j4yOuE7v4ZFJZG8U=f6MONijg87A5=vq0qZZESFYhGQ@mail.gmail.com>
References: <CALGJE96Syd-TabQnCtgSPYy8769eAtWvNot2HGbWi5YDbTxJXA@mail.gmail.com>	<F45923C68DE4456487957779AA20A961@XPS>	<CALGJE97s9kHHq-nyokEsrv5ELGur4NpeOSMRZEaMp18qH6UTag@mail.gmail.com>	<!&!AAAAAAAAAAAYAAAAAAAAAO8VDlNCBfdEkctCy61lm0HCgAAAEAAAALWtuxEnz35Am+/5NjLYjcsBAAAAAA==@blueyonder.co.uk>
	<CALGJE95j4yOuE7v4ZFJZG8U=f6MONijg87A5=vq0qZZESFYhGQ@mail.gmail.com>
Message-ID: <!&!AAAAAAAAAAAYAAAAAAAAAO8VDlNCBfdEkctCy61lm0HCgAAAEAAAABBx5ouU1ytKij0YKVQq2FUBAAAAAA==@blueyonder.co.uk>

Running excel within an Access form may be a fun project for those using both
access and excel

I was considering you would be running excel as a separate task - and wanting
confirmation and process details passed back to the form - maybe with a pointer
to a source file containing the data to be used to update the database, or maybe
using SQL type scripts to get data - or to create the excel workbook

BUT you will need to consider the fraught-ness of Excel over the web - and
especially over wifi.

JimB   

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Paul
Hartland
Sent: Friday, June 24, 2016 3:58 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Excel Object - Can You Tell What Row Or Column Is Clicked

Thanks again all, will have a closer look over the weekend or Monday as
just about to leave work now and there is beer to be drank ;)....

Thanks again to all that have replied, have a great weekend.

Paul

On 24 June 2016 at 15:53, James Button <jamesbutton at blueyonder.co.uk> wrote:

> Paul,
>
> You will probably get actual code to use if you post to
> Microsoft Excel Developers List <EXCEL-L at PEACH.EASE.LSOFT.COM>
>
> With a fully specified definition of what you need, and from what
> files/folders/current data layouts.
>
> JimB
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> Paul
> Hartland
> Sent: Friday, June 24, 2016 3:15 PM
> To: Access Developers discussion and problem solving
> Subject: Re: [AccessD] Excel Object - Can You Tell What Row Or Column Is
> Clicked
>
> Thanks Jim,
>
> The vision I sort of have for this is an Access form with a button to
> select the Excel file, then open the Excel file and show it on that form
> for the user to select a row and/or column depending on what sheet is open,
> store the row and/or column values in Access along with the Excel sheet
> index, then once the user has done this for all six sheets close the Excel
> object, then I can run the rest of my code which I have already....I just
> need to know how to open the selected Excel file on a Access form and store
> the row/column values that the user selects into Access variables.....Would
> you be able to point me to a site with something similar so I can get a
> better idea of how to do this please.
>
> Many thanks in advance once more.
>
> Paul
>
> On 24 June 2016 at 14:56, Jim Dettman <jimdettman at verizon.net> wrote:
>
> >
> >  Yes that is possible.
> >
> >  Via automation, anything you can do in Excel manually, you can do
> through
> > VBA and the object interface.
> >
> >  It's also possible to link to an Excel spreadsheet and read it as a
> table.
> >
> >  And last, you can just transfer the data into Access with
> > Transferspreadsheet.
> >
> >  Not quite sure though which method would work best for you, but what
> your
> > looking to do can be done one way or another.
> >
> > Jim.
> >
> > -----Original Message-----
> > From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> > Paul Hartland
> > Sent: Friday, June 24, 2016 09:45 AM
> > To: Access List
> > Subject: [AccessD] Excel Object - Can You Tell What Row Or Column Is
> > Clicked
> >
> > To all,
> >
> > A little background...I was given a task where an Excel sheet has upto
> 300
> > different branches on it and about 6 sheets....The branch name is in each
> > sheet and can be in there multiple times.  So I wrote a little VBA module
> > that looked at the first sheet, gets a unique list of branch names, then
> > one by one filters the six excel sheets by the branch name....ends up
> > making a workbook with six sheets for each branch with only that branch
> > name on.....
> >
> > But now I want to try and make a little front-end application, where the
> > user is given an open file dialog to select the Excel sheet, then the
> user
> > is presented with each of the six sheets in turn and asked to click a row
> > and/or a column and the row number and/or column letter are stored in
> > Access.....Is this possible, I have never done anything like that
> before, I
> > have played with Excel objects etc, but nothing where the user selects a
> > row from an Excel sheet and the value is passed back into Access, and I
> > can't really seem to find anything on the internet...
> >
> > Thanks in advance for any help on this.
> >
> >
> >
> > --
> > Paul Hartland
> > paul.hartland at googlemail.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
> >
>
>
>
> --
> Paul Hartland
> paul.hartland at googlemail.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
>



-- 
Paul Hartland
paul.hartland at googlemail.com
-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From rockysmolin at bchacc.com  Sat Jun 25 19:47:57 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sat, 25 Jun 2016 17:47:57 -0700
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them
Message-ID: <019701d1cf44$624c2c20$26e48460$@bchacc.com>

 

http://tinyurl.com/zpbdcpb

 

I didn't get all of them.  Should I be worried.??

 

R


From jim at therareshop.com  Sat Jun 25 20:02:19 2016
From: jim at therareshop.com (Jim Hale)
Date: Sat, 25 Jun 2016 20:02:19 -0500
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them
In-Reply-To: <019701d1cf44$624c2c20$26e48460$@bchacc.com>
References: <019701d1cf44$624c2c20$26e48460$@bchacc.com>
Message-ID: <04d001d1cf46$63dc5720$2b950560$@therareshop.com>

Did you get the "I failed the Turing Test"? Just wondering :-)

J


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Rocky Smolin
Sent: Saturday, June 25, 2016 7:48 PM
To: 'Off Topic' <dba-ot at databaseadvisors.com>; 'Access Developers discussion
and problem solving' <accessd at databaseadvisors.com>
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them

 

http://tinyurl.com/zpbdcpb

 

I didn't get all of them.  Should I be worried.??

 

R

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com



From rockysmolin at bchacc.com  Sat Jun 25 21:32:07 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Sat, 25 Jun 2016 19:32:07 -0700
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them
In-Reply-To: <04d001d1cf46$63dc5720$2b950560$@therareshop.com>
References: <019701d1cf44$624c2c20$26e48460$@bchacc.com>
	<04d001d1cf46$63dc5720$2b950560$@therareshop.com>
Message-ID: <01ad01d1cf52$ef6b7580$ce426080$@bchacc.com>

Yeah, that one I nderstand :)

r

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim
Hale
Sent: Saturday, June 25, 2016 6:02 PM
To: 'Access Developers discussion and problem solving'
Subject: Re: [AccessD] 32 T-shirts so geeky only IT pros will get them

Did you get the "I failed the Turing Test"? Just wondering :-)

J


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
Rocky Smolin
Sent: Saturday, June 25, 2016 7:48 PM
To: 'Off Topic' <dba-ot at databaseadvisors.com>; 'Access Developers discussion
and problem solving' <accessd at databaseadvisors.com>
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them

 

http://tinyurl.com/zpbdcpb

 

I didn't get all of them.  Should I be worried.??

 

R

--
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


From accessd at shaw.ca  Sun Jun 26 00:09:20 2016
From: accessd at shaw.ca (Jim Lawrence)
Date: Sat, 25 Jun 2016 23:09:20 -0600 (MDT)
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them
In-Reply-To: <019701d1cf44$624c2c20$26e48460$@bchacc.com>
Message-ID: <694057264.15208035.1466917760217.JavaMail.root@shaw.ca>

Those are so cool.

Jim

----- Original Message -----
From: "Rocky Smolin" <rockysmolin at bchacc.com>
To: "Off Topic" <dba-ot at databaseadvisors.com>, "Access Developers discussion and problem solving" <accessd at databaseadvisors.com>
Sent: Saturday, June 25, 2016 5:47:57 PM
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them

 

http://tinyurl.com/zpbdcpb

 

I didn't get all of them.  Should I be worried.??

 

R

-- 
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com

From darryl at whittleconsulting.com.au  Sun Jun 26 04:51:22 2016
From: darryl at whittleconsulting.com.au (Darryl Collins)
Date: Sun, 26 Jun 2016 09:51:22 +0000
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them
In-Reply-To: <694057264.15208035.1466917760217.JavaMail.root@shaw.ca>
References: <019701d1cf44$624c2c20$26e48460$@bchacc.com>
	<694057264.15208035.1466917760217.JavaMail.root@shaw.ca>
Message-ID: <SYXPR01MB1071025A260494827B560C27FC200@SYXPR01MB1071.ausprd01.prod.outlook.com>

Hahaha...

I really want to get the "I'm here because you broke something..." T shirt ;)

"If at first you don't succeed, call it a 'beta'" is also tempting!



-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim Lawrence
Sent: Sunday, 26 June 2016 3:09 PM
To: Access Developers discussion and problem solving <accessd at databaseadvisors.com>
Subject: Re: [AccessD] 32 T-shirts so geeky only IT pros will get them

Those are so cool.

Jim

----- Original Message -----
From: "Rocky Smolin" <rockysmolin at bchacc.com>
To: "Off Topic" <dba-ot at databaseadvisors.com>, "Access Developers discussion and problem solving" <accessd at databaseadvisors.com>
Sent: Saturday, June 25, 2016 5:47:57 PM
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them

 

http://tinyurl.com/zpbdcpb

 

I didn't get all of them.  Should I be worried.??

 

R

-- 
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


From fuller.artful at gmail.com  Sun Jun 26 06:48:30 2016
From: fuller.artful at gmail.com (Arthur Fuller)
Date: Sun, 26 Jun 2016 07:48:30 -0400
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them
In-Reply-To: <SYXPR01MB1071025A260494827B560C27FC200@SYXPR01MB1071.ausprd01.prod.outlook.com>
References: <019701d1cf44$624c2c20$26e48460$@bchacc.com>
	<694057264.15208035.1466917760217.JavaMail.root@shaw.ca>
	<SYXPR01MB1071025A260494827B560C27FC200@SYXPR01MB1071.ausprd01.prod.outlook.com>
Message-ID: <CAEPJO1icFTGGu6FAwaxm36WhF4GczY0yJ02xsQBAqSn5A0EemQ@mail.gmail.com>

I didn't get Pied Piper.  But these are so cool I'd love to have all of
them.

A.
?

From carbonnb at gmail.com  Sun Jun 26 16:11:57 2016
From: carbonnb at gmail.com (Bryan Carbonnell)
Date: Sun, 26 Jun 2016 17:11:57 -0400
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them
In-Reply-To: <CAEPJO1icFTGGu6FAwaxm36WhF4GczY0yJ02xsQBAqSn5A0EemQ@mail.gmail.com>
References: <019701d1cf44$624c2c20$26e48460$@bchacc.com>
	<694057264.15208035.1466917760217.JavaMail.root@shaw.ca>
	<SYXPR01MB1071025A260494827B560C27FC200@SYXPR01MB1071.ausprd01.prod.outlook.com>
	<CAEPJO1icFTGGu6FAwaxm36WhF4GczY0yJ02xsQBAqSn5A0EemQ@mail.gmail.com>
Message-ID: <CAAZtbWHc=TDrL5rZYUz+NMT+9vNobZQ718A9YU9mf=v2jih_mQ@mail.gmail.com>

Pied Piper is the name of a fictional company on the HBO series Silicon Valley.

B

On Sun, Jun 26, 2016 at 7:48 AM, Arthur Fuller <fuller.artful at gmail.com> wrote:
> I didn't get Pied Piper.  But these are so cool I'd love to have all of
> them.
>
> A.
>
> --
> AccessD mailing list
> AccessD at databaseadvisors.com
> http://databaseadvisors.com/mailman/listinfo/accessd
> Website: http://www.databaseadvisors.com



-- 
Bryan Carbonnell - carbonnb at gmail.com
Life's journey is not to arrive at the grave safely in a
well-preserved body, but rather to skid in sideways, totally worn out,
shouting "What a great ride!"

From carbonnb at gmail.com  Sun Jun 26 16:22:22 2016
From: carbonnb at gmail.com (Bryan Carbonnell)
Date: Sun, 26 Jun 2016 17:22:22 -0400
Subject: [AccessD] 32 T-shirts so geeky only IT pros will get them
In-Reply-To: <CAAZtbWHc=TDrL5rZYUz+NMT+9vNobZQ718A9YU9mf=v2jih_mQ@mail.gmail.com>
References: <019701d1cf44$624c2c20$26e48460$@bchacc.com>
	<694057264.15208035.1466917760217.JavaMail.root@shaw.ca>
	<SYXPR01MB1071025A260494827B560C27FC200@SYXPR01MB1071.ausprd01.prod.outlook.com>
	<CAEPJO1icFTGGu6FAwaxm36WhF4GczY0yJ02xsQBAqSn5A0EemQ@mail.gmail.com>
	<CAAZtbWHc=TDrL5rZYUz+NMT+9vNobZQ718A9YU9mf=v2jih_mQ@mail.gmail.com>
Message-ID: <CAAZtbWG2Wpdep1q9-nwUu_sJapQozmFXLmENek0sUfi+uoDjrA@mail.gmail.com>

Oops, forgot the link....

http://www.piedpiper.com/ :)

B


On Sun, Jun 26, 2016 at 5:11 PM, Bryan Carbonnell <carbonnb at gmail.com> wrote:
> Pied Piper is the name of a fictional company on the HBO series Silicon Valley.
>
> B
>
> On Sun, Jun 26, 2016 at 7:48 AM, Arthur Fuller <fuller.artful at gmail.com> wrote:
>> I didn't get Pied Piper.  But these are so cool I'd love to have all of
>> them.
>>
>> A.
>>
>> --
>> AccessD mailing list
>> AccessD at databaseadvisors.com
>> http://databaseadvisors.com/mailman/listinfo/accessd
>> Website: http://www.databaseadvisors.com
>
>
>
> --
> Bryan Carbonnell - carbonnb at gmail.com
> Life's journey is not to arrive at the grave safely in a
> well-preserved body, but rather to skid in sideways, totally worn out,
> shouting "What a great ride!"



-- 
Bryan Carbonnell - carbonnb at gmail.com
Life's journey is not to arrive at the grave safely in a
well-preserved body, but rather to skid in sideways, totally worn out,
shouting "What a great ride!"

From charlotte.foust at gmail.com  Mon Jun 27 15:31:50 2016
From: charlotte.foust at gmail.com (Charlotte Foust)
Date: Mon, 27 Jun 2016 13:31:50 -0700
Subject: [AccessD] vbTrue vbFalse
In-Reply-To: <57686320.29410.2F01D01@stuart.lexacorp.com.pg>
References: <HE1PR0601MB2202F47479B281E224F35385CA2A0@HE1PR0601MB2202.eurprd06.prod.outlook.com>
	<57686320.29410.2F01D01@stuart.lexacorp.com.pg>
Message-ID: <CAH+Met_t3+YyxB-QaBySkJVrPwP4z+8Z+0_wNFSGYwDk2w+F8A@mail.gmail.com>

I'm convinced we're lab rats in a Microsoft testing maze and they do that
sort of thing on purpose!  ?

Charlotte Foust
(916) 206-4336

On Mon, Jun 20, 2016 at 2:41 PM, Stuart McLachlan <stuart at lexacorp.com.pg>
wrote:

> Yes, you're correct.   They've confused us by using the word TriState in
> different ways in
> differetn places :-(
>
> --
> Stuart
>
> On 20 Jun 2016 at 14:16, Gustav Brock wrote:
>
> > Hi Stuart
> >
> > I also had tristate checkboxes in mind, but I believe we have been
> > fooled - see my note to Bill.
> >
> > If the checkbox option Tristate is marked as False, it will switch
> > between True and False when clicked. However, marked as True, it will
> > switch between True and False and Undetermined where the value it
> > holds when Undetermined is Null. Also, Null is the only value that -
> > when assigned to its Value - will set the checkbox as Undetermined.
> > Any other value except 0 will set it to checked (True).
> >
> > So vbTriState (with the equivalent numeric value of -2) is not
> > intended for use with tristate checkboxes.
> >
> > /gustav
> >
> > -----Oprindelig meddelelse-----
> > Fra: AccessD [mailto:accessd-bounces at databaseadvisors.com] P? vegne af
> > Stuart McLachlan Sendt: 18. juni 2016 00:32 Til: Access Developers
> > discussion and problem solving <accessd at databaseadvisors.com> Emne:
> > Re: [AccessD] vbTrue vbFalse
> >
> > They are intended for use whereever there is a tri-state possibility
> > (i.e. true/false/not stated).
> >
> > Commonly used with TriState checkboxes and various Format functions.
> >
> >
> > And they are not new - they're described in the Getz/Gilbert VBA
> > Handbook (circa 2000)
> >
> >
> > On 17 Jun 2016 at 18:52, Gustav Brock wrote:
> >
> > > Hi all
> > >
> > > I discovered these new constants:
> > >
> > > https://msdn.microsoft.com/en-us/library/office/gg278431(v=office.15
> > > ). aspx
> > >
> > > There is also a vbUseDefault.
> > >
> > > Where/how would you use those?
> > >
> > > /gustav
> >
> > --
> > 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
>

From rockysmolin at bchacc.com  Tue Jun 28 10:25:26 2016
From: rockysmolin at bchacc.com (Rocky Smolin)
Date: Tue, 28 Jun 2016 08:25:26 -0700
Subject: [AccessD] Vertical line in detail section
In-Reply-To: <940728A1-17B9-4F95-98FA-B8802E1CAB96@verizon.net>
References: <2F811F6878774ADF8FFB25AA3D5E2CEA@HAL9007>
	<940728A1-17B9-4F95-98FA-B8802E1CAB96@verizon.net>
Message-ID: <003901d1d151$4c1de9c0$e459bd40$@bchacc.com>

Jim:

" grab the start of the detail section at the end of the page header" what
are you getting - the height of the detail section? The Top value? Is there
an event that will give you this?

" get the end of the details section starting with the page footer"  same
questions.  The line would have to be drawn in the detail section.  Can that
be done after not in the Detail Format event but form another event?

TIA

Rocky


-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Jim
Dettman
Sent: Saturday, June 18, 2016 2:34 PM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Vertical line in detail section

Rocky,

A couple of tricks here:

1. You can grab the start of the detail section at the end of the page
header and get the end of the details section starting with the page footer.
Then draw a line in the on page event after everything is been placed.

Leban had a class module for doing this.

2. But a really slick trick (and this is absolutely great for preprinted
forms), is to underlie the entire page in the page header event with an
image.  

I did this with a VICS BOL and it worked well.  There is an article on EE
which I'll get a link for to point you towards.

The technique is simple though; put an image the size of your entire page in
the page header event and then set move layout equal false.  You also need a
dummy had her group to soak up the actual heading height.

Jim



Sent from my iPhone

> On Jun 18, 2016, at 8:40 AM, Rocky Smolin <rockysmolin at bchacc.com> wrote:
> 
> Dear List:
> 
> I have a client who wants vertical lines in the detail section between 
> data fields.  This is no problem when the detail section is a fixed 
> height. I've done lots of those before - just make the vertical line 
> the exact height of the detail section and you get a nice continuous 
> vertical line wherever you want it on the report.
> 
> Problem in this case is that there are "Can Grow" fields in the detail 
> section which makes the detail height different for each detail line.
> 
> I put a MsgBox Me.Detail.Height in the Format, Retreat and Print 
> events to see if I could find out how high the section was but it 
> always comes up with the original design height, not the height of the 
> detail section with the expanded "Can Grow" text boxes.
> 
> So is there a way to know the height of the detail section at a point 
> where I could still adjust the vertical line height to fill the section?
> 
> MTIA
> 
> Rocky Smolin
> Beach Access Software
> 760-683-5777
> www.bchacc.com <http://www.bchacc.com/> www.e-z-mrp.com 
> <http://www.e-z-mrp.com/>
> Skype: rocky.smolin
> 
> --
> 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


From davidmcafee at gmail.com  Thu Jun 30 15:19:24 2016
From: davidmcafee at gmail.com (David McAfee)
Date: Thu, 30 Jun 2016 13:19:24 -0700
Subject: [AccessD] Video Rental DB
Message-ID: <CAMhYZWan+6gN-u94x+A6SaT1rL6LJr39O6ukP_xLesVdNugNVA@mail.gmail.com>

I'm creating a Video Rental database, and have a couple of roadblocks that
I am trying to get through.

A picture of  video / disc schema is available from my Google drive here:
https://drive.google.com/open?id=0B3zNbKE_HKVBMDJ6XzYtbWJ6UHM

I have three questions:
1. tblStatus currently has status choices of "In", "out", "Sold", "Damaged"
 I was thinking that I would put a StatusID FK field in tblDiscs to reflect
if the disc is currently in, out or otherwise. Then I started thinking that
I should have a junction table in between to keep a history.  Then I
started thinking that it really should be tied to tblInvoiceLine, which
shows when it was rented out. Any ideas on which way to proceed?


2. tblRentalSales was designed to track when an older, multiple copy has
been sold off. Really, I should put a flag in tblInvLine to indicate if
that particular line item was "sold" rather than rented (both can happen in
one transaction). Also, this could affect the previous question (Status of
disc is now sold)


3. Games (Xbox, Playstation....): I am unsure whether or not to make it a
flag in tblTitles, or set it in tblGenres or even tblFormat. tblFormat
(DVD, BlueRay, VHS...) could have a choice of Game, or even more granualar
such as XBOX.

I was thinking of using tblGenres (Horror, Comedy, Action...) for games as
I do for Movies, but I guess I could use them for game platform such as
 Playstation (what about Xbox 360, Xbox 1, PlayStation 3, 4...).

Any way, I would really appreciate any suggestions for any or all of the
three questions.

Thank you,
David

From darryl at whittleconsulting.com.au  Thu Jun 30 16:22:49 2016
From: darryl at whittleconsulting.com.au (Darryl Collins)
Date: Thu, 30 Jun 2016 21:22:49 +0000
Subject: [AccessD] Video Rental DB
In-Reply-To: <CAMhYZWan+6gN-u94x+A6SaT1rL6LJr39O6ukP_xLesVdNugNVA@mail.gmail.com>
References: <CAMhYZWan+6gN-u94x+A6SaT1rL6LJr39O6ukP_xLesVdNugNVA@mail.gmail.com>
Message-ID: <SYXPR01MB1071C36B4FEC292E64C54C48FC240@SYXPR01MB1071.ausprd01.prod.outlook.com>

I suspect this solution is not quite right for you and what you want to do, but maybe it will do the job and save you a whole stack of time and effort.

<< http://www.collectorz.com/>>

Worth a look.

Cheers
Darryl.

-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David McAfee
Sent: Friday, 1 July 2016 6:19 AM
To: Access Developers discussion and problem solving <accessd at databaseadvisors.com>
Subject: [AccessD] Video Rental DB

I'm creating a Video Rental database, and have a couple of roadblocks that I am trying to get through.

A picture of  video / disc schema is available from my Google drive here:
https://drive.google.com/open?id=0B3zNbKE_HKVBMDJ6XzYtbWJ6UHM

I have three questions:
1. tblStatus currently has status choices of "In", "out", "Sold", "Damaged"
 I was thinking that I would put a StatusID FK field in tblDiscs to reflect if the disc is currently in, out or otherwise. Then I started thinking that I should have a junction table in between to keep a history.  Then I started thinking that it really should be tied to tblInvoiceLine, which shows when it was rented out. Any ideas on which way to proceed?


2. tblRentalSales was designed to track when an older, multiple copy has been sold off. Really, I should put a flag in tblInvLine to indicate if that particular line item was "sold" rather than rented (both can happen in one transaction). Also, this could affect the previous question (Status of disc is now sold)


3. Games (Xbox, Playstation....): I am unsure whether or not to make it a flag in tblTitles, or set it in tblGenres or even tblFormat. tblFormat (DVD, BlueRay, VHS...) could have a choice of Game, or even more granualar such as XBOX.

I was thinking of using tblGenres (Horror, Comedy, Action...) for games as I do for Movies, but I guess I could use them for game platform such as  Playstation (what about Xbox 360, Xbox 1, PlayStation 3, 4...).

Any way, I would really appreciate any suggestions for any or all of the three questions.

Thank you,
David
--
AccessD mailing list
AccessD at databaseadvisors.com
http://databaseadvisors.com/mailman/listinfo/accessd
Website: http://www.databaseadvisors.com


From davidmcafee at gmail.com  Thu Jun 30 16:53:05 2016
From: davidmcafee at gmail.com (David McAfee)
Date: Thu, 30 Jun 2016 14:53:05 -0700
Subject: [AccessD] Video Rental DB
In-Reply-To: <SYXPR01MB1071C36B4FEC292E64C54C48FC240@SYXPR01MB1071.ausprd01.prod.outlook.com>
References: <CAMhYZWan+6gN-u94x+A6SaT1rL6LJr39O6ukP_xLesVdNugNVA@mail.gmail.com>
	<SYXPR01MB1071C36B4FEC292E64C54C48FC240@SYXPR01MB1071.ausprd01.prod.outlook.com>
Message-ID: <CAMhYZWbbo_CZ_CMNASP9JLAX6uWFOONJnksKoZPYFAEa+hsf+g@mail.gmail.com>

Just a quick glance, that appears to be more of a software to collect a
list of movies and / or music.

A little back story. :)

Back in February my wife (and I) bought a little retail store. In the back
of the store was a video rental section.

We were going to shut it down, after all who rents movies at a brick and
mortar store these days? :)

Well, we come to find out, a lot of people. We add at least 1 new customer
per day as they find out about it.

The P.O.S. (if you can call it that) for the rental side of the store is an
old DOS based application running on a Windows ME or 2000 system. I think
POS doesn't stand for Point of Sales, it's more like Piece of Sh*t :)

I could copy the flat dbase table structure thatthe software uses, but I'd
like to design something a little better.
I want to do it in Access first as a rapid development tool, just to show
the employees my thought on how the software should work.

In time, I'd like to connect to the web and/or make it a mobile app or web
based software.

On Thu, Jun 30, 2016 at 2:22 PM, Darryl Collins <
darryl at whittleconsulting.com.au> wrote:

> I suspect this solution is not quite right for you and what you want to
> do, but maybe it will do the job and save you a whole stack of time and
> effort.
>
> << http://www.collectorz.com/>>
>
> Worth a look.
>
> Cheers
> Darryl.
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of
> David McAfee
> Sent: Friday, 1 July 2016 6:19 AM
> To: Access Developers discussion and problem solving <
> accessd at databaseadvisors.com>
> Subject: [AccessD] Video Rental DB
>
> I'm creating a Video Rental database, and have a couple of roadblocks that
> I am trying to get through.
>
> A picture of  video / disc schema is available from my Google drive here:
> https://drive.google.com/open?id=0B3zNbKE_HKVBMDJ6XzYtbWJ6UHM
>
> I have three questions:
> 1. tblStatus currently has status choices of "In", "out", "Sold", "Damaged"
>  I was thinking that I would put a StatusID FK field in tblDiscs to
> reflect if the disc is currently in, out or otherwise. Then I started
> thinking that I should have a junction table in between to keep a history.
> Then I started thinking that it really should be tied to tblInvoiceLine,
> which shows when it was rented out. Any ideas on which way to proceed?
>
>
> 2. tblRentalSales was designed to track when an older, multiple copy has
> been sold off. Really, I should put a flag in tblInvLine to indicate if
> that particular line item was "sold" rather than rented (both can happen in
> one transaction). Also, this could affect the previous question (Status of
> disc is now sold)
>
>
> 3. Games (Xbox, Playstation....): I am unsure whether or not to make it a
> flag in tblTitles, or set it in tblGenres or even tblFormat. tblFormat
> (DVD, BlueRay, VHS...) could have a choice of Game, or even more granualar
> such as XBOX.
>
> I was thinking of using tblGenres (Horror, Comedy, Action...) for games as
> I do for Movies, but I guess I could use them for game platform such as
> Playstation (what about Xbox 360, Xbox 1, PlayStation 3, 4...).
>
> Any way, I would really appreciate any suggestions for any or all of the
> three questions.
>
> Thank you,
> David
> --
> 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
>

From stuart at lexacorp.com.pg  Thu Jun 30 18:41:14 2016
From: stuart at lexacorp.com.pg (Stuart McLachlan)
Date: Fri, 01 Jul 2016 09:41:14 +1000
Subject: [AccessD] Video Rental DB
In-Reply-To: <CAMhYZWbbo_CZ_CMNASP9JLAX6uWFOONJnksKoZPYFAEa+hsf+g@mail.gmail.com>
References: <CAMhYZWan+6gN-u94x+A6SaT1rL6LJr39O6ukP_xLesVdNugNVA@mail.gmail.com>,
	<SYXPR01MB1071C36B4FEC292E64C54C48FC240@SYXPR01MB1071.ausprd01.prod.outlook.com>,
	<CAMhYZWbbo_CZ_CMNASP9JLAX6uWFOONJnksKoZPYFAEa+hsf+g@mail.gmail.com>
Message-ID: <5775AE1A.28187.199609D5@stuart.lexacorp.com.pg>

Every time I look at a "Point of Sale" system, I think of your second meaning.  It seems as 
though that is an apt description for just about all of them. :-)

I'd definitely put  a Status flag in tblDisks and update it based on the InvoiceLine. 

Have a second table for returns which also updates the disk status.

A Union of relevant fields from your Invoice/ Invoice lines and Receipts then become your 
history without needing to maintain additional links.

I'd include a "Sold" flag and record the selling price as part of thh Invoice line, not use a 
separate table for sales.   

I'd probably go with a field in Title to differentiate directly between games and videos, but 
would also have appropriate entries in Genre AND Format (Xbox/PS2 etc)   
 


On 30 Jun 2016 at 14:53, David McAfee wrote:

> Just a quick glance, that appears to be more of a software to collect
> a list of movies and / or music.
> 
> A little back story. :)
> 
> Back in February my wife (and I) bought a little retail store. In the
> back of the store was a video rental section.
> 
> We were going to shut it down, after all who rents movies at a brick
> and mortar store these days? :)
> 
> Well, we come to find out, a lot of people. We add at least 1 new
> customer per day as they find out about it.
> 
> The P.O.S. (if you can call it that) for the rental side of the store
> is an old DOS based application running on a Windows ME or 2000
> system. I think POS doesn't stand for Point of Sales, it's more like
> Piece of Sh*t :)
> 
> I could copy the flat dbase table structure thatthe software uses, but
> I'd like to design something a little better. I want to do it in
> Access first as a rapid development tool, just to show the employees
> my thought on how the software should work.
> 
> In time, I'd like to connect to the web and/or make it a mobile app or
> web based software.
> 




From darryl at whittleconsulting.com.au  Thu Jun 30 19:17:19 2016
From: darryl at whittleconsulting.com.au (Darryl Collins)
Date: Fri, 1 Jul 2016 00:17:19 +0000
Subject: [AccessD] Video Rental DB
In-Reply-To: <CAMhYZWbbo_CZ_CMNASP9JLAX6uWFOONJnksKoZPYFAEa+hsf+g@mail.gmail.com>
References: <CAMhYZWan+6gN-u94x+A6SaT1rL6LJr39O6ukP_xLesVdNugNVA@mail.gmail.com>
	<SYXPR01MB1071C36B4FEC292E64C54C48FC240@SYXPR01MB1071.ausprd01.prod.outlook.com>
	<CAMhYZWbbo_CZ_CMNASP9JLAX6uWFOONJnksKoZPYFAEa+hsf+g@mail.gmail.com>
Message-ID: <SYXPR01MB10713956654986DB3C1D3083FC250@SYXPR01MB1071.ausprd01.prod.outlook.com>

Yeah, that is about right.  It is super useful for home and even corporate use, but your needs (as I suspected) are going to be a bit different.

Oh well...



-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of David McAfee
Sent: 1 July, 2016 7:53 AM
To: Access Developers discussion and problem solving <accessd at databaseadvisors.com>
Subject: Re: [AccessD] Video Rental DB

Just a quick glance, that appears to be more of a software to collect a list of movies and / or music.

A little back story. :)

Back in February my wife (and I) bought a little retail store. In the back of the store was a video rental section.

We were going to shut it down, after all who rents movies at a brick and mortar store these days? :)

Well, we come to find out, a lot of people. We add at least 1 new customer per day as they find out about it.

The P.O.S. (if you can call it that) for the rental side of the store is an old DOS based application running on a Windows ME or 2000 system. I think POS doesn't stand for Point of Sales, it's more like Piece of Sh*t :)

I could copy the flat dbase table structure thatthe software uses, but I'd like to design something a little better.
I want to do it in Access first as a rapid development tool, just to show the employees my thought on how the software should work.

In time, I'd like to connect to the web and/or make it a mobile app or web based software.

On Thu, Jun 30, 2016 at 2:22 PM, Darryl Collins < darryl at whittleconsulting.com.au> wrote:

> I suspect this solution is not quite right for you and what you want 
> to do, but maybe it will do the job and save you a whole stack of time 
> and effort.
>
> << http://www.collectorz.com/>>
>
> Worth a look.
>
> Cheers
> Darryl.
>
> -----Original Message-----
> From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf 
> Of David McAfee
> Sent: Friday, 1 July 2016 6:19 AM
> To: Access Developers discussion and problem solving < 
> accessd at databaseadvisors.com>
> Subject: [AccessD] Video Rental DB
>
> I'm creating a Video Rental database, and have a couple of roadblocks 
> that I am trying to get through.
>
> A picture of  video / disc schema is available from my Google drive here:
> https://drive.google.com/open?id=0B3zNbKE_HKVBMDJ6XzYtbWJ6UHM
>
> I have three questions:
> 1. tblStatus currently has status choices of "In", "out", "Sold", "Damaged"
>  I was thinking that I would put a StatusID FK field in tblDiscs to 
> reflect if the disc is currently in, out or otherwise. Then I started 
> thinking that I should have a junction table in between to keep a history.
> Then I started thinking that it really should be tied to 
> tblInvoiceLine, which shows when it was rented out. Any ideas on which way to proceed?
>
>
> 2. tblRentalSales was designed to track when an older, multiple copy 
> has been sold off. Really, I should put a flag in tblInvLine to 
> indicate if that particular line item was "sold" rather than rented 
> (both can happen in one transaction). Also, this could affect the 
> previous question (Status of disc is now sold)
>
>
> 3. Games (Xbox, Playstation....): I am unsure whether or not to make 
> it a flag in tblTitles, or set it in tblGenres or even tblFormat. 
> tblFormat (DVD, BlueRay, VHS...) could have a choice of Game, or even 
> more granualar such as XBOX.
>
> I was thinking of using tblGenres (Horror, Comedy, Action...) for 
> games as I do for Movies, but I guess I could use them for game 
> platform such as Playstation (what about Xbox 360, Xbox 1, PlayStation 3, 4...).
>
> Any way, I would really appreciate any suggestions for any or all of 
> the three questions.
>
> Thank you,
> David
> --
> 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