Visual Basic o Visual Basic es un lenguaje de programación que se puede utilizar para controlar los procesos en Outlook. Una lista de los contactos de Outlook se puede actualizar de forma automática mediante el uso de una secuencia de comandos VB . Cosas que necesitará
editor de Visual Basic
Mostrar más instrucciones
1
Abra un editor de Visual Basic .
2
Inicie un nuevo proyecto . en VB y agregue el código siguiente
3
Crear un nuevo subprograma y añadir las variables para almacenar los datos :
Sub addtoOutlook ()
Dim olkApp As Object
olkFldr Dim As Object
olkContact Dim As Object
myContactList Dim como objeto
olFolderContacts Const As Integer = 10
< p> Const olContactItem As Integer = 2
cel As Range
4
una instancia del objeto de Outlook en Visual Basic :
Set olkApp = CreateObject ( " outlook. aplicación " )
5
Obtén todos los contactos de Outlook y los almacena en una variable :
Set olkFldr = olkApp.Session.GetDefaultFolder ( olFolderContacts )
6
bucle a través de todos los contactos en la lista que ha exportado " myContactList . " Si encuentra el nombre de la persona , que se sobreponen a los tres campos con los datos de su lista. Si no lo hace , entonces se creará una nueva entrada y rellenar los mismos tres campos.
Para cada celda myContactList
Si cel < > "" Entonces
< p > On Error Resume Next
olkContact Set = Nothing
Set olkContact = olkFldr.items ( cel.Offset ( 0 , 1 ) & " " & cel )
On Error GoTo 0
Si olkContact es nada entonces
Set olkContact = olkFldr.items.Add ( olContactItem )
End If
olkContact
< p> . apellido = cel
. nombre = cel.Offset ( 0 , 1) spanish
. MobileTelephoneNumber cel.Offset = ( 0 , 2 )
. Guardar < br >
extremo con
End If
Siguiente
End Sub
tu lista de contactos de Outlook ahora será actualizado con la última información de contacto de su lista.