MS Access by default provides inbuilt functionality to pick dates using calendar control; however it lacks few basic functionalities which makes selecting a date bit difficult. For example, if you want to select a date from year 2015 then you need to navigate multiple times to select correct date since you can move only one month at a time in MS Access calendar control. Looking at this common challenge, I have developed a custom calendar control in MS Access form which makes selection of date much easier
1. Save the following attachment in your system Custom Calendar Control
2. Open the MS Access tool where you want to use this calendar control
3. Select Access from External Data menu
5. Under Forms tab select Calendar and click on OK
6. You will receive a confirmation message once import is complete, click on Close to proceed
7. Now the Custom Calendar Control is ready to use. To use it on the existing form (here it is Form1), open the form in design mode
8. Add a command button adjacent to the text box control where you want to show the selected date
9. Change the following properties of Command Button
Width: 0.3
Caption: Blank
Name: cmdSelectDate
10. In the Picture property of Command Button, select calendar
11. Create an On Click Event Procedure of Command Button
12. Click on ‘…’ to create the procedure in VBA screen
13. Add the following code in the click event procedure
DoCmd.OpenForm "Calendar", acNormal
If IsDate(txtDate.Value) = True Then
Form_Calendar.LoadCalendarForm txtDate.Value
Else
Form_Calendar.LoadCalendarForm
End If
Form_Calendar.lblFormName.Tag = Me.Name
Form_Calendar.lblControlName.Tag = "txtDate"
Note: In the above code txtDate is the control name where the selected date will be displayed. In your tool if this control name is different, you can replace the same in above code.
14. Done, save your project and open the form
15. Click on the Calendar button to select a date
Hope you liked this article. Please share it with your colleagues and comment your views below.
In MS Access, the best way to create a multiuser tool is to divide your solution. One part acts as interface and other one acts as database. You can have multiple copies of the interface distributed to users which are connected to central MS Access database saved at common shared drive. To connect the interface to database, you can use link table feature (Access>External Data>Import & Link) available in MS Access. Below is a commonly required VBA code which helps the developers to re-link MS Access linked tables when the database is renamed or moved to other location
In this article we are going to show you how you can delete file or files using a single line of VBA code. 1. Delete a specific file from the folder, 2. Delete specific type of files from the folder, 3. Delete all files from the folder
VBA Code To Change Cell Color Excel supports more than 16 million colors in a cell; hence you should know how to set the exact color in a cell. To do this, you can use…
VBA Code To Add New Sheet In VBA, it is sometime important to add a worksheet at the right place in the Excel. Here is a simple an effective code that adds a new worksheet…
How to Add Outlook Reference in Excel VBA? To automate Outlook based tasks from Excel you need to add Outlook Object Library (Microsoft Outlook XX.X Object Library) in Excel References. You can follow below steps…
This Excel VBA Code helps to Get User Name. Here is an example environ(username) or Application.username.This macro gets the username from active directory.