access
1707 TopicsAccess 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!146Views1like11CommentsTab 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.56Views0likes2CommentsHow 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!1.1KViews0likes2CommentsStumped 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??77Views0likes2CommentsODBC error (incorrect syntax) since 2604
Overnight i have the problem that many inserts in my MS Access app do not work anymore. I get the error Run-time error '3155': ODBC--insert on a linked table 'tablename' failed. [Microsoft][ODBC SQL Server Driver][SQL Server]Incorrect syntax near '='.(#102) I have been able to isolate this issue on a column of type NVARCHAR(MAX). If I insert any value except null in this column the error above will show on save. I tested with other variants of NVARCHAR. The problem happens starting from NVARCHAR(256), thus what is Long Text for Ms Access. When i insert the record first with a value null for this column, no error is generated and the record is saved. If i 'Update' the record later with a text value in this column, that is no problem. So, the ODBC connection generates a sql insert statement that is mallformed in case of a long text. I have this problem consistent on all apps and all tables where i have NVARCHAR(>255). My solution is to go back to office release 2508 (semi annual support).Solved503Views1like2CommentsSQL 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, Emiliano81Views0likes4CommentsBold 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?Solved108Views0likes6CommentsMove Existing Sharepoint Linked Database to a different Sharepoint Site
Hi. I have a Sharepoint Linked Database that is working well within our company. We would like to use it within another subsidiary company that operates with its own Name and Sharepoint sites. Could you please assist as i am struggling to do this. ThanksSolved132Views0likes7CommentsMicrosoft 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 advance241Views0likes6Comments