Here is my attempt at retrieving the BlodDrive folder and setting the appt in it. I get a error 438 and the following line is highlighted.
Else
Dim obNamespace As Outlook.NameSpace
Dim objFolder As Outlook.MAPIFolder
Dim objRecip As Outlook.Recipient
Dim strName As String
Dim objAppt As...
Ok this is where I am now. I have it to where I and others that have permission to my main default calendar (ChrisCalendar) can add the appt. Now the question is to how do I designate that appt to a created calendar that is in My Calendars Folder that will be shared. My main Calendar is named...
Has anyone told you that you are great!!!!
424 Error in red line it comes up as (Application=1) whne moused.
Not sure when we need to look at this. When this gets going, ibelieve it will go to my default calendar. I am going to need it to go to a created calendar in my outlook.
Else
Dim...
I get a runtime error 424. Ok I have been looking at several posts and trying to get the idea of this. When i have my curser over the strName the email address comes up, but when i put it over objRecip I get = nothing.
Else
Dim objFolder As Outlook.MAPIFolder
Dim objRecip As...
Yes this post.
Thank for the help!
I have access to and owner permissions on the BloodDrives Calendar (not my default). My secretary and few others also have those permissions and can view, add and edit. We all use the same Access DB front end and I will be sharing the Blood Drives Calendar...
I have added this bit froma post by darbid
Else
Dim objFolder As Outlook.MAPIFolder
Dim objRecip As Outlook.Recipient
Dim strName As String
Dim outobj As Outlook.Application
Dim outappt As Outlook.AppointmentItem
Set outobj = CreateObject("outlook.application")
Set objFolder =...
I have an Access DB that is used by multiple users. I have set it up to link the appointments to my default Outlook calendar, but would like to allow any user in the DB to be able to send it to a nondefault created Calendar that we all share.
Here is my current code. I have tried several other...
:confused: I have a question. I have the scanner and everything setup, but it always populates the text box with the number and an = sign in front of the number. Ex. =12548779 How can I correct this?
Alright, I have it working sort of. The sub is vislibe only when I change the cmbo box to "screening" but when I go to another form that already has the cmbo box with screening< the sub is still invisible. I have tried Current() Before Update() and all of them but it is still only visible when...
I fixed it. my sub was misnamed in the form.
Private Sub cboEvent_Change()
If Me.cboEvent = "Screening" Then
Me!sfrmScreeningDetail.Visible = True
Else
Me!sfrmScreeningDetail.Visible = False
End If
End Sub
I have subform that I only want to be visible in a parent form when the combo box has "Screening " selected. Here is my code. I'm not sure why this is wrong.
Private Sub cboEvent_Change()
If Me.cboEvent = "Screening" Then
Forms!Initial_Action_Donor_Center.Form.sfrmScreeningDetail.Visible =...
I have a Word Document that is merged with Access Qry. In 03 i had to go in tools (in word) and click a box to allow it to connect to the database. Now I have 07 and it does not show the queries except in views and then does not allow me to connect to it. Not sure what to do??? :mad: