Selecting and Printing Specific Records

[HankL]

Al,

I am a little lost as to how to create the two button on the form
I feel I do not know how to do the following and if you could give me step
by step instructions I certainly would appreciate it.
I don't want to screw up my present configuration because of lack of
knowledge

'Create two "Update" queries against your Restaurant table.

1) cmdPrintAll - will run qryPrintAll , that sets the PrintMe for every
Restaurant record to True.

2) cmdPrintNone - will run qryPrintNone , that sets the PrintMe for every

Restaurant record to False.'

Are these steps to be done in the TABLE AS FIELDS or in the QUERY DESIGN
SECTION ?

Thank you,

Hank

Hank,
When I spoke of adding "conveniences" once we got the basic
system working... this is one of them.
You might want two buttons on your form...
One button named cmdPrintAll and another named cmdPrintNone

Create two "Update" queries against your Restaurant table.
cmdPrintAll - will run qryPrintAll , that sets the PrintMe for every
Restaurant record to
True.
cmdPrintNone - will run qryPrintNone , that sets the PrintMe for every
Restaurant record to
False.
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."

 

[John Vinson]

That did it. I can't tell you how much I appreciate your patience and
working with me to help setup my being able to select and print a report
just on the restaurants I need to print.
You have really given me a much better understanding of how Access works
using the databases.

You're most welcome! Glad you were able to get it worked out.

John, I do have one more question. Is there a way that I could set up
something that after I print out the report I can select a button to delete
all of the check marks in my table at one time?

Yes. Create a Query in the query design window, qryResetPrint let's call it.
Base it on your table; select only the PrintMe field.

Put a criterion of True on the field. Change the query to an Update query
using the Query menu option. On the newly visible "Update To" line put False.

Save the query.

In your form, use the command button wizard to create a command button to
run this query (running a query will be one of the wizard options).

 

[Al Campagna]

Al,

I am a little lost as to how to create the two button on the form
I feel I do not know how to do the following and if you could give me step
by step instructions I certainly would appreciate it.
I don't want to screw up my present configuration because of lack of
knowledge

'Create two "Update" queries against your Restaurant table.

1) cmdPrintAll - will run qryPrintAll , that sets the PrintMe for every
Restaurant record to True.

2) cmdPrintNone - will run qryPrintNone , that sets the PrintMe for every

Restaurant record to False.'

Are these steps to be done in the TABLE AS FIELDS or in the QUERY
DESIGN SECTION ?

Thank you,

Hank

 

[Al Campagna]

Hank,
Well, you should know how to physically place two buttons on a form.
Each of those buttons will have an OnClick event.
That's where the code will go that will run the appropriate update
queries.

An Update query is a query one that alters data in a table, according to
user specified
criteria, with user defined values.

Go to Help, or any documentation you have, and read up on creating
Update
queries... how to create them, and how to use the query to alter values in a
table.
An Update query is an essential tool to know about.

qryPrintNone: Sets all PrintMe to False...
UPDATE tblRestaurant SET tblRestaurant.PrintMe = False;

qryPrintAll: Sets all PrintMe to True...
UPDATE tblRestaurant SET tblRestaurant.PrintMe = True;
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."

Al,

I am a little lost as to how to create the two button on the form
I feel I do not know how to do the following and if you could give me step
by step instructions I certainly would appreciate it.
I don't want to screw up my present configuration because of lack of
knowledge

'Create two "Update" queries against your Restaurant table.

1) cmdPrintAll - will run qryPrintAll , that sets the PrintMe for every
Restaurant record to True.

2) cmdPrintNone - will run qryPrintNone , that sets the PrintMe for every

Restaurant record to False.'

Are these steps to be done in the TABLE AS FIELDS or in the QUERY
DESIGN SECTION ?

Thank you,

Hank

 

[HankL]

John,

I followed your very explicit instructions.
I setup a new query called Reset Print
It shows Field as PrintMe
Table as Restaurant
Update to False
Criteria to True
In design view, I selected Control Wizards to make sure it was on
I then selected Command Button and placed it on the grid.
Beyond that nothing else came up from the Wizard to allow me to connect it
to run the query.
I may be entirely wrong, but I thought it would direct me to a macro builder
so that when I
selected the Command Button it would run the Reset Print Query

Please advise.

Thank you,

Hank
">

 

[Al Campagna]

Hank,
Before going any further...
*Back up your tables!!*

The Update query sounds good... (ex. name qryResetPrint)
Now, you just have to run the query when the user Clicks the form's
cmdResetPrint button.

