Minggu, 31 Januari 2016

[MS_AccessPros] Filter Problem with amount

 

Dear All,
The filter I use doesn't work. Please help.
Me.Filter = "Amount=" & Me.Amount01

The amount is a fixed currency field. What did I do wrong? Thanks in advance.
Best Regards,
Kevin


__._,_.___

Posted by: "zhaoliqingoffice@163.com" <zhaoliqingoffice@163.com>
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)

.

__,_._,___

Re: [MS_AccessPros] Questions About Name Fields

 

Jerry

This is a perfect example of where you should use a third table to connect composers and songs. This table known as a junction table would have one field for composerid and one for songid.

Always use separate fields for first and last names

Glenn

Sent from mobile




On Sun, Jan 31, 2016 at 1:37 PM -0800, "Jerry in Michigan bearjercares@gmail.com [MS_Access_Professionals]" <MS_Access_Professionals@yahoogroups.com> wrote:

 

I'm working on a database which can involve multiple composers. It's a
song database. My question is what is the best way to design the
composer name fields?

1. Use separate LAST NAME, FIRST NAME fields or just one name field?

2. Use separate COMPOSER NAME fields to allow those songs that have
multiple composers? Seems to say composer1, composer2, etc. would be
cumbersome because some will have more than three authors, etc.?

3. Of course, there will be a table of all composers.

Any ideas would be appreciated.

Thanks,
Jerry in Michigan, USA

__._,_.___

Posted by: argeedblu@gmail.com
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (2)

.

__,_._,___

[MS_AccessPros] Questions About Name Fields

 

I'm working on a database which can involve multiple composers. It's a
song database. My question is what is the best way to design the
composer name fields?

1. Use separate LAST NAME, FIRST NAME fields or just one name field?

2. Use separate COMPOSER NAME fields to allow those songs that have
multiple composers? Seems to say composer1, composer2, etc. would be
cumbersome because some will have more than three authors, etc.?

3. Of course, there will be a table of all composers.

Any ideas would be appreciated.

Thanks,
Jerry in Michigan, USA

__._,_.___

Posted by: Jerry in Michigan <bearjercares@gmail.com>
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)

.

__,_._,___

RE: [belajar-access] Training MS Access - Basic & Programming

 

Kapan kah ada trainning di kota2 lain selain di jakarta?


Sent from Samsung Mobile



-------- Original message --------
From: "estu_graha@yahoo.com [belajar-access]" <belajar-access@yahoogroups.com>
Date: 12/01/2016 15:33 (GMT+07:00)
To: belajar-access@yahoogroups.com
Subject: [belajar-access] Training MS Access - Basic Programming [1 Attachment]


 

Kembali diadakan training 2 hari (MS Access - Basic & Programming) pada hari Sabtu, 30 Jan 2016 dan Minggu, 31 Jan 2016. 
Jangan terlewatkan, karena jadwal berikutnya belum tentu dalam 1 atau 2 bulan. Lihat keterangan lengkap di: RumahAccess Indonesia - Tempatnya Belajar MS Access di Indonesia

 

__._,_.___

Posted by: deroyipb <deroyipb@yahoo.com>
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)
SPAM IS PROHIBITED

.

__,_._,___

Bls: [belajar-access] mengetahui isi dari suatu form atau yang berhubungan dengan form

 

Dear:
Him mah

Coba
Open form.
Klik Home pilih design view .
Klik Design , klik propertis , klik Data .
Lihat di record source..!
Di situlah database yang terhubung dgn form.

Semoga membantu.

SHS

"him mah himmah.mlg@gmail.com [belajar-access]" <belajar-access@yahoogroups.com> menulis:

 

Assalamu'alaikum wr. wb
dear all

bisa ngga dengan VBA kita mengetahui apa saja yang berhubungan dengan suatu form baik itu  tabel, query, atau fungsi apa saja yang terkait dengan suatu form

misal form A :
tabel yang terkait: Tabel A, tabel B dan Tabel D
query yang terkait: Query AB dan query AD
sub form nya: formA1 dan formA2

terima kasih sebelumnya


Posted by: him mah <himmah.mlg@gmail.com>
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)

__._,_.___

Posted by: sarmin.hadji@gmail.com
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)
SPAM IS PROHIBITED

