On 06/28/2023 6:58 PM EDT Jim Wagner <josephwagner2@outlook.com> wrote:Mark,
Though this is not a big issue. I have dealt with this for 17 years, so if it cannot be done, i will live. I just was looking at any way of being more efficient. We are finally after 17 years moving to SQL after me pleading and begging and teaching that how we do things is not industry standard. We are still using Access as the front end because it would take another 17 years to redo every database in another UI.
qry_UpdateSICKAccrual
UPDATE [qry_R&D-ACCRUALS] INNER JOIN qry_AccrualsForReport ON [qry_R&D-ACCRUALS].Emplid = qry_AccrualsForReport.Emplid SET qry_AccrualsForReport.sick = [Balance], qry_AccrualsForReport.YTDsick = [Hrs Taken Ytd]
WHERE ((([qry_R&D-ACCRUALS].[Plan Type Descr])="Sick"));
qry_UpdateVACAccrual
UPDATE [qry_R&D-ACCRUALS] INNER JOIN qry_AccrualsForReport ON ([qry_R&D-ACCRUALS].Emplid = qry_AccrualsForReport.Emplid) AND ([qry_R&D-ACCRUALS].[Accrual Proc Dt] = qry_AccrualsForReport.[Accrual Proc Dt]) SET qry_AccrualsForReport.vac = [Balance], qry_AccrualsForReport.YTDvac = [Hrs Taken Ytd]
WHERE ((([qry_R&D-ACCRUALS].[Plan Type Descr])="Vacation"));
qry_UpdateCOMPAccural
UPDATE [qry_R&D-ACCRUALS] INNER JOIN qry_AccrualsForReport ON ([qry_R&D-ACCRUALS].Emplid = qry_AccrualsForReport.Emplid) AND ([qry_R&D-ACCRUALS].[Accrual Proc Dt] = qry_AccrualsForReport.[Accrual Proc Dt]) SET qry_AccrualsForReport.vac = [Balance], qry_AccrualsForReport.YTDvac = [Hrs Taken Ytd]
WHERE ((([qry_R&D-ACCRUALS].[Plan Type Descr])="Vacation"));
Rabu, 28 Juni 2023
Re: [MSAccessProfessionals] Combine several update queries into one query
Re: [MSAccessProfessionals] Combine several update queries into one query
Though this is not a big issue. I have dealt with this for 17 years, so if it cannot be done, i will live. I just was looking at any way of being more efficient. We are finally after 17 years moving to SQL after me pleading and begging and teaching that how we do things is not industry standard. We are still using Access as the front end because it would take another 17 years to redo every database in another UI.
qry_UpdateSICKAccrual
UPDATE [qry_R&D-ACCRUALS] INNER JOIN qry_AccrualsForReport ON [qry_R&D-ACCRUALS].Emplid = qry_AccrualsForReport.Emplid SET qry_AccrualsForReport.sick = [Balance], qry_AccrualsForReport.YTDsick = [Hrs Taken Ytd]
WHERE ((([qry_R&D-ACCRUALS].[Plan Type Descr])="Sick"));
qry_UpdateVACAccrual
UPDATE [qry_R&D-ACCRUALS] INNER JOIN qry_AccrualsForReport ON ([qry_R&D-ACCRUALS].Emplid = qry_AccrualsForReport.Emplid) AND ([qry_R&D-ACCRUALS].[Accrual Proc Dt] = qry_AccrualsForReport.[Accrual Proc Dt]) SET qry_AccrualsForReport.vac = [Balance], qry_AccrualsForReport.YTDvac = [Hrs Taken Ytd]
WHERE ((([qry_R&D-ACCRUALS].[Plan Type Descr])="Vacation"));
qry_UpdateCOMPAccural
UPDATE [qry_R&D-ACCRUALS] INNER JOIN qry_AccrualsForReport ON ([qry_R&D-ACCRUALS].Emplid = qry_AccrualsForReport.Emplid) AND ([qry_R&D-ACCRUALS].[Accrual Proc Dt] = qry_AccrualsForReport.[Accrual Proc Dt]) SET qry_AccrualsForReport.vac = [Balance], qry_AccrualsForReport.YTDvac = [Hrs Taken Ytd]
WHERE ((([qry_R&D-ACCRUALS].[Plan Type Descr])="Vacation"));
Re: [MSAccessProfessionals] Combine several update queries into one query
2) If you can give us a representative look at the data in the tables, that would help us greatly to determine if the queries can be engineered more succinctly/efficiently.
On 06/28/2023 3:54 PM EDT Jim Wagner <josephwagner2@outlook.com> wrote:Hello all,
I am looking at a very old process that creates a table daily. My retired boss created it a very long time ago, so I wanted to know if there is a way of making the process more efficient. I am breaking down the multiple queries in sections to see if i can recreate the process in less queries.
There are 3 update queries that update a table with values based on some criteria. there are 2 sources that are joined together to be the source. Below is the
The 3 queries update columns such as sick, vacation and comp with the balance for each. below are the query summary
sick column and Hrs taken Ytd for the YTDsick column based on the criteria of "Sick" for the Plan Type Descr field.
vac column and Hrs taken Ytd for the YTDsick column based on the criteria of "Vacation" for the Plan Type Descr field.
comp column and Hrs taken Ytd for the YTDsick column based on the criteria of "Comp time" for the Plan Type Descr field and "5W" for the Plan Type field.
Is there a way of getting this to be one query or I am I where I am at for good?
Thank You
Jim Wagner
[MSAccessProfessionals] Combine several update queries into one query
I am looking at a very old process that creates a table daily. My retired boss created it a very long time ago, so I wanted to know if there is a way of making the process more efficient. I am breaking down the multiple queries in sections to see if i can recreate the process in less queries.
There are 3 update queries that update a table with values based on some criteria. there are 2 sources that are joined together to be the source. Below is the
The 3 queries update columns such as sick, vacation and comp with the balance for each. below are the query summary
sick column and Hrs taken Ytd for the YTDsick column based on the criteria of "Sick" for the Plan Type Descr field.
vac column and Hrs taken Ytd for the YTDsick column based on the criteria of "Vacation" for the Plan Type Descr field.
comp column and Hrs taken Ytd for the YTDsick column based on the criteria of "Comp time" for the Plan Type Descr field and "5W" for the Plan Type field.
Is there a way of getting this to be one query or I am I where I am at for good?
Thank You
Jim Wagner
Groups.io Links:
You receive all messages sent to this group.
View/Reply Online (#116397) | Reply To Group | Reply To Sender | Mute This Topic | New Topic
Your Subscription | Contact Group Owner | Unsubscribe [sugeng.panjalu.access@blogger.com]
Sabtu, 24 Juni 2023
Re: [MSAccessProfessionals] DLookup not working
Dear Sir,
Please find the attached my simple Access Database "TestData" where contained 2 Tables "Tbl_COTag" and "Tbl_HBColor" , actually "Tbl_HBColor" Table carried 2 fields "ColourName" and "FrenchTranslation" . And Table "Tbl_COTag" where field "COLOR OUT1:" stored value should be LOOKUP value from source Table "Tbl_HBColor" in field "ColurName" and "FrenchTranslation" to table "Tbl_COTag" in field "Lookup_HB_ENG_C" and "Lookup_HB_ENG_F"
Actually I need same as excel VLOOKUP function working process in Access Database using DLOOKUP function, for example I've attached both Access "TestData" and Excel "VLOOKUP_Excel" file for your better understanding.
If you give me clear Query example using DLOOKUP function in my attached "TestData" Access Database then it will best for me.
Thanks
Porag
Re: [MSAccessProfessionals] DLookup not working
Please find the attached my simple Access Database "TestData" where contained 2 Tables "Tbl_COTag" and "Tbl_HBColor" , actually "Tbl_HBColor" Table carried 2 fields "ColourName" and "FrenchTranslation" . And Table "Tbl_COTag" where field "COLOR OUT1:" stored value should be LOOKUP value from source Table "Tbl_HBColor" in field "ColurName" and "FrenchTranslation" to table "Tbl_COTag" in field "Lookup_HB_ENG_C" and "Lookup_HB_ENG_F"
Actually I need same as excel VLOOKUP function working process in Access Database using DLOOKUP function, for example I've attached both Access "TestData" and Excel "VLOOKUP_Excel" file for your better understanding.
If you give me clear Query example using DLOOKUP function in my attached "TestData" Access Database then it will best for me.
Thanks
Porag
Groups.io Links:
You receive all messages sent to this group.
View/Reply Online (#116395) | Reply To Group | Reply To Sender | Mute This Topic | New Topic
Your Subscription | Contact Group Owner | Unsubscribe [sugeng.panjalu.access@blogger.com]
Jumat, 23 Juni 2023
Re: [MSAccessProfessionals] Filter report before emailing it
I have to do this as well. A solution that I found that works is to use a table to store the ID of the supervisor. Then create the report and query to filter off of that value in the table. Then as you loop, you can update that value with the current supervisor and export the report.
Mike D
Groups.io Links:
You receive all messages sent to this group.
View/Reply Online (#116394) | Reply To Group | Reply To Sender | Mute This Topic | New Topic
Your Subscription | Contact Group Owner | Unsubscribe [sugeng.panjalu.access@blogger.com]
Kamis, 22 Juni 2023
Re: [MSAccessProfessionals] Filter report before emailing it
Sent: Thursday, June 22, 2023 3:59 PM
To: MSAccessProfessionals@groups.io <MSAccessProfessionals@groups.io>
Subject: [MSAccessProfessionals] Filter report before emailing it
Hello everyone,
I have an attendance list report that I would like to filter by supervisor and email each supervisor only their pages of the report. I have sub procedure, "SendMailAttachment", that will email the report. It's variables are the report name and recipients. I have setup this VBA code that will loop through the supervisors and pull out their email address. I can also filter the report and print it by supervisor. I just don't know how to filter the report and then email the filtered report to each supervisor. Here is the code:
Public Sub AttendanceList()
'Email Attendance list to each supervisor
Dim db As Database
Dim rst As DAO.Recordset
Dim lngSupID As Long
Dim SupEmail As String
Set db = CurrentDb
Set rst = db.OpenRecordset("tblSupervisorEmail")
Do Until rst.EOF
lngSupID = rst![EEID-1]
SupEmail = rst![Email]
SendMailAttachment "rptAttendanceSheet-Email", SupEmail
DoCmd.OpenReport "rptAttendanceSheet-Email", acViewNormal, , "SupID = " & lngSupID
Debug.Print rst![Email]
rst.MoveNext
Loop
rst.Close
Set rst = Nothing
Set db = Nothing
End Sub
This line will email the complete report to each supervisor SendMailAttachment "rptAttendanceSheet-Email", SupEmail
This line filters the report and will print each supervisor's report separately, DoCmd.OpenReport "rptAttendanceSheet-Email", acViewNormal, , "SupID = " & lngSupID
I need to know how to add the filter to the sendMailAttachment sub procedure.
Doyce Winberry
Manufacturing
Manager Systems
XPO
2001 Benton Street
Searcy, AR 72143 USA
O: +1 501-207-5973 M: +1 501-207-2269
Re: [MSAccessProfessionals] Sharepoint and MS Excel Import into MS Access
On Friday, June 23, 2023, <kensaffer@gmail.com> wrote:
How do you import an Excel file that is on sharepoint into MS Access? Seems like the path is not simple.
Groups.io Links:
You receive all messages sent to this group.
View/Reply Online (#116392) | Reply To Group | Reply To Sender | Mute This Topic | New Topic
Your Subscription | Contact Group Owner | Unsubscribe [sugeng.panjalu.access@blogger.com]
[MSAccessProfessionals] Filter report before emailing it
Hello everyone,
I have an attendance list report that I would like to filter by supervisor and email each supervisor only their pages of the report. I have sub procedure, “SendMailAttachment”, that will email the report. It’s variables are the report name and recipients. I have setup this VBA code that will loop through the supervisors and pull out their email address. I can also filter the report and print it by supervisor. I just don’t know how to filter the report and then email the filtered report to each supervisor. Here is the code:
Public Sub AttendanceList()
'Email Attendance list to each supervisor
Dim db As Database
Dim rst As DAO.Recordset
Dim lngSupID As Long
Dim SupEmail As String
Set db = CurrentDb
Set rst = db.OpenRecordset("tblSupervisorEmail")
Do Until rst.EOF
lngSupID = rst![EEID-1]
SupEmail = rst![Email]
SendMailAttachment "rptAttendanceSheet-Email", SupEmail
DoCmd.OpenReport "rptAttendanceSheet-Email", acViewNormal, , "SupID = " & lngSupID
Debug.Print rst![Email]
rst.MoveNext
Loop
rst.Close
Set rst = Nothing
Set db = Nothing
End Sub
This line will email the complete report to each supervisor SendMailAttachment "rptAttendanceSheet-Email", SupEmail
This line filters the report and will print each supervisor’s report separately, DoCmd.OpenReport "rptAttendanceSheet-Email", acViewNormal, , "SupID = " & lngSupID
I need to know how to add the filter to the sendMailAttachment sub procedure.
Doyce Winberry
Manufacturing
Manager Systems
XPO
2001 Benton Street
Searcy, AR 72143 USA
O: +1 501-207-5973 M: +1 501-207-2269
[MSAccessProfessionals] Sharepoint and MS Excel Import into MS Access
Groups.io Links:
You receive all messages sent to this group.
View/Reply Online (#116390) | Reply To Group | Reply To Sender | Mute This Topic | New Topic
Your Subscription | Contact Group Owner | Unsubscribe [sugeng.panjalu.access@blogger.com]
Re: [MSAccessProfessionals] DLookup not working
Sent: Wednesday, June 21, 2023 1:59 PM
To: MSAccessProfessionals@groups.io <MSAccessProfessionals@groups.io>
Subject: Re: [MSAccessProfessionals] DLookup not working
For your kind information, My requirement is from table "Tbl_HBColor", Field "ColourName" Text Data will populate to Table "Tbl_COTag", in field "HB_Eng_Col" where lookup search value Table "Tbl_COTag" in field "COLOR" and entire this process will execute by update query.
Thanks,
Porag
Rabu, 21 Juni 2023
Re: [MSAccessProfessionals] DLookup not working
For your kind information, My requirement is from table "Tbl_HBColor", Field "ColourName" Text Data will populate to Table ”Tbl_COTag", in field "HB_Eng_Col" where lookup search value Table "Tbl_COTag" in field "COLOR" and entire this process will execute by update query.
Thanks,
Porag
Groups.io Links:
You receive all messages sent to this group.
View/Reply Online (#116388) | Reply To Group | Reply To Sender | Mute This Topic | New Topic
Your Subscription | Contact Group Owner | Unsubscribe [sugeng.panjalu.access@blogger.com]
Re: [MSAccessProfessionals] DLookup not working
Sent: Wednesday, June 21, 2023 6:12 AM
To: MSAccessProfessionals@groups.io <MSAccessProfessionals@groups.io>
Subject: Re: [MSAccessProfessionals] DLookup not working
Please see the below Snap and attached simple Database TestDB , where Tbl_COTag Table "COLOR" field value Lookup "ColourName" Field value from Table "Tbl_HBColor" and Lookup String (ShortText) value populate in field "Hb_Eng_Col" on Table "Tbl_COTag" . Could you advise where I was mistaken ? Dlookup Not working on my TestDB which attached for your better understanding, your help and advise highly expecting.
Note : All are ShortText data
Re: [MSAccessProfessionals] DLookup not working
Please see the below Snap and attached simple Database TestDB , where Tbl_COTag Table "COLOR" field value Lookup "ColourName" Field value from Table "Tbl_HBColor" and Lookup String (ShortText) value populate in field "Hb_Eng_Col" on Table "Tbl_COTag" . Could you advise where I was mistaken ? Dlookup Not working on my TestDB which attached for your better understanding, your help and advise highly expecting.
Note : All are ShortText data
Re: [MSAccessProfessionals] DLookup not working
I'm not sure if any file came through since I'm using my cell phone.
You mention a query and DLookup but didn't provide the SQL view and data types of significant fields. This would be the minimum information required to get an accurate response.
Duane
Sent from my mobile
On Jun 20, 2023, at 2:56 PM, porag379@gmail.com wrote:
Sir, Good evening. This is porag and I'm Microsoft Access learner. I want to use DLOOKUP in Access Table for pull data from difference Table but can't it. Could you help me? Attached my Simple access database where I've created a update query with Dlookup function but not working. Could you point out my mistake?
Thanks
Porag<TestData.accdb>
Groups.io Links:
You receive all messages sent to this group.
View/Reply Online (#116386) | Reply To Group | Reply To Sender | Mute This Topic | New Topic
Your Subscription | Contact Group Owner | Unsubscribe [sugeng.panjalu.access@blogger.com]
Selasa, 20 Juni 2023
Re: [MSAccessProfessionals] DLookup not working
On Jun 20, 2023, at 2:56 PM, porag379@gmail.com wrote:
Sir, Good evening. This is porag and I'm Microsoft Access learner. I want to use DLOOKUP in Access Table for pull data from difference Table but can't it. Could you help me? Attached my Simple access database where I've created a update query with Dlookup function but not working. Could you point out my mistake?
Thanks
Porag<TestData.accdb>
Re: [MSAccessProfessionals] DLookup not working
On Tue, Jun 20, 2023 at 3:56 PM, porag379@gmail.com<porag379@gmail.com> wrote:Sir, Good evening. This is porag and I'm Microsoft Access learner. I want to use DLOOKUP in Access Table for pull data from difference Table but can't it. Could you help me? Attached my Simple access database where I've created a update query with Dlookup function but not working. Could you point out my mistake?
Thanks
Porag
Groups.io Links:
You receive all messages sent to this group.
View/Reply Online (#116383) | Reply To Group | Reply To Sender | Mute This Topic | New Topic
Your Subscription | Contact Group Owner | Unsubscribe [sugeng.panjalu.access@blogger.com]
[MSAccessProfessionals] DLookup not working
Thanks
Porag
Groups.io Links:
You receive all messages sent to this group.
View/Reply Online (#116382) | Reply To Group | Reply To Sender | Mute This Topic | New Topic
Your Subscription | Contact Group Owner | Unsubscribe [sugeng.panjalu.access@blogger.com]
Jumat, 02 Juni 2023
Re: [MSAccessProfessionals] VBA Export to excel issue
Sent: Thursday, June 1, 2023 9:12 AM
To: MSAccessProfessionals@groups.io <MSAccessProfessionals@groups.io>
Subject: Re: [MSAccessProfessionals] VBA Export to excel issue
When you say killpath,are you killing the file first? I know that exporting to an existing excel does not overwrite it adds the new sheet.Get Outlook for iOS
Kamis, 01 Juni 2023
Re: [MSAccessProfessionals] VBA Export to excel issue
When you say killpath,are you killing the file first? I know that exporting to an existing excel does not overwrite it adds the new sheet.Get Outlook for iOS