In form design, in the Properties dialog box for your cmdResetPrint
button...
Find the button's OnClick event.
(in Properties, make sure the ALL tab is selected)
Place your cursor in the blank text control on the right.
Using the little arrow on the right, select Event Procedure from
the drop down.
Click the little button on the right with 3 dots (...)
You are now in the form's Module, where VB code can be placed.
(This code will execute whenever you Click the cmdRestPrint
button)
You'll see this...
Private Sub cmdResetPrint_Click()

End Sub

Add this line between those...
Private Sub cmdResetPrint_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

Now, when cmdResetPrint is clicked, the update query will run.
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."

 

[HankL]

Good Morning Al,

I hope I did not screw up the Command Button. Yesterday, when I could not
get it to work, I deleted it and put in a new command button. I was not
aware that each time you put one in it gives it a new number such as Command
44 or Command 46.
When I opened up properties of Reset Print in form view I see the following:
Heading of the properties form is Command Button:Command46. However I
renamed the Command Button to 'Reset Print' in the Design View and that is
the name also in Form View.
I go to Event tab and on line that says: 'On Click, next to it is [Event
Procedure]
I then select the little box with the three dots and it opens VB
The heading in the top box say's Command46
The box next to it say's 'Click'
Just below there is a section that say's

Private Sub Command46_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

After saving and going back to the form to make certain it works, I selected
the Reset Print Button and get the following error message in a Microsoft
Visual Basic dialog box:
Run-time error '7874'
Microsoft Office Access can't find the object'qryResetPrint.'

If I select the Debug button, it takes me back to the VB and highlights the
command, DoCmd.OpenQuery "qryResetPrint"

The actual name of my query is Query Reset Print and when I open the Query
in design view, the heading say's 'Query Reset Print: Update Query

Please advise.

Thank you,
Hank

 

[Al Campagna]

HankL,
Whenever you get code from anyone on these newsgroups... always
make sure that you use the object names you have. Often the responder
is using "example" names, when none are directly specified.
You should avoid spaces in your object names, and make them as
descriptive
as needed.. Not a "rule", but a common practice.
Try renaming your query to qryUpdatePrintNone, and your button to
cmdUpdatePrintNone

Use those names in my code...

Private Sub cmdUpdatePrintNone_Click()
DoCmd.OpenQuery "qryUpdatePrintNone"
End Sub

--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."

Good Morning Al,

I hope I did not screw up the Command Button. Yesterday, when I could not
get it to work, I deleted it and put in a new command button. I was not
aware that each time you put one in it gives it a new number such as
Command 44 or Command 46.
When I opened up properties of Reset Print in form view I see the
following:
Heading of the properties form is Command Button:Command46. However I
renamed the Command Button to 'Reset Print' in the Design View and that
is the name also in Form View.
I go to Event tab and on line that says: 'On Click, next to it is [Event
Procedure]
I then select the little box with the three dots and it opens VB
The heading in the top box say's Command46
The box next to it say's 'Click'
Just below there is a section that say's

Private Sub Command46_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

After saving and going back to the form to make certain it works, I
selected the Reset Print Button and get the following error message in a
Microsoft Visual Basic dialog box:
Run-time error '7874'
Microsoft Office Access can't find the object'qryResetPrint.'

If I select the Debug button, it takes me back to the VB and highlights
the command, DoCmd.OpenQuery "qryResetPrint"

The actual name of my query is Query Reset Print and when I open the Query
in design view, the heading say's 'Query Reset Print: Update Query

Please advise.

Thank you,
Hank

Hank,
Before going any further...
*Back up your tables!!*

The Update query sounds good... (ex. name qryResetPrint)
Now, you just have to run the query when the user Clicks the form's
cmdResetPrint button.

In form design, in the Properties dialog box for your cmdResetPrint
button...
Find the button's OnClick event.
(in Properties, make sure the ALL tab is selected)
Place your cursor in the blank text control on the right.
Using the little arrow on the right, select Event Procedure from
the drop down.
Click the little button on the right with 3 dots (...)
You are now in the form's Module, where VB code can be placed.
(This code will execute whenever you Click the cmdRestPrint
button)
You'll see this...
Private Sub cmdResetPrint_Click()

End Sub

Add this line between those...
Private Sub cmdResetPrint_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

Now, when cmdResetPrint is clicked, the update query will run.
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your
life."

 

[HankL]

Al,

I renamed my Update query to qryUpdatePrintNone
I renamed my button to cmdUpdatePrintNone
In design view of my Update query, this is the following information"

Field: PrintMe
Table: Restaurant
Update To:False
Criteria: True

