I currently have a form where a user can enter the criteria to print a report. For a date based report I would like to have 2 "pop-up" calendars where the user can click the start date and end date criteria.
Can anyone recommend a program or add-in that I can use with Access97?
I have a button on a form which calls a module to show a calendar form. The user picks date and time, and saves it. The calendar form closes and adds the date and time to a text box on the initial form.I want to save the record so that the underlying table/query is updated, but it's not working. The record is not saved until the initial form is closed.Here's the form vba...
Code:
Option Compare Database
Option Explicit
Private blnFlag As Boolean, blnSaveIt As Boolean
Private Sub btnDelete_Click()
On Error GoTo Err_btnDelete_Click
[code]...
I have been trying to find a calendar that I can put on a form to set up reminders, notes, and other things. I have had no luck finding such a thing.
I tried using Calendar Control 9.0, but that will not work for my needs.
If anyone knows where I can get a calendar like this, or if there is some sort of code that will make this happen, please let me know.
Thanks in advance,
PuJo
"On The Bayou"
I need to include a pop up calendar in a form - could someone please point me in the right direction about how I go about doing this?
Also, I'd like the day to be selected and shown automatically when a date is selected - does anyone have any idea how I could do this please?
Any help would be much appreciated.
Thanks in advance
I have started my own MS Access Hints and Tips Club (http://msaccesshintsandtips.ning.com/profiles/blog/show?id=948619%3ABlogPost%3A301) and in an effort to attract new members I am offering a free calendar form.
I haven't seen any other Calendar form (DEMO HERE) (http://www.viddler.com/TonyHine/videos/35/fullscreen)with the advanced features that my calendar form offers, so I hope it's unique. It also benefits from the fact that it is very simple to set up and use on your own form. All you have to do is add two controls a command button to call the calendar form, and a text box to receive date.
you use a simple naming convention:
Command button named: "btnDOB"
Text box named similarly: "txtDOB"
The "DOB" portion can be any text you like as long as both buttons have the same text, >>> "DOB" <<< Any way Have a look at the DEMO at least! (http://www.viddler.com/TonyHine/videos/35/fullscreen)
I'm creating a Database where I can track quotes, orders, customers, support/faults and products.Is there any way to have a Form that looks like a calendar.. ie this will link to my orders table and show what orders are due shipping on each day.
View 6 Replies View RelatedHi All,
Thanks to "Beginning Access97 VBA Programming" by R. Smith & D. Sussman, I was able to implement the use of a calendar form to allow a client to select a date, rather than keying one in. And here I thought I was done with the problem....Wrong !!! The calendar form only works if existing records already have a date(shortdate) associated with the record.
But when I try to create a new record, the date field is "null" and I can't figure out how to pass a date value to the calendar control even though it's receiving a null. I get this "type mismatch" error I've bumped into the part of the code that was supplied via the book where the "property set datecontrol (Byval ctldate as Control) is set, but I can't figure out
how to deal with this incoming "null" value from the newly created record.
Can anyone help? I'll check in later on tonight if anyone is needing part of the code as reference to what I'm trying to accomplish.
Thanks so much.......CementCarver
I have been using a calendar control on a subform and have now split the data into a tabbed form with 4 subforms. The calendar is now entering the date selected into the first record of each subform instead of just the one on the subform that has the focus.
Do I need to add the calendar control to each subform now or is there a way to reference the correct form in my current code?
Private Sub Calendar_Click()
' Enters the selected date into the DateCompleted field
Forms![Training]![ElectiveTrainingSub].Form.[Date].Value = Me.Calendar.Value
Forms![Training]![CorpReqSubform].Form.[Date].Value = Me.Calendar.Value
Forms![Training]![XOGReqSub].Form.[Date].Value = Me.Calendar.Value
Forms![Training]![Recommended Training].Form.[Date].Value = Me.Calendar.Value
I have tried If Me!TabCtl159 = Me.Page160 (first tab) Then
'enter date into that record
with no luck
Any ideas would be appreciated as always!
Thanks,
Toni
I've creating an Access project, which is at an early stage. I'm using Access 2003 with a default file format set to Access 2000.
I've been trying to update a date field within a table using this piece of code from a Calendar form. The Calendar form has a Command Button called cmd_Accept. Its sub routine is shown below. Both variables, dt (date) and fvr_id (field visit report ID) are global.
The code works - too well! Instead of updating the only the target record, it will either update the first record plus the target record or all records with the same date and I cannot understand why this should happen.
[Field Visit Report ID] is unique, being the primary key for the table, tbl_field_visit. It is AutoNumber generated. I've double-checked the table and all entries in [Field Visit Report ID] are unique. All my MsgBOX displays show what I would expect to see.
As you can see, I've also tried doing the same task using SQL - with exactly the same result.
I've been going round and round with this for days. Should I bin this and go down another route, or can anyone tell me where I'm going wrong?
Any help much appreciated.
Private Sub cmd_Accept_Click()
Dim dbs As Database, rst As Recordset
Dim strSQL As String
dt = ocxCalendar.Value
' +++++++++++++++++++++
' Field Visit Report ID now set from another sub routine. Tested and working.
' fvr_id = Form.[Field Visit Report ID]
' +++++++++++++++++++++
' MsgBox "The Field visit report ID is " & fvr_id, vbOKOnly
' MsgBox "The date is " & dt, vbOKOnly
Set dbs = CurrentDb
Set rst = dbs.OpenRecordset("tbl_field_visit")
If rst.RecordCount <> 0 Then rst.MoveFirst
MsgBox "fvr_id = " & fvr_id & " Date = " & dt, vbOKOnly
Do While Not rst.EOF
If (rst![Field Visit Report ID] = fvr_id) Then
MsgBox "The Record ID is " & fvr_id, vbOKOnly
found = True
With rst
.Edit
!Date = dt
.Update
.Bookmark = .LastModified
End With
End If
rst.MoveNext
Loop
rst.Close
' If found Then
' vbButtons = vbOKOnly + vbExclamation
' MsgBox "Record Found! " & " Date = " & dt & " Field Visit Report ID = " & fvr_id, vbButtons
' If rst.RecordCount <> 0 Then rst.MoveFirst
' strSQL = "SELECT tbl_Field_Visit.Date FROM tbl_Field_Visit WHERE tbl_Field_Visit.[Field Visit Report ID] = " & fvr_id
' Me.RecordSource = strSQL
' MsgBox strSQL, vbOKOnly
' strSQL = "INSERT INTO tbl_Books ([Date], VALUES '" & dt & "')"
' strSQL = "UPDATE tbl_Field_Visit SET tbl_Field_Visit.Date = '" & dt & "' WHERE tbl_Field_Visit.[Field Visit Report ID] = " & fvr_id
' MsgBox "strSQL = " & strSQL, vbOKOnly
' dbs.Execute strSQL
' End If
dbs.Close
Set rst = Nothing
Set dbs = Nothing
fvr_id = 0
DoCmd.Close
End Sub
Before I waste a ton of time trying to do something that just isn't possible, can one of you tell me if the following is possible?
I have a database that I am using for appointments.
Is it possible to have a calendar control on a form that shows all of a person's appointments that occur during the month? For example, Joe has 3 appointments in april. Can I make the calendar show me all three dates (the appointment dates being depressed on the control) that he has appointments on? If so, can you tell me how? I can make it do one date, by making the row source the date scheduled field from the table.
Should I have seven different fields in one record for the appointments that could occur all seven days of the week?
KellyJo
Here is my problem. I am hoping that someone here can be my hero on this one.
I am trying to figure out what would be the best possible way to track my hospital's staffing. I need a form that I can click on the Active X calendar and have it populate the staffing table. I have built the code and it works great.
The problem is that the way the code works now, I have to have a field in my table for every single date scheduled. For example, right now, I have the staffing table like this:
Name
Date Scheduled
Date Scheduled1
Date Scheduled2
Date Scheduled3
Of course, after a month, an employee will have worked more than four shifts. I really don't want to add a field for every shift they could have worked because then, after a month, I'll have thirty date fields, and after a year, I'll have 365. So, do you have any ideas about how I can do this without having 365 date fields?? Thank you! If you can help me figure this out, you are my hero.
KellyJo
I have a form bound to a table that has a bunch of dates in it. What I want to do, is to be able to have pop-up calendars on the form next to each date field, where the user can select dates from the calendar, then have those dates display on the form, and last but not least, update the date fields in the table.
At the moment, the form I'm working with let's me pick dates from little pop-ups and display the dates, but when I exit the form and then come back into it, the dates are gone! In other words, I'm missing something in the process between the dates displaying onthe form and the dates getting into my table.
If anyone has an idea as to what I might be doing wrong, I wouldappreciate your ideas and suggestions.
Thanks in advance. I don't know where I'd be without this forum!
I want to display a month calendar on my db's main form.
View 3 Replies View RelatedI am a novice Access user. The idea is to build a visit tracking database. We are currently using excel to input appointments and outlook for statistics and patient data (as contacts). I am basically doing double the work.
The excel sheet is one week (Mon-Sun), the dates are in the top row; the names of patients are in t/he left-most column. The visit is marked by the name of the therapist. So, if John Doe has a visit from Linda on 08/25/12, there would be a "L" in the cell corresponding to the date and patient. There are also initial visits by the head therapist and there is a letter "IV" in the cell to indicate that.
I know that I can import the contact list from outlook and create a table and I know there's a calendar function.
Is there a way to
1. Create a form that will act as a weekly calendar (with each cell in a column having the same date, indicated in the top row) with connection/sync with outlook?
2. Be able to customize this form: add and delete patients in the left column.
3. Have the form count number of visits (# of total visits, # of total visits after the initial visit). In other words keep statistics of various sorts.
hello guys
i want to implement pop up calendar available on this discussion forum. i match all the propoerties of 'MyDate' in my form with 'MyDate' in "Frm Trial" form of Popup Calender.mdb.
copied 'zsFromCalender' in Popup Calender.mdb.
now the problem is when ever i run the code, i am getting message
Compilation Error:
Can't find project or library
and it is heighlighting intDayToday = DatePart("d", Date)
So please anyone help me to resolve this problem
Thanks :)
I have a database that has textfields / forms, what I would like to do is to add an option that when the textfield is clicked a calendar will appear and when the user selects the date in the calendar interface, it will insert the date for them.
How can I do this in MS Access?
I have a continuous form bound to a query. I want to filter this form with any date inputted into a text box through a pop-up calendar control. The default date in the text box should be Date().In the query, I set the criteria on Call_Date filled as follows but the form does not requery to return the expected data:
Call_Date:
Criteria: Forms!F_On_Call_Officers!txtEndDate
I am trying to make a database for my employees to count their attendance according to the days of the month and then get their salary. How to create a form that show the days of the month and then i can add the names of the attending employees.
View 4 Replies View RelatedRuntime Error 3075? I have attached a copy of my database. I am trying to make a calendar form with the list boxes having two columns. It works fine with the strFieldID and strFieldName but when I try adding the strDone I run into the error.
View 6 Replies View RelatedI am making a calendar form in Access and want it to look like Google Calendar as much as possible. I am wondering if there is a good way to go about setting up the form to allow for multiple appointments scheduled for the same time. Designing the form to be in Week View with half hour blocks has me at 210 text boxes. As far as I can tell, there isn't a way to dynamically add in controls unless you are in design view. However, how many appointments might be scheduled at the same time. I could add in as many text boxes as possible I guess, but that doesn't seem to be very efficient (and the base form is already at 210). Is there anyway to add in controls (such as text box or label) if a new appointment is added at the same time as existing ones?
View 5 Replies View RelatedHi All
I have added the Allen Browne Calendar 2k control to my form.
My form consists of 4 pages. On pages 2 and 3 I have subforms and on page 4 I have Personal data. Page 1 is general data and the Calendar is on Page 1.
What is happening is that the Calendar is also being displayed on my 4th page, in the same position as page 1. When I try to move it, cover it or delete it from page 4, it is also gone from page 1.
Any suggestions please?
Many thanks
Tee :(
Hy!
I've putted on calendar on an database but by example when I press first of June how can I make it recognise which week day is it?
Thanks
Hi All!
I have Access Calendar on my form. I named it txttoday. Which code and where should I put the code in order when I open my form I want the date always be on todays date. I guess it should be on Open and something like txttoday = now()....
Please advice,
B
Using an activeX calendar. I have 2 questions.
1) Is it possible to have certain dates always highlighted in the calendar so the user can clearly see these dates. What I'm looking for specifically is to have each second thursday always highlighted with another color.
2) Using a seperate form and calendar than the one above, how would I go about using a calendar to search for old records (apply a query to it maybe, but how would I do that?) so that when I click on a date, the records for that specific date are opened.
I really appreciate any help that anyone can offer with either question. If you leave an answer in code, can you please clearly define what you named each item that I may need to replace, i.e. Calendar, Date, etc., because I'm not incredibly familar with using code.
Thanks in advance for the help, I will be able to respond quickly if you have any questions or if I didn't explain anything clearly.
Hi All!
I have Access Calendar on my form. I named it txttoday. Which code and where should I put the code in order when I open my form I want the date always be on todays date. I guess it should be on Open and something like txttoday = now()....
Please advice,
B
I am trying to use a calendar to fill the date box on a simple form, I have used the examples from various threads on here but I cannot get the calendar to pop up.
The error message I get is
Run Time Error 2110
Microsoft Access cant move the focus to the control activeXCt161
Any thoughts on how I can fix the problem?