Microsoft Access / VBA Forum

One major function of my database will be to print labels to be used for solicitation. Not all labels will be printed at the same time and I need a way to not repeat printing. I have little experience in VBA and I'm sure there is a better, quicker way to do what I've managed to do thus far. But I am stuck on how to finish this out. Database...

Hello friends! I am here again with the problem about MS Access VBA Password. I have lost my MS Access VBA Password. Is there any way to recover or remove it through VBA Code or macro not using any third party tool or software?

I have a table tbl_questions_answers with fields (correctAnswer and selectedAnswer). I want to compare the values of both fields in each record and make decision on it in access vba. I'm new to access and vba. Would appreciate if I can be assisted for vba code.

I have a Crosstab query that I am working on. So, for my Column Heading I want to use this 1 Field that has 5 options in it. Right now if I put in the Criteria "Car" or "Truck" I get 2 columns, 1 column for car and 1 column for truck. Is there a way I can just total those both up in 1 column. So the Field will show a total of Car & Truck instead...

I am trying to save a report to a PDF file based on a Combobox selection of reports, but can't figure out how to place a combobox selection into a docmd.output line of code? Ex: Replace "Summary" with a Combobox selection, this way I'm not hardcoding report names. DoCmd.OutputTo acOutputReport, "Summary", acFormatPDF, "C:\Reports" & ".pdf"...

I have been looking for an easy solution of placing Access backend files in the cloud. *SQL Server, Azure SQL, or SharePoint are just too much of challenges. * Since Microsoft launched the Power AP last year there are a couple of YouTube videos from (seemed to be) MS employees talking about Dataverse as a good place to migrate backend data to....

I have a report where I am trying to get the minimum value from a calculated textbox named "TMetalic" which calculates the total of each component. The main group named 'Caliber" shows different Calibers The next group named "Component" lists three different components with detail items and quantities. In the Component Footer is where...

Hi everybody! I snagged a piece of code from Bytes (written by the one and only NeoPa to whom my Access success is somewhat owed!). The code works great but I desire it to do a few more things that I am not able to put together. I did TRY and you experts may laugh at my message box sequence. I laugh at myself too, and then return to Bytes. ...

I am hoping someone can help me. I am a complete novice, but have been trying to build a database to track productivity for my team. It uses the template for the Task Manager in Access and I have it working very well. I have created a switchboard and forms to enter in team members, and new tasks, edit existing tasks, and even have some reports...

Well! I have a list called List537 and I want to show two number of columns in it, after entering my value (number) in an unbound text box. I know how to get data source in the list with a single WHERE clause however, I want to use multiple criteria to get accurate results. I have a table called "Objectives" where two columns are exists i.e.,...

When I am copying and pasting into excel from MS Access I am only getting a portion on what is in the table. I think it has to do with the large space/spaces is why it won't paste. When I do Replace(,Chr(9),"") or Replace(," ","") it does nothing. Here is what I get when I paste in excel. This is about 41 words. The whole string is 101 words. ...

I am trying to create a digital board with configuable columns, if the columns are too long, I want to scroll them one at a time and refresh that column. Each column is displayed in its own sub-form. I have a table with various information about the column including the subform name (or what I believe is the subform name) as a string. I can...

If anyone is interested, I’ve spent some time testing the new VBA Project Signing feature which is currently available to anyone running Office 365 on an Insiders channel (either Beta or Current Channel Preview). It will soon be released more widely to all those on the Current Channel. The feature requires the developer to add a digital...

this is a general example of what I am trying to do. I have a group of 50 people and have 12 tables, I need to put two people at each table but can't have the same two people together. I've tried doing a random numbering, but I still end up with the same two people at the same table. Does anyone have any idea how I can do this. Any help would...

I have two tables, one with tasks and the other with some relative data as below: Task Client Date Hummer qty Made something a X1 01.02.2022 Made something b X2 05.02.2022 Made something c X3 05.02.2022 Made something d X2 07.02.2022 So this one represents daily activity for different clients. I need to...

Introduction: How do you randomise a set of numbers without having any attempts clash with earlier ones? For instance, if using a random number generator (Rnd(SeedCode]) in VBA.) and you want to emulate randomising a pack of cards without any card being selected more than once, as would be the case if simply using a random index into the...

Hi Everyone It's been a while since I've been on here, or have been doing any coding for that matter, so I apologize up front if I forget to post something correctly. I have "inherited" a database and despite all my research I am not sure how to proceed, what I am doing wrong/missing logically, or if what I am trying to do can even be done......

I have three related tables, ATI, WPH and Selected Event. API and WPH are related through the common field PersonID, while WPH and SelectedEvent are related through the common field WalkNumber. I want to create an Access SQL DELETE query to delete all records in WPH where WPH.WalkNumber = SelectedEvent.WalkNumber and ATI.Response IN...

I've been working on a problem and want to try using the docmd.gotorecord to get to a certain record in a table. I've got that figured out but I don't know what to do once i'm on the record. I want to select a usernumber from that record. It should be fairly easy to but I can't figure it out. Any help would be appreciated. Thanks

The next Access Europe meeting will be on Wednesday 1 Feb 2023 starting at 18:00 (6PM) and finishing at about 19:30 (7.30PM) UK time (UTC) The start time is equivalent to 19:00 (7PM) in Central Europe / CET (UTC+1) and 10AM in Seattle / PDT (UTC-8) For local times, please check https://www.worldtimebuddy.com/ I am very pleased to announce...

I'm running the following code in the timer event section when my database opens. It works on the my Office 365 version, but doesn't seem to fire on the run-time version of access. My database is on a network in a FE/BE setup. There is a yes/No box in my table called "ztblSystemStatus". When I uncheck this box and close out the timer should run...

Access Lunchtime – Translation Tools in Microsoft Access​ Tuesday, 31st Jan at 18:00 UK time (UTC) or 12 noon CDT (UTC-6). The session will last about one hour Join us when Colin Riddington, Mendip Data Systems, https://isladogs.co.uk, Microsoft MVP 2022, will be our presenter. In the first half of this session, Colin will demonstrate a...

I am stuck on this and would love some help. I have a customer who has 3 rates of pay and personnel can in theory go across all three. Working out the rates 1 & 2 are simple as they are in the same day but the 3rd rate goes across midnight. Rate 2 starts at 18:00 and runs till 00:00(24:00). The code below works until we cross this time and then it...

I have this simple query: strSQL = "INSERT INTO tblEngParRole (Eng_ID, Person_ID, ParticipantNumber, Role)" & "VALUES(" & Me.Eng_ID & "," & .ItemData(n) & "," & 1 & "," & '" & Me.txtParRole1 & "' & ")" What I am expecting to be inserted into the Role field in the table is the information typed into the text box, but what I am getting is...

Hello - I have made something that opens an excel document that was just exported. The workbook has 10 tabs. I wish there was someway to edit all the tabs instead of doing it tab by tab in the code. Is there a way to do that? Right now I am only able to do "Sheet1" of course. Private Sub OpenAndFormatExcel() Dim filePath As String ...