When I select the cmdUpdatePrintNone button and I have a checkmark in
PrintMe on my Restaurant form nothing happens. The checkmark remains in the
box.
I opened properties of cmdUpdatePrintNone button and it showed the
following:
Name of Dialog Box is Command Button: Command
On Click: [Event Procedure]
I selected the small box with the 3 dots and it opened VB Restaurant

This is what I saw that relates to the Command Button
_______________________________________________
Private Sub cmdUpdatePrintNone_Click()
DoCmd.OpenQuery "qryUpdatePrintNone"
End Sub
_______________________________________________

Private Sub Command47_Click()

End Sub
_________________________________
It seems the second box with Private Sub Command47_Click() comes on after I
clicked on the button in the Form View

Any further suggestions will be appreciated.

Thank you,

HankL

HankL,
Whenever you get code from anyone on these newsgroups... always
make sure that you use the object names you have. Often the responder
is using "example" names, when none are directly specified.
You should avoid spaces in your object names, and make them as
descriptive
as needed.. Not a "rule", but a common practice.
Try renaming your query to qryUpdatePrintNone, and your button to
cmdUpdatePrintNone

Use those names in my code...

Private Sub cmdUpdatePrintNone_Click()
DoCmd.OpenQuery "qryUpdatePrintNone"
End Sub

--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."

Good Morning Al,

I hope I did not screw up the Command Button. Yesterday, when I could
not get it to work, I deleted it and put in a new command button. I was
not aware that each time you put one in it gives it a new number such as
Command 44 or Command 46.
When I opened up properties of Reset Print in form view I see the
following:
Heading of the properties form is Command Button:Command46. However I
renamed the Command Button to 'Reset Print' in the Design View and that
is the name also in Form View.
I go to Event tab and on line that says: 'On Click, next to it is [Event
Procedure]
I then select the little box with the three dots and it opens VB
The heading in the top box say's Command46
The box next to it say's 'Click'
Just below there is a section that say's

Private Sub Command46_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

After saving and going back to the form to make certain it works, I
selected the Reset Print Button and get the following error message in a
Microsoft Visual Basic dialog box:
Run-time error '7874'
Microsoft Office Access can't find the object'qryResetPrint.'

If I select the Debug button, it takes me back to the VB and highlights
the command, DoCmd.OpenQuery "qryResetPrint"

The actual name of my query is Query Reset Print and when I open the
Query in design view, the heading say's 'Query Reset Print: Update Query

Please advise.

Thank you,
Hank

Hank,
Before going any further...
*Back up your tables!!*

The Update query sounds good... (ex. name qryResetPrint)
Now, you just have to run the query when the user Clicks the form's
cmdResetPrint button.

In form design, in the Properties dialog box for your cmdResetPrint
button...
Find the button's OnClick event.
(in Properties, make sure the ALL tab is selected)
Place your cursor in the blank text control on the right.
Using the little arrow on the right, select Event Procedure from
the drop down.
Click the little button on the right with 3 dots (...)
You are now in the form's Module, where VB code can be placed.
(This code will execute whenever you Click the cmdRestPrint
button)
You'll see this...
Private Sub cmdResetPrint_Click()

End Sub

Add this line between those...
Private Sub cmdResetPrint_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

Now, when cmdResetPrint is clicked, the update query will run.
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your
life."


John,

I followed your very explicit instructions.
I setup a new query called Reset Print
It shows Field as PrintMe
Table as Restaurant
Update to False
Criteria to True
In design view, I selected Control Wizards to make sure it was on
I then selected Command Button and placed it on the grid.
Beyond that nothing else came up from the Wizard to allow me to connect
it to run the query.
I may be entirely wrong, but I thought it would direct me to a macro
builder so that when I
selected the Command Button it would run the Reset Print Query

Please advise.

Thank you,

Hank
">
Yes. Create a Query in the query design window, qryResetPrint let's
call it.
Base it on your table; select only the PrintMe field.

Put a criterion of True on the field. Change the query to an Update
query
using the Query menu option. On the newly visible "Update To" line put
False.

Save the query.

In your form, use the command button wizard to create a command button
to
run this query (running a query will be one of the wizard options).

 

[Al Campagna]

Hank,
Are you sure the name of your button is...
cmdUpdatePrintNone
Are you sure the query is named...
qryUpdatePrintNone
Are you sure you have the code attached to the
correct button name and correct event?

************* Important
What happens when you run the query from query design view.
(Query/Run)... (with several Restaurant records with PrintMe =True)
Does the query work from there?
*************

Even if there were no PrintMe set to True, the Update query
should come back with "Updating 0 Records." The fact that
you never got a message indicates that the query never ran.

