Modules & VBA :: Appointment In Non Default Outlook Calendar
Dec 3, 2013
I use the code below which creates an appointment in Outlook default calendar. I need to add a few lines to create the appointment to an alternative calendar in the same pst file. I need to choose between three calendars in which to create the appointment and plan to select the calendar name from a list on the form.
Dim objOutlook As Outlook.Application
Dim objAppt As Outlook.AppointmentItem
Set objOutlook = CreateObject("Outlook.Application")
Set objAppt = objOutlook.CreateItem(olAppointmentItem)
[code]....
View Replies
ADVERTISEMENT
Aug 19, 2014
I am very new to VBA. I found some code that will allow me to add an appointment to my personal calendar with using access VBA and it works great. It also allows me to add an appointment to another calendar created under "My Calendars" folder.
I wanted to know how to change the code in order to add the appointment to the SHARED calendar instead.
The main folder is called "Shared Calendars" which is at the same level as the default "My Calendars" folder. Under the "Shared Calendars" folder the calendar is called "Tester".
Here is the code im using at the moment: I believe I have have to change the line of code that is in red but I don't know how.
Private Sub cmdAddAppt_Click()
On Error GoTo cmdAddAppt_Err
Dim outobj As Outlook.Application
Dim outappt As Outlook.AppointmentItem
Dim olNS As Outlook.NameSpace
[Code] ....
View 1 Replies
View Related
Dec 4, 2014
I have been able to successfully set up code to be able to add appointments to microsoft outlook based on data within a few forms that I have. My question is this however, how do I get access to make that appointment to a specific calendar on outlook. This calendar is a shared calendar. Currently, access is just adding the appointments to "My Calendar" and I could like it to place the appointment on "HVCalendar". a version of the code I found online is listed below:
Private Sub btnaddappttooutlook_Click()
'On Error GoTo ErrHandle
Dim olNS As Object
Dim olApptFldr As Object
' Save the Current Record
If Me.Dirty Then Me.Dirty = False
[code]...
View 1 Replies
View Related
May 30, 2013
I have linked a Shared Calendar from MS Outlook in MS Access. The fields that I need which are Appointment/Meeting Date and Time are not there, only creation date/time. Is there anyway for me to get the Appointment/Meeting Date and Time from Outlook into the table?
Windows 7
Office 2010
View 1 Replies
View Related
May 2, 2014
I have a folder under the default on in outlook named ANOTHER FOLDER. All I am trying to do is add the blasted entry to this folder. At the moment though it is adding the information to the default calendar and not ANOTHER FOLDER. I'm just testing at the moment but I have tried all manner of combination but no dice.
Code:
'Error 429 occurs with GetObject if Outlook is not running.
On Error Resume Next
Set objOutlook = GetObject(, "Outlook.Application")
If Err.Number = 429 Then 'Outlook is NOT running.
[code]...
View 11 Replies
View Related
May 1, 2014
I have been using the below code for a number of years to send reminders to Outlook and colour them red (my category colour for certain items).
I've been asked to roll out this code to all members of my dept but the category for other people assigned to the red colour is different to mine.
Is there a way to colour the item using the colour name rather than the category name?
Set OutlookApt = Outlook.CreateItem(olAppointmentItem)
With OutlookApt
.Subject = MailSubject
.start = Dte
.End = DateAdd("h", 1, Dte)
[Code] ....
View 3 Replies
View Related
Jan 26, 2005
I currently can send emails from my form in Access 2000. What I would like to do is send from the form an appointment that would go into the recipients calendar in outlook. I would like for this to happen when someone checked a specific yes/no box and pick up the date needed field on my form as the calendar date in outlook. Right now when the yes/no box is selected it automatically generates a email. Any suggestions out there?
Regards,
Allen
View 3 Replies
View Related
Jan 11, 2008
Hello,
I have a problem to solve using ACCESS 2007. I have an 'appointments' table and a calendar. So far as I click on any date on the calendar it is supposed to show me the appointments for that specific date on the form (this info is gotten through the 'appointments' table which has the date for each appointment). Appointments have to be separated by a 20 minute difference (8:00am, 8:20am, 8:40am, and so on....). I have to have about 30 spaces or appointments to be filled up per day.
So overall, the customer wants to have 30 spaces (already filled up with the times) so he could fill out the rest of the appointments info in each needed space as he sets up appointments.
Do I have to create 30 records for each day? How would I do this? What happens with the paces (records) that are not filled? Wouldn't that be a record that is not used (wasted record in the table) ? Is there a more efficient way to do this?
Thank you very much everybody.
View 1 Replies
View Related
Aug 17, 2011
I'm putting together a Customer Management dbase, in Access 07, and one of the tables is dedicated to scheduling (and the outcome) of customer appointments.
The tables I'm hoping to get a solution for are:
1: Customer Master Data (parent): contains fields such as Name, Address, Phone #, email etc
2: Appointment Master (child): there are 4 Appointment tables/queries, one for each of the available product groups, and contain such fields as Product Type, Lead Source, Lead Status, Appointment Date, Appointment Time, Sales Rep, Appointment Comments
What I am trying to do is find a solution as described below:
1: When the appointment is created the appointment is then pushed into Outlook 07; along with various customer information from the Customer Master table
2: OR is there an appointment/scheduling calendar, preferably with the same look/feel of outlook, available that forms part of the access 07 dbase? This is probably the preferred solution.
View 4 Replies
View Related
Oct 22, 2004
How do I create an Outlook appointment from an Access database?
Thanks for the help!!
View 3 Replies
View Related
Sep 30, 2006
Hi there,
I have this sports center database. Basically what I have is a appointments or "bookings" form which I want to be able to modify to be able to add / delete groups that want to book time in the sports center, whenever I try to do this though however the bookings fail to show up on frmcalendar_daily.
Anyone got any ideas or suggestions (i deleted the groups table / form, decided to start from scratch!)
Jon
View 1 Replies
View Related
Mar 19, 2006
Hi everyone,
I wanted to know if there's a way to implement a calendar in MS Access? In other words, I'd like to create a calendar that act the same way as the Outlook calendar? At first I tought about the calendar control 8.0, but we can't write anything in a square date of the calendar. So , I'm out of idea.
Thank you in advance for your suggestions!
View 3 Replies
View Related
Mar 10, 2006
Is it possible?
My departments wants a calendar that reminds us when a certain date is approaching.
MS Outlook has that calendar.
Can we integrate them somehow? Or do I have to write something in Access(is it even possible).
Or do I just have to look at different software out there?
View 1 Replies
View Related
Feb 6, 2014
A client I am working for wants a calendar to interact with their database forms, I am thinking outlook would be the best bet, as a table and form to make my own in access would be overly complicated. Is there any way to embed a calendar from outlook within an access form?
View 1 Replies
View Related
Jul 10, 2013
I've created a db for a group working on the repairs needed after Super storm Sandy. In the db I have captured arrival and departure dates of work teams coming in to support. How I can populate an Outlook calendar from the db table?
View 5 Replies
View Related
Sep 11, 2005
Good Evening All,
I want a cheep calendar that links to queries and can input data as well as display it. It has been on my wish list for 7 or 8 years.
If anyone know how to make one or knows where to buy a cheep one I would really appreciate it.
View 5 Replies
View Related
Mar 8, 2007
I have developed an Access database which keeps track of items we have received. What I want to do is enter a date in a field and then by clicking a button that date and the name of the item gets enetered into my Outlook calendar so that it will pop up a reminder on that date.
I have no idea if/how this can be done. Any ideas or examples very much appreciated.
View 2 Replies
View Related
Oct 26, 2004
Hello Guys,
I'm totaly new to access and outlook applications etc..
What I'm trying to do is link an access table to my calendar in outlook. I can do it but there is one problem it is not importing all the fields. But when I do an export from outlook to access database file all the fields are there.
Can someone help me with this issue?
P.S. I'm using outlook 2003 and connecting to exchange 2002.
Thank you for all the help I can get
View 2 Replies
View Related
Aug 5, 2015
I created a call logging/work tracking type Database using SharePoint 2007 lists for the backend and Access 2013 front end for about 60 users and it has been running smoothly for around two years .
We use a shared outlook calendar and I want to be able to pull meetings & appointment information into the database from the calendar so I can assign the meetings out to specific people and keep of a record that they where given the request to attend. I was able to use the import outlook folder to create a linked table and it has lots of great information from the calendar apart from the two most important things you need in a calendar Start_time & End_Time . Is there something I'm missing in regards to these two fields? I assume I'm doing something wrong but I can't figure out what, nor did I have much luck with the Search function on here or google.
This is the list of field names it does import(everything apart from the meeting time and is it a recurring appointment)
Importance
Icon
Priority
Subject
From
Message To Me
Message CC to Me
Sender Name
CC
To
Received
Message Size
Contents
Created
Modified
Subject Prefix
Has Attachments
Normalized Subject
Object Type
Content Unread
View 1 Replies
View Related
Oct 10, 2014
I have been looking for a way to sync a table holding reservation dates to MS outlook calendar automatically when dates are inserted in the table.
View 2 Replies
View Related
Jul 17, 2013
I have a module in my database that creates an appointment based on a table of sessions. The module works in all respects, except two:
1) When I declare optional attendees it sometimes shows them as required attendees in the actual meeting in outlook, but not always
2) The .Send method does not seem to work. It creates the appointment on my calendar as the originator of the appointment, but does not send to the other recipients.
Below is the code:
Code:
Private Sub SchedOutlook()
Dim rsEmployee As DAO.Recordset
Set rsEmployee = CurrentDb.OpenRecordset("Select * FROM Employee INNER JOIN tblSession ON Employee.EmpID = tblSession.EmpID;", dbOpenDynaset)
Dim rsMentor As DAO.Recordset
[Code] ....
View 4 Replies
View Related
Feb 1, 2005
Hi. I have managed to create a command button on my form to send a date field on the form to Outlook as a task. I know this isn't exactly what you wanted to do, but you may be able to tailor the code to suit.
Private Sub cmdOutlookRem_Click()
Dim OutlookApp As Outlook.Application
Dim OutlookTask As Outlook.TaskItem
Set OutlookApp = CreateObject("Outlook.Application")
Set OutlookTask = OutlookApp.CreateItem(olTaskItem)
With OutlookTask
.Subject = "Contact " & Me!Forename & " " & Me!Surname & ", " & Me!CompanyName
.Body = "Company Tel No: " & Me!CoTelNo & ", " & "Direct Line: " & Me!DirectLineinCo & ", " & "Mobile: " & Me!MobileNo
.ReminderSet = True
.ReminderTime = DateAdd("n", 2, Me!DateNextContact)
'Remind 2 minutes from now.
.DueDate = DateAdd("n", 5, Me!DateNextContact)
'Due 5 minutes from now.
.StartDate = DateAdd("n", 2, Me!DateNextContact)
.ReminderPlaySound = True
.ReminderSoundFile = "C:WindowsMediaDing.wav" 'Modify path.
.Save
End With
End Sub
View 1 Replies
View Related
Mar 23, 2015
I wish to work in Access 2010 with a subset of my Outlook 2010 contacts (all desktop- no network barriers), so I am exploring the Desktop Contacts DB found in Microsoft's templates. It passes contact data back and forth using the standard macros, but I wish to add more fields from Outlook. It seems I need to find the code associated with the macro. I believe I can solve the problem using a Linked table, but am wondering if there is another solution?
Calendar synchronization is another issue. Linking gets me to the Archive Calendars, but not the Current one in Outlook which is what I want.
View 2 Replies
View Related
May 19, 2015
I have set calendar control 12.0 up and everything works how I want it to (click date and peoples names in a table to the left to show scheduled meetings on that day). What I want is to add a string on top of the calendar. For example, this monday I would like for it to say "Memorial Day" on the physical calendar itself.
View 3 Replies
View Related
Jul 13, 2013
A client wants to e-mail newsletters using a non-default Outlook account. The code below does everything the client needs except setting the SendUsingAccount. In debug I can see that the correct account is assigned, yet all of my testing results in e-mails where the From line is the default account. The test setup uses my own isolated SMTP server, so when I look at the e-mails sent the sender is the default account. The default account's Sent folder shows the sent mail, which is not what we want.
Code:
Sub prepEmail()
Dim frm As Form, startDate As Date, endDate As Date
Dim rs As DAO.Recordset, strSQL As String, intNewsLetter As Integer
Dim rsEmail As DAO.Recordset, rsNewsletters As DAO.Recordset
Dim OlApp As Object, ol As Object
Dim olMail As Object, olAcct, olAcctTemp
[code]...
View 3 Replies
View Related
Jun 16, 2013
The below code is intended to:
1. open outlook mail;
2. copy the email details into the database;
3. save the attachment into a E: drive location;
4. move the email to another folder.
1,2 and 4 were working fine until I tries to save the attachment and got stuck on the SaveAs line.
Dim Ola As Outlook.Application
Dim Nsp As Outlook.NameSpace
Dim pf, Inbox, ib, newdest As Outlook.MAPIFolder
Dim msg As Outlook.MailItem
Dim Atts As Outlook.Attachments
[Code] ....
View 6 Replies
View Related