.

__,_._,___

Sabtu, 30 Januari 2016

[belajar-access] mengetahui isi dari suatu form atau yang berhubungan dengan form

 

Assalamu'alaikum wr. wb
dear all

bisa ngga dengan VBA kita mengetahui apa saja yang berhubungan dengan suatu form baik itu  tabel, query, atau fungsi apa saja yang terkait dengan suatu form

misal form A :
tabel yang terkait: Tabel A, tabel B dan Tabel D
query yang terkait: Query AB dan query AD
sub form nya: formA1 dan formA2

terima kasih sebelumnya

__._,_.___

Posted by: him mah <himmah.mlg@gmail.com>
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (1)
SPAM IS PROHIBITED

.

__,_._,___

Re: [MS_AccessPros] Re: Query the most recent date!

Rohn-

When you reply on the web, be sure to click Show Message History at the bottom of the reply window to make sure the thread stays intact.

The SQL I gave you does find the latest by employee ID:

SELECT License_Cert.[Emp#], License_Cert.Cert_Date, License_Cert.Cert_Title, License_Cert.Cert_NO, License_Cert.Issuing_Authority, Year([Cert_Date]) AS [YEAR], [First_Name] & ' ' & [Last_Name] AS Name, License_Cert.Cert_Expire_Date
FROM License_Cert INNER JOIN dbo_EMPLOYEE ON License_Cert.[EMP#] = dbo_EMPLOYEE.ID
WHERE (((License_Cert.[Emp#]) Like "*" & [Enter Employee Number:] & "*") AND ((License_Cert.Cert_Title) Like "*" & [Enter Cert Title:] & "*"))
AND License_Cert.Cert_Expire_Date = (SELECT MAX(Cert_Expire_Date) FROM License_Cert As L2 WHERE L2.[EMP#] = dbo_EMPLOYEE.ID);

If you want the latest by employee ID AND certificate, then do:

SELECT License_Cert.[Emp#], License_Cert.Cert_Date, License_Cert.Cert_Title, License_Cert.Cert_NO, License_Cert.Issuing_Authority, Year([Cert_Date]) AS [YEAR], [First_Name] & ' ' & [Last_Name] AS Name, License_Cert.Cert_Expire_Date
FROM License_Cert INNER JOIN dbo_EMPLOYEE ON License_Cert.[EMP#] = dbo_EMPLOYEE.ID
WHERE (((License_Cert.[Emp#]) Like "*" & [Enter Employee Number:] & "*") AND ((License_Cert.Cert_Title) Like "*" & [Enter Cert Title:] & "*"))
AND License_Cert.Cert_Expire_Date = (SELECT MAX(Cert_Expire_Date) FROM License_Cert As L2 WHERE L2.[EMP#] = dbo_EMPLOYEE.ID
AND L2.Cert_NO = License_Cert.Cert_NO);

If the certification numbers aren't unique, then you'll have to do it on title:

SELECT License_Cert.[Emp#], License_Cert.Cert_Date, License_Cert.Cert_Title, License_Cert.Cert_NO, License_Cert.Issuing_Authority, Year([Cert_Date]) AS [YEAR], [First_Name] & ' ' & [Last_Name] AS Name, License_Cert.Cert_Expire_Date
FROM License_Cert INNER JOIN dbo_EMPLOYEE ON License_Cert.[EMP#] = dbo_EMPLOYEE.ID
WHERE (((License_Cert.[Emp#]) Like "*" & [Enter Employee Number:] & "*") AND ((License_Cert.Cert_Title) Like "*" & [Enter Cert Title:] & "*"))
AND License_Cert.Cert_Expire_Date = (SELECT MAX(Cert_Expire_Date) FROM License_Cert As L2 WHERE L2.[EMP#] = dbo_EMPLOYEE.ID
AND L2.Cert_Title = License_Cert.Cert_Title);

John Viescas, Author
Microsoft Access 2010 Inside Out
Microsoft Access 2007 Inside Out
Microsoft Access 2003 Inside Out
Building Microsoft Access Applications
SQL Queries for Mere Mortals
http://www.viescas.com/
(Paris, France)



On Jan 30, 2016, at 3:32 AM, Duane Hookom duanehookom@hotmail.com [MS_Access_Professionals] <MS_Access_Professionals@yahoogroups.com> wrote:

Rohn,


You really need to provide more information. What you provided in this message lacks any Emp#. Please give all the information required such as all the significant fields and table names. Some sample records and desired results would be helpful.


Duane Hookom, MVP

MS Access

________________________________
> To: MS_Access_Professionals@yahoogroups.com
> From: MS_Access_Professionals@yahoogroups.com
> Date: Fri, 29 Jan 2016 14:24:21 -0800
> Subject: [MS_AccessPros] Re: Query the most recent date!
>
>
>
> WOW, Thanks for the quick response John, that does a great job of
> getting down to just the greatest date. Guessing I need to be more
> articulate... I'm looking for the greatest date (with your
> suggestion) by employee id (License_Cert.[Emp#]) if that makes since.
>
> The data looks like:
> ID Cert_Expire_Date Cert_Title
> 0284 05/12/2011 Scissor Lift Cert
> 0284 02/11/2012 Scissor Lift Cert
> 0284 07/22/2014 Scissor Lift Cert
> 0284 01/08/2015 Scissor Lift Cert
> 0742 01/14/2011 Scissor Lift Cert
> 0742 07/28/2014 Scissor Lift Cert
> 0742 11/17/2015 Scissor Lift Cert
>
> I have been playing with your suggestion but can't figure out how to
> get the latest date for each employee ID.
>
> Sorry for not being more precise in my first explanation!
> Regards, Rohn
>
>
>

------------------------------------

------------------------------------


------------------------------------

Yahoo Groups Links






------------------------------------

------------------------------------


------------------------------------

Yahoo Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/MS_Access_Professionals/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/MS_Access_Professionals/join
(Yahoo! ID required)

<*> To change settings via email:
MS_Access_Professionals-digest@yahoogroups.com
MS_Access_Professionals-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
MS_Access_Professionals-unsubscribe@yahoogroups.com

<*> Your use of Yahoo Groups is subject to:
https://info.yahoo.com/legal/us/yahoo/utos/terms/

Jumat, 29 Januari 2016

RE: [MS_AccessPros] Re: Query the most recent date!

Rohn,


You really need to provide more information. What you provided in this message lacks any Emp#. Please give all the information required such as all the significant fields and table names. Some sample records and desired results would be helpful.


Duane Hookom, MVP

MS Access

________________________________
> To: MS_Access_Professionals@yahoogroups.com
> From: MS_Access_Professionals@yahoogroups.com
> Date: Fri, 29 Jan 2016 14:24:21 -0800
> Subject: [MS_AccessPros] Re: Query the most recent date!
>
>
>
> WOW, Thanks for the quick response John, that does a great job of
> getting down to just the greatest date. Guessing I need to be more
> articulate... I'm looking for the greatest date (with your
> suggestion) by employee id (License_Cert.[Emp#]) if that makes since.
>
> The data looks like:
> ID Cert_Expire_Date Cert_Title
> 0284 05/12/2011 Scissor Lift Cert
> 0284 02/11/2012 Scissor Lift Cert
> 0284 07/22/2014 Scissor Lift Cert
> 0284 01/08/2015 Scissor Lift Cert
> 0742 01/14/2011 Scissor Lift Cert
> 0742 07/28/2014 Scissor Lift Cert
> 0742 11/17/2015 Scissor Lift Cert
>
> I have been playing with your suggestion but can't figure out how to
> get the latest date for each employee ID.
>
> Sorry for not being more precise in my first explanation!
> Regards, Rohn
>
>
>

------------------------------------

------------------------------------


------------------------------------

Yahoo Groups Links

<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/MS_Access_Professionals/

<*> Your email settings:
Individual Email | Traditional

<*> To change settings online go to:
http://groups.yahoo.com/group/MS_Access_Professionals/join
(Yahoo! ID required)

<*> To change settings via email:
MS_Access_Professionals-digest@yahoogroups.com
MS_Access_Professionals-fullfeatured@yahoogroups.com

<*> To unsubscribe from this group, send an email to:
MS_Access_Professionals-unsubscribe@yahoogroups.com

<*> Your use of Yahoo Groups is subject to:
https://info.yahoo.com/legal/us/yahoo/utos/terms/

[MS_AccessPros] Re: Query the most recent date!

 

Tried adding to the WHERE:


(SELECT MAX(Cert_Expire_Date) and MAX([EMP#])  FROM License_Cert As L2 WHERE L2.[EMP#] = dbo_EMPLOYEE.ID)

Found another way NOT to get the results I am looking for!

Rohn

__._,_.___

Posted by: reverson@maintainer.com
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (4)

.

__,_._,___

[MS_AccessPros] Re: Query the most recent date!

 

WOW, Thanks for the quick response John, that does a great job of getting down to just the greatest date. Guessing I need to be more articulate... I'm looking for the greatest date (with your suggestion) by employee id (License_Cert.[Emp#]) if that makes since. 

The data looks like:
ID         Cert_Expire_Date     Cert_Title
0284    05/12/2011          Scissor Lift Cert
0284    02/11/2012          Scissor Lift Cert
0284    07/22/2014          Scissor Lift Cert
0284    01/08/2015          Scissor Lift Cert
0742    01/14/2011          Scissor Lift Cert
0742    07/28/2014          Scissor Lift Cert
0742    11/17/2015          Scissor Lift Cert

I have been playing with your suggestion but can't figure out how to get the latest date for each employee ID.

Sorry for not being more precise in my first explanation!
Regards, Rohn

__._,_.___

Posted by: reverson@maintainer.com
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (3)

.

__,_._,___

RE: [MS_AccessPros] Combo to Text

 

Darrel,

One more question related to this form.  I also want to append some of the informaton to a table.  I have that part figured out.  What I am wondering is if it is possible to append records to two tables in one process. 

 

The two tables are related.  The two tables have a ONE to MANY relationship.  First I want to append the information to the ONE table and then I want to append information to the MANY table.   The ID from the first (ONE)  table would have to be included in the post to the (MANY) table or there will be no way to relate the records when I need to see them on a form and sub form.

 

I have not supplied any of the field names as I am still wondering if it can be done.

 

Thanks,

Bill

Minnesota

 

  

 

From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: Friday, January 29, 2016 11:11 AM
To: MS_Access_Professionals@yahoogroups.com
Subject: RE: [MS_AccessPros] Combo to Text

 

 

Darrell

That worked perfect.

 

Here is my complete statement.

 

=IIf([Forms]![f_IndividualTravaler]![FrmSignature2]=1,[Forms]![f_IndividualTravaler]![cboAgentID].[column](1),IIf([Forms]![f_IndividualTravaler]![FrmSignature]=2,"N/A",""))

 

Thank you very much.  I will add this to my tool box.

 

Bill

  

 

From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: Friday, January 29, 2016 8:23 AM
To: MS_Access_Professionals@yahoogroups.com
Subject: RE: [MS_AccessPros] Combo to Text

 

 

Hi Bill,

It isn’t necessary to add hidden text boxes to your form as Duane suggested. Since you are already referencing the form, set the control source property of the text box on your report to the combo box column property on the form.

=[Forms]![yourFormName]![yourComboboxName].[Column](1)

I am using Access 2007 at work and the Control property of the combo box does not show when using the expression builder. However, if you are using the expression builder, you can select the combo box value and then add the .Column(1) to the end of the expression.

Darrell

 

From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: Thursday, January 28, 2016 6:46 PM
To: Access Professionals Yahoo Group
Subject: RE: [MS_AccessPros] Combo to Text

 

 

It would be a lot easier if you provided the names of your comboboxes and the control sources used on your report that should display their values.

 

Add two more text boxes on your form that already has your combo boxes. Set the control sources of these two new text boxes to reference the Column() property of the comboboxes

=YourComboBox1Name.Column(1)

=YourComboBox1Name.Column(1)


When you look at these in form view they should reflect the text value like "Bill".

 

Then change the text boxes on your report so their control sources reference the new text boxes rather than the old combo boxes. You can make the text boxes on the form invisible.

 

Duane Hookom, MVP

MS Access

 


To: MS_Access_Professionals@yahoogroups.com
From: MS_Access_Professionals@yahoogroups.com
Date: Thu, 28 Jan 2016 17:12:55 -0600
Subject: RE: [MS_AccessPros] Combo to Text




Duane,

I wish I coul! d follow you but I am not quite smart enough.  I think I need a few more details to help me understand.  I am not quite able to understand the concept.

 

Thanks,

 

 

Bill

  

 

From: MS_Access_Professionals@yahoogroups.com [mailto:MS_Access_Professionals@yahoogroups.com]
Sent: Thursday, January 28, 2016 4:57 PM
To: Access Professionals Yahoo Group <ms_access_professionals@yahoogroups.com>
Subject: RE: [MS_AccessPros] Combo to Text

 

 

You can add text boxes (invisible) with control sources of:

=cboBoxName1.Column(1)

=cboBoxName2.Column(1)

 

!

Then, in the report, use the names of the text boxes rather than the names of the combo boxes.

 

Duane

 

To: MS_Access_Professionals@yahoogroups.com
From: MS_Access_Professionals@yahoogroups.com
Date: Thu, 28 Jan 2016 15:08:55 -0600
Subject: [MS_AccessPros] Combo to Text



I have a few unbound fields on a form.  Once the fields are filled in the user can click a button and a report opens with some of the fields already populated with the text from the unbound fields on the form.  It was actually working pretty good until I changed a few of the unbound filed to Combo boxes.  Now the user selects a value from the combo box.  However when the report is opened I am getting an error, which I expected.  What I want is to still show the text attached to the number behind the combo box. 

 

So agent 2 is Bill, based on the table the combo box uses,   If  “Bill” is selected from the combo box, I know the value the combo box is holding is “2” which is what I want, but is there any way to open a form and pull the text “Bill” rather than the value 2?

 

There is no query or table behind the form as I do not want to store the values there.  The unbound field will also be use to append some of the data to other tables, which is why I need the combo boxes, as that matches the data type of the table the data may be moved to.

 

Thanks,

 

 

Bill

Access 2013

Minnesota, USA

  

 

 

 

 

The information contained in this communication is highly confidential and is intended solely for the use of the individual(s) to whom this communication is directed. If you are not the intended recipient, you are hereby notified that any viewing, copying, disclosure or distribution of this information is prohibited. Please notify the sender, by electronic mail or telephone, of any unintended receipt and delete the original message without making any copies.

Blue Cross Blue Shield of Michigan and Blue Care Network of Michigan are nonprofit corporations and independent licensees of the Blue Cross and Blue Shield Association.

__._,_.___

Posted by: "Bill Singer" <Bill.Singer@at-group.net>
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (9)

.

__,_._,___

Re: [MS_AccessPros] Re: Folder picker debug problem

 

oh wait a minute .... sorry I gave you bad information

 use the VALUE of msoFileDialogFolderPicker, which is 3 and is a number not an object so try Integer as the data type

reference:
https://msdn.microsoft.com/en-us/library/aa432520%28v=office.12%29.aspx


warm regards,
crystal

~ have an awesome day ~

On 1/29/2016 12:27 PM, runuphillracing@yahoo.com [MS_Access_Professionals] wrote:

I assume "instead" refers to As String, of which there are several. Didn't work no matter where I tried it. That doesn't explain why the code works in another database.


Adam



---In MS_Access_Professionals@yahoogroups.com, <strive4peace2008@...> wrote :

Hi Adam,

use:
As Object

instead

warm regards,
crystal

VBA Tip: Select File or Folder using FileDialog using Access (cc)
by Adrian Bell
http://www.youtube.com/watch?v=rNHLea359p4

~ have an awesome day ~

On 1/29/2016 11:42 AM, runuphillracing@... [MS_Access_Professionals] wrote:

I need help figuring out why I get a Variable not defined compile error on msoFileDialogFolderPicker


in the function:

Public Function FSBrowse(Optional strStart As String = "", _
                          Optional lngType As MsoFileDialogType = msoFileDialogFolderPicker, _
                          Optional strPattern As String = "All Files,*.*") As String


which is called from strPath = FSBrowse(lngType:=msoFileDialogFolderPicker)


The exact same code (in utility module) works in one database but not in another.


Adam



__._,_.___

Posted by: crystal 8 <strive4peace2008@yahoo.com>
Reply via web post Reply to sender Reply to group Start a New Topic Messages in this topic (6)

.

__,_._,___