Change application icon on Microsoft Access database not working - ms-access

I'm using this code:
Application.CurrentProject.Properties.Add "AppIcon", Application.CurrentProject.Path & "\myicon.ico"
Application.RefreshTitleBar
to change the application icon of my access database, but the Access icon is still displayed in the main, like this:
Forms and reports are updated with the customized Icon, but not the "main" icon as shown.
I have tried to use different code, like this:
CurrentDb.Properties("AppIcon").Value = CurrentProject.Path & "\myicon.ico"
Application.RefreshTitleBar
But still no updates for the "application" icon.
PS:
This code has been working for several years, but lately it is not updating the "application" Icon.

Related

Changing icon on Microsoft Access database

This has been driving me crazy, and I really don't understand why it doesn't work...
I am trying to change the icon for my Access database using VBA, and it /almost/ works.
I am using the following code in the OnOpen event of my startup form:
CurrentDb.Properties("AppIcon").Value = CurrentProject.Path & "\favicon.ico"
CurrentDb.Properties("UseAppIconForFrmRpt").Value = True
Application.RefreshTitleBar
The icon shows up in the titlebar and main Access window just fine, however, the icon does NOT show up on forms. The weird thing is: It DOES show up on reports. Can anyone fill me in on what the H is going on? Thank you in advance!

Forms sometimes open as tabbed documents and sometimes not

I am working in Access 365 and am struggling with forms that sometimes launch as pop-ups and sometimes launch as tabbed documents.
My database Options-->Datasheet-->Document Window Options are set to Tabbed Documents and checked for Display Document Tabs.
My form Properties are set to Popup = No and Modal = No.
I'm going around in circles trying to figure out a pattern as to why sometimes the same form will open as a tab but other times open as a pop-up.
Here is one example: I have a navigation form that shows a list of customers, and double-clicking on the customer name fires off a simple macro that does the following:
DoCmd.OpenForm "frmCustomerInfo", _
WhereCondition:="[ID] = " & Me.[ID], _
DataMode:=acFormEdit, _
WindowMode:=acDialog
However, when I launch the CustomerInfo form from the navigation form, it is opening as a pop-up.
Can anyone help provide some insight? Is there another setting that I'm missing?
Thanks in advance.

ACCESS acViewPreview not working as intended

I am trying to print preview my report (using a button on my form, see code below). When I go to do it initially, it pops up as a super small image, and I cannot right click it (so I cannot print or export it).
However, after simply entering Design View (but not changing anything), then opening the form to print the report again, it works as intended (i.e. pops up at a normal size and I can now right click the report).
Private Sub Report_Click()
DoCmd.OpenReport "Query1", acViewPreview, , Me.Query1SF.Form.Filter
End Sub
Any idea why this may be happening? What could be happening that simply going into Design View, then back to Form View, is changing how the report opens?

Microsoft Access 2013 Button Issue

I have kind of a two part issue (they may be related, I'm not sure). I've never worked with Microsoft Access 2013 before (or any Access version really), and using a "for dummies" type book I'm trying to build a front end interface to link to a SQL database. To do this I'm using the navigation form, regular forms, and then the tables themselves in subforms within that. The forms that hold the subforms are also where I'm placing my buttons. My intentions with these buttons are to use them to filter the table to specific records. I have one doing that successfully (via the main navigation form) but then I have the problem of all the other buttons not working at all, or calling the same text box that that one calls.
This is the code to the working button:
I added the stop Macros actions in an effort to keep the same box from popping up when I pressed another button that houses the macro with a show all records action. Because of issues I also added a stop macro action before the show all records actions on this button (I would do a picture but I'm only allowed two links per the site rules).
This one I found when I added the stop action to the macro before the show all action it stopped the box from popping up, but it also doesn't work to show me all the records. Without the stop action, it acts exactly like the Search Mill ID Button.
The second part of my issues is that my third button currently does show me all records despite it being me trying to use it as a search feature to have a box pop up and the user enter in all or part of a company name to filter the records.
That code looks like this:
I am pretty sure there are a few things wrong with the code on this button in general, but have been having trouble finding any resources of people who are having the same problems as me (or perhaps the issue is so basic most users just automatically know what to do). I've been relying on youtube videos and an access for dummies book to try to build this stuff, but realize that I'm a little beyond my skills; however, I still have to get it done for my job so I'm persevering through.
I appreciate any tips/suggestions to help!
One approach would be to set the OnClick event of your button to use VBA code (Event Procedure), and get the Mill_Id from an Input Box. Macros are much more limiting than VBA and you cannot reasonably use error handling. You can then set the RecordSource property of the form when the button is clicked. The buttons OnClick event would be something like this:
Private Sub Command0_Click()
s = InputBox("What is the Mill ID?", "Mill ID", "")
Me.RecordSource = "SELECT * FROM MyTableWithMillData WHERE Mill_ID = '" & s & "'"
End Sub
Or if the button is on a parent form, and you're trying to change the subform, use this:
Private Sub Command0_Click()
s = InputBox("What is the Mill ID?", "Mill ID", "")
Me!subformcontrolname.Form.RecordSource = "SELECT * FROM MyTableWithMillData WHERE Mill_ID = '" & s & "'"
End Sub

SSRS PopUp Message Box

Ive had a request from a client to make a popup box appear on the click of a databar within an SSRS report. Not had any luck with various Google Searches and just wanted to know if anybody has either got this work directly or has any suggestions for a workaround they have used?
Bit of background on the actual report itself, it simply contains a table with various stacked DataBars showing comparable data between multiple users in a system. The ability is needed to click a bar and see which User that bar relates to.
Any suggestions are appreciated.
It's not quite the same thing, but you can use the SSRS tooltips functionality to achieve something similar, i.e. a user will hover over a part of a chart and some contextual text information will be displayed.
Show ToolTips on a Series has some further information.
You can add an action to an object with a javascript popup which can show a specific URL or another report. In the action click on Fx to set an expression as follows:
I used a different script to popup a URL which contains an image url from the database:
="javascript:void(window.open('" + Fields!ImageURL.Value + "', null, 'width=800, height=500, status=no, toolbar=no, menubar=no, location=no'))"
( you can replace Fields!Image.Value with a url , this is the URL from a database field)
a
On a PC this will showup properly sized as a popup. On an iPad it will appear as a new tab.