Search results

Hi, the background of my need is we are checking our database for still valid email address and send out an email to this contact. If address has problem, I get a mail in return like this: ----------------- This message was created automatically by mail delivery software. A message that you...

Ahaa.. Many THX If I want to use Google Maps, what has to be replaced in the code? Is this the only line? ReplaceSpaces strAddress strURL = "https://www.zillow.com/homes/" & strAddress What do I have to write there instead? strURL =...

Hi, when I put an adress into a standard contact form in OL 2019 I get this button beside the adress: When I switch to customize the form, this Button is gone! HOW to add this button to the custom contact field? In older versions of OL I remember a button in the ribbon to show the address of...

Any news? It sounds very simple jut to have a macro that goes to a search folder But no solution?

I found This, But Sub EnumerateSearchFolderItems(ByVal sSearchFolderName As String) Dim oOutlook As Object 'Outlook.Application Dim oNameSpace As Object 'Outlook.Namespace Dim oStores As Object 'Outlook.Stores Dim oStore...

NO! NO! You total misunderstood my demand! Sorry ! So I try again to explain what the desired macro should do following this macro which worx: Sub GoTo_Ungelesene_Nachrichten() Set Application.ActiveExplorer.CurrentFolder = Session.GetDefaultFolder(olFolderInbox) End Sub I just want a new...

THX The output was: \\email@gmail.com\Suchordner\Ungelesene Nachrichten What now to put in this macro to go there? Sub GoTo_Ungelesene_Nachrichten() Set Application.ActiveExplorer.CurrentFolder = Session.GetDefaultFolder(olFolderInbox) End Sub I tried this but the folder stay the same as it...

Hi, I want to speed up workflow in OL 2019 GERMAN version I have this macro to goto inbox Sub GoTo_Posteingang() Set Application.ActiveExplorer.CurrentFolder = Session.GetDefaultFolder(olFolderInbox) End Sub How to modify this to GoTo the use defined seachfolder: Hope for help PS: I tried...

Hi again I now want to open the search window with a new defined View called "XSearch" that better reflects the necessary fields to open the need contact. But without losing the current view of the contact folder. When I close the search window. Can you pls help with the new code?

Worx great THX the only thing to consider is to use the German field name to work in German version of Outlook sFilter = "Categories:=""" & strCategory & """" is sFilter = "Kategorie:=""" & strCategory & """" That make Things more difficult is there a list somewhere with English and German...

THX I will check

How can the result of e.g this search be displayes in a new window in a list with name and Email? Sub CopyContacts() Dim ContactsFolder As Outlook.Folder Dim DestFolder As Outlook.Folder Dim ContactItems As Outlook.Items Dim ResItems As Outlook.Items Dim sFilter, strCategory As...

Now I have This: Sub OpenContactFromEmail_50() 'geht öffnet richtig im neuen fenster Dim objMail As Outlook.MailItem Dim objContact As Object Dim strSenderEmail As String Dim objFolder As Outlook.folder Dim contactFound As Boolean Set objMail =...

Solved with this code in the Form: Sub Item_Open() Set objWSHShell = CreateObject("WScript.Shell") objWSHShell.SendKeys("{TAB 14}") objWSHShell.SendKeys("^{End}") objWSHShell.SendKeys("{Enter}") End Sub

Great Many THX :)

Hi, I'm looking for a possibility to get a photo in my User Defined Contact form. The standard Contact form has I think a control for this. Do you know how to put this in a User Defined Contact form? Can this or similar library do the job?

THX for taking care It is solved in this macro: https://forums.slipstick.com/threads/99659-macro-to-send-an-email-template-from-user-defined-contact-form/

Hi, I have put together this macro That sends an email template to the email address 1 inserts contact name and formats the title from an opened user defined contact form and put some text at the end of the form body in green: Sub TestPlate() 'MAKRONAME eingeben Dim textInFormular...

As it seems there is no fix, I would like to ask for a macro that dos that function I'm standing on a received mail in inbox Start the desired macro macro looks in user defined Contact folders for the email and opens the contact in the user form of the contact Pls help

Hi, troubles to get the template path into a function I have a Macro that should send an email template to the already opened contact Fill in Email and name open it for editing and send it without the new function, it worx like this: Sub TESTplate_0() 'Makro name wichtig zum aufrufen Der Name...