Also, assuming you have your code on the correct control, and
on the correct event...
try this amended code...
Private Sub cmdUpdatePrintNone_Click()
Refresh
DoCmd.OpenQuery "qryUpdatePrintNone"
End Sub
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."

Al,

I renamed my Update query qryUpdatePrintNone
I renamed my button to cmdUpdatePrintNone
In design view of my Update query, this is the following information"

Field: PrintMe
Table: Restaurant
Update To:False
Criteria: True

When I select the cmdUpdatePrintNone button and I have a checkmark in
PrintMe on my Restaurant form nothing happens. The checkmark remains in
the box.
I opened properties of cmdUpdatePrintNone button and it showed the
following:
Name of Dialog Box is Command Button: Command
On Click: [Event Procedure]
I selected the small box with the 3 dots and it opened VB Restaurant

This is what I saw that relates to the Command Button
_______________________________________________
Private Sub cmdUpdatePrintNone_Click()
DoCmd.OpenQuery "qryUpdatePrintNone"
End Sub
_______________________________________________

Private Sub Command47_Click()

End Sub
_________________________________
It seems the second box with Private Sub Command47_Click() comes on after
I clicked on the button in the Form View

Any further suggestions will be appreciated.

Thank you,

HankL

HankL,
Whenever you get code from anyone on these newsgroups... always
make sure that you use the object names you have. Often the responder
is using "example" names, when none are directly specified.
You should avoid spaces in your object names, and make them as
descriptive
as needed.. Not a "rule", but a common practice.
Try renaming your query to qryUpdatePrintNone, and your button to
cmdUpdatePrintNone

Use those names in my code...

Private Sub cmdUpdatePrintNone_Click()
DoCmd.OpenQuery "qryUpdatePrintNone"
End Sub

--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your
life."

Good Morning Al,

I hope I did not screw up the Command Button. Yesterday, when I could
not get it to work, I deleted it and put in a new command button. I was
not aware that each time you put one in it gives it a new number such as
Command 44 or Command 46.
When I opened up properties of Reset Print in form view I see the
following:
Heading of the properties form is Command Button:Command46. However I
renamed the Command Button to 'Reset Print' in the Design View and
that is the name also in Form View.
I go to Event tab and on line that says: 'On Click, next to it is [Event
Procedure]
I then select the little box with the three dots and it opens VB
The heading in the top box say's Command46
The box next to it say's 'Click'
Just below there is a section that say's

Private Sub Command46_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

After saving and going back to the form to make certain it works, I
selected the Reset Print Button and get the following error message in a
Microsoft Visual Basic dialog box:
Run-time error '7874'
Microsoft Office Access can't find the object'qryResetPrint.'

If I select the Debug button, it takes me back to the VB and highlights
the command, DoCmd.OpenQuery "qryResetPrint"

The actual name of my query is Query Reset Print and when I open the
Query in design view, the heading say's 'Query Reset Print: Update Query

Please advise.

Thank you,
Hank






Hank,
Before going any further...
*Back up your tables!!*

The Update query sounds good... (ex. name qryResetPrint)
Now, you just have to run the query when the user Clicks the form's
cmdResetPrint button.

In form design, in the Properties dialog box for your cmdResetPrint
button...
Find the button's OnClick event.
(in Properties, make sure the ALL tab is selected)
Place your cursor in the blank text control on the right.
Using the little arrow on the right, select Event Procedure from
the drop down.
Click the little button on the right with 3 dots (...)
You are now in the form's Module, where VB code can be placed.
(This code will execute whenever you Click the cmdRestPrint
button)
You'll see this...
Private Sub cmdResetPrint_Click()

End Sub

Add this line between those...
Private Sub cmdResetPrint_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

Now, when cmdResetPrint is clicked, the update query will run.
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your
life."


John,

I followed your very explicit instructions.
I setup a new query called Reset Print
It shows Field as PrintMe
Table as Restaurant
Update to False
Criteria to True
In design view, I selected Control Wizards to make sure it was on
I then selected Command Button and placed it on the grid.
Beyond that nothing else came up from the Wizard to allow me to
connect it to run the query.
I may be entirely wrong, but I thought it would direct me to a macro
builder so that when I
selected the Command Button it would run the Reset Print Query

Please advise.

Thank you,

Hank
">
Yes. Create a Query in the query design window, qryResetPrint let's
call it.
Base it on your table; select only the PrintMe field.

Put a criterion of True on the field. Change the query to an Update
query
using the Query menu option. On the newly visible "Update To" line
put False.

Save the query.

In your form, use the command button wizard to create a command
button to
run this query (running a query will be one of the wizard options).

 

[Al Campagna]

Hank,
Are you still out there?
Any success...
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your life."

