Access selecting specific date on a calendar
I'm pulling my hair out because everything I've found through my research says my VBA code should work, but it doesn't! Here's the story. I have a calendar (form) that shows events going on for each month. What I want is for a person to click on a specific day and have a pop-up form appear showing more details of the events for whatever day they clicked on. I used the below code, which mostly works... When I click on a date, the month and year will be correct, but not the day of the month. The day of the month is always today's day. For example, let's say I click on the day Feb. 2, 2024 and today's date is May 21, 2026. My pop-up form will show the events for Feb. 21, 2024. This is the code I have: Private Sub lblTue3_Click() Dim txtSelectDate As Date (probably don't need this) Dim iDayOfMonth As Integer Dim iMonth As Integer Dim iYear As Integer Dim dSelectDate as Date iDayOfMonth= Format(Me.txtSelectDate.Value, "d") iMonth = Format(Me.txtSelectDate, "mm") iYear = Format(Me.txtSelectDate, "yyyy") dSelectDate = CDate(iMonth & "/" & iDayOfMonth & "/" & iYear) DoCmd.OpenForm "frmThatContainsMyData", acNormal, , "[DateOnFormUsedForFilter]=#" & dSelectDate & "#", , acDialog Instead of Format, I've tried using the code Day(Me.txtSelectDate), but that didn't work either. It always defaults to the day of the month that's today. Can anyone tell what I'm doing wrong? I've checked the formatting, and everything is set to 'Short Date'... I'm just at a complete loss! Any help is greatly appreciated!
Tab header font issue when the "new zoom" feature is enabled
We found a curious font display issue, which can only be reproduced if the "new zoom" feature flag is active: We can reproduce it with build 20026.20076 with the zoom slider visible (e.g. in the "Current Channel (Preview)"), but we cannot reproduce it on the same build with the zoom slider invisible (e.g. on a freshly updated system in the Current Channel, which has not received the staged rollout yet) or with older builds (e.g. the current Monthly Channel build). The problem itself is unrelated to zooming. Repro 1. Create a new Access database. 2. Create a new form in Design View. 3. Add a Tab Control. 4. Set the tab control's "Use Theme" property to "No". 5. Add a button with the following code: Private Sub Command3_Click() Dim start As Double ' Localize the page name, if you use a non-English version of Access Me.Page2.Visible = True ' Simulate long-running operation (3 seconds) start = Timer Do Until Timer > start + 3: Loop End Sub 6. Save and open the form in Form View. 7. Click the button. Expected result: Nothing happens for 3 seconds. Actual result: The tab header's font switches to some old raster system font (MS Sans Serif?). After 3 seconds, the form returns to the 21st century. This issue is easy to work around: just do the long-running operation before setting the Visibility property, this will reduce the font-change to a short flicker. Still, this appears to be an unintended side effect of the changes made for the "new zoom" feature, so I thought it might be helpful to report it while that feature is still being worked on.
How to change the color of each pie chart slice in access?
I need to set standard colors for Pie charts in our Access database. Currently, this is what I see. But our organization has standard colors used in other applications and want to use it in access charts as well. I am also attaching a screenshot of the chart settings. Any advice would be greatly appreciated. Thank you!
Stumped on auto populate staying in a combo box
This is embarrassing. I’ve been building databases since 1999 and now I’m stumped I have an MS Access database with a combo box that is used to select specific records. These records have two particular fields. A primary key named “Track” and a value associated with it called FTitle. Track is a numeric field and FTitle is text. FTitle shows the job title. I had this working beautifully on a database for six years. Go into the combo box, start typing in the FTitle and it would auto populate with an FTitle name. I've checked everything. Auto expand and everything else Two things are happening here. I cannot get an autopopulate combo box to work. It works when I make it. Then when I reopen the form it stops working. I tried to add options to the existing front end which autopopualted perfectly. It seems that when I added a subform to the form the combo box auto populate on stopped working. Any advice??
SQL Query editing UI issue
Hi everyone. For a couple of weeks now, my Access hasn't let me edit queries within the SQL option. Version: Access 2604 (Build 19929.20090) Basically, when I access the SQL View, I see the SQL code but can't select it or move the cursor to easily edit the text. It's difficult to explain, but I hope the following video helps: https://drive.google.com/file/d/1knAAwVS48m8WsarmhLeOVFWOdFuCqaUz/view?usp=sharing I've already tried restoring and resetting the installation, but to no avail. I hope you can help. Bets Regards, EmilianoBold Duplicates (Conditional Formatting)
Hello experts I have a form based on qryLCAmends I want to bold the [LCNo] if there is a duplicate but ONLY where LCID = LCID here is what I have but it doesnt bold anything: DCount("*","qryLCAmends","[LCID]=" & [LCID] & "[LCNo]='" & [LCNo] & "'")>1 LCNo is text. I am using the "expression" in conditional formatting: Example: How can I do this with conditional formatting?
Microsoft Access and Outlook
Hi there, I have just updated my laptop (with a view for a faster laptop!) However, Access was working fine and now i can't send emails from access through outlook like before. I get a message to say a program is trying to send an email message on your behalf. I'm not sure how to get rid of this warning! Please help.... Thank you in advance
