Ugh...I have ran into another problem. I added a debug.print Item.Class and it shows " 51 " in the immediate window, without quotes. So, it starts and ends with a space. Oddly, it does go through the first if and second if. What could be wrong? I am getting stuck at the "Set Recips =...
I don't suppose you know of a way to simplify this:
If Item.Class = olTaskRequest Or Item.Class = olTaskRequestAccept Or Item.Class = olTaskRequestDecline Or Item.Class = olTaskRequestUpdate Then
Set mytaskreqItem = Item
Set myNewTaskItem = mytaskreqItem.GetAssociatedTask(True)...
So...with the following sequence, I get the name of the recipient in the immediate window, but it fails at the last line, of what is pasted in this post, with "Run-time error '91': Object variable or With block variable not set" and I am not sure why. Will you assist, please?
Private Sub...
Private Sub Application_ItemSend(ByVal Item As Object, Cancel As Boolean)
Dim lbadFound As Boolean
Dim send As String
Dim KaceCommands, Recipients, Recip, RecipList As String
Dim i As Integer
Dim aFile As String
Dim enviro As String
Dim n As Integer
enviro = CStr(VBA.Environ("USERPROFILE"))...
The following is the beginning of my VBA code, which has the core function to make sure the sender verifies that the information is not sensitive when sending emails to a recipient on from a list. I have built this from this forum and a few other forums. Currently, it works awesome for sending...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.