Al,

I renamed my Update query to qryUpdatePrintNone
I renamed my button to cmdUpdatePrintNone
In design view of my Update query, this is the following information"

Field: PrintMe
Table: Restaurant
Update To:False
Criteria: True

When I select the cmdUpdatePrintNone button and I have a checkmark in
PrintMe on my Restaurant form nothing happens. The checkmark remains in
the box.
I opened properties of cmdUpdatePrintNone button and it showed the
following:
Name of Dialog Box is Command Button: Command
On Click: [Event Procedure]
I selected the small box with the 3 dots and it opened VB Restaurant

This is what I saw that relates to the Command Button
_______________________________________________
Private Sub cmdUpdatePrintNone_Click()
DoCmd.OpenQuery "qryUpdatePrintNone"
End Sub
_______________________________________________

Private Sub Command47_Click()

End Sub
_________________________________
It seems the second box with Private Sub Command47_Click() comes on after
I clicked on the button in the Form View

Any further suggestions will be appreciated.

Thank you,

HankL

HankL,
Whenever you get code from anyone on these newsgroups... always
make sure that you use the object names you have. Often the responder
is using "example" names, when none are directly specified.
You should avoid spaces in your object names, and make them as
descriptive
as needed.. Not a "rule", but a common practice.
Try renaming your query to qryUpdatePrintNone, and your button to
cmdUpdatePrintNone

Use those names in my code...

Private Sub cmdUpdatePrintNone_Click()
DoCmd.OpenQuery "qryUpdatePrintNone"
End Sub

--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your
life."

Good Morning Al,

I hope I did not screw up the Command Button. Yesterday, when I could
not get it to work, I deleted it and put in a new command button. I was
not aware that each time you put one in it gives it a new number such as
Command 44 or Command 46.
When I opened up properties of Reset Print in form view I see the
following:
Heading of the properties form is Command Button:Command46. However I
renamed the Command Button to 'Reset Print' in the Design View and
that is the name also in Form View.
I go to Event tab and on line that says: 'On Click, next to it is [Event
Procedure]
I then select the little box with the three dots and it opens VB
The heading in the top box say's Command46
The box next to it say's 'Click'
Just below there is a section that say's

Private Sub Command46_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

After saving and going back to the form to make certain it works, I
selected the Reset Print Button and get the following error message in a
Microsoft Visual Basic dialog box:
Run-time error '7874'
Microsoft Office Access can't find the object'qryResetPrint.'

If I select the Debug button, it takes me back to the VB and highlights
the command, DoCmd.OpenQuery "qryResetPrint"

The actual name of my query is Query Reset Print and when I open the
Query in design view, the heading say's 'Query Reset Print: Update Query

Please advise.

Thank you,
Hank






Hank,
Before going any further...
*Back up your tables!!*

The Update query sounds good... (ex. name qryResetPrint)
Now, you just have to run the query when the user Clicks the form's
cmdResetPrint button.

In form design, in the Properties dialog box for your cmdResetPrint
button...
Find the button's OnClick event.
(in Properties, make sure the ALL tab is selected)
Place your cursor in the blank text control on the right.
Using the little arrow on the right, select Event Procedure from
the drop down.
Click the little button on the right with 3 dots (...)
You are now in the form's Module, where VB code can be placed.
(This code will execute whenever you Click the cmdRestPrint
button)
You'll see this...
Private Sub cmdResetPrint_Click()

End Sub

Add this line between those...
Private Sub cmdResetPrint_Click()
DoCmd.OpenQuery "qryResetPrint"
End Sub

Now, when cmdResetPrint is clicked, the update query will run.
--
hth
Al Campagna
Microsoft Access MVP
http://home.comcast.net/~cccsolutions/index.html

"Find a job that you love... and you'll never work a day in your
life."


John,

I followed your very explicit instructions.
I setup a new query called Reset Print
It shows Field as PrintMe
Table as Restaurant
Update to False
Criteria to True
In design view, I selected Control Wizards to make sure it was on
I then selected Command Button and placed it on the grid.
Beyond that nothing else came up from the Wizard to allow me to
connect it to run the query.
I may be entirely wrong, but I thought it would direct me to a macro
builder so that when I
selected the Command Button it would run the Reset Print Query

Please advise.

Thank you,

Hank
">
Yes. Create a Query in the query design window, qryResetPrint let's
call it.
Base it on your table; select only the PrintMe field.

Put a criterion of True on the field. Change the query to an Update
query
using the Query menu option. On the newly visible "Update To" line
put False.

Save the query.

In your form, use the command button wizard to create a command
button to
run this query (running a query will be one of the wizard options).