OL2000: Nasıl günlüğü, tüm kişiler için programatik olarak ayarlama

ÖNEMLİ: Bu makale, bir kişi tarafından çevrilmek yerine, Microsoft makine-çevirisi yazılımı ile çevrilmiştir. Microsoft size hem kişiler tarafından çevrilmiş, hem de makine-çevrisi ile çevrilmiş makaleler sunar. Böylelikle, bilgi bankamızdaki tüm makalelere, kendi dilinizde ulaşmış olursunuz. Bununla birlikte, makine tarafından çevrilmiş makaleler mükemmel değildir. Bir yabancının sizin dilinizde konuşurken yapabileceği hatalar gibi, makale; kelime dağarcığı, söz dizim kuralları veya dil bilgisi açısından yanlışlar içerebilir. Microsoft, içeriğin yanlış çevrimi veya onun müşteri tarafından kullanımından doğan; kusur, hata veya zarardan sorumlu değildir. Microsoft ayrıca makine çevirisi yazılımını sıkça güncellemektedir.

252947
Bu makale arşivlenmiştir. "Olduğu gibi" sunulmaktadır ve bundan sonra güncelleştirilmeyecektir.
Özet
Bu makalede, bir Outlook Visual Basic for Applications makrosu, günlüğe otomatik olarak ayarlanır, tüm kişileriniz programsal olarak değiştirmek için kullanabileceğiniz sağlar.
Daha fazla bilgi
Günlük kaydı kişi öğelerinin <a2>Varsayılan</a2> ayarını devre dışı bırakılır. Ilgili kişi oluşturmak ve bu kişiler için günlük kaydını etkinleştirme karar vermek, her kişi için <a1>Günlük</a1> seçeneğini ayarlayın:
  1. Araçlar menüsünden Seçenekler ' i tıklatın.
  2. Tercihler) sekmesinde, Günlük seçenekleri ' ni tıklatın.
  3. Bu kişiler iletişim kutusunda, günlük kaydını etkinleştirmek istediğiniz her bir kişiyi tıklatın.
Çok sayıda kişi varsa ve günlüğe kaydetme, bunların tümü için etkinleştirmek istediğiniz kişilerin tümü programsal olarak değiştirmek için daha verimli olabilir.

Microsoft, programlama örneklerini yalnızca gösterim amacıyla sağlar; satılabilirlik ve/veya belirli bir amaca uygunluk da dahil, ancak bununla sınırlı olmamak kaydıyla, örtülü veya açık garanti vermez. Bu makale, gösterilen programlama dilini ve yordamları oluşturmak ve hata ayıklamak amacıyla kullanılan araçları kullanmayı bildiğinizi varsayar. Microsoft destek uzmanları, belirli bir yordamın işlevselliğinin açıklanmasına yardımcı olabilir, ancak gereksinimlerinizi karşılamaya yönelik olarak ek işlevsellik sağlamak veya yordamlar geliştirmek amacıyla bu örnekleri değiştirmezler.
Programlama deneyiminiz kısıtlıysa, bir Microsoft Sertifikalı İş Ortağı'na veya Microsoft Danışmanlık Hizmetleri'ne başvurabilirsiniz. Daha fazla bilgi için şu Microsoft Web sitelerini ziyaret edin:

Microsoft Partner - https://partner.microsoft.com/global/30000104 Onaylandı

Microsoft danışma belgesi Hizmetleri - http://support.microsoft.com/gp/advisoryservice

Kullanılabilir destek seçenekleri ve Microsoft'a başvurma konusunda daha fazla bilgi için aşağıdaki Microsoft Web sitesini ziyaret edin: http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMSMakro oluşturmak için <a0></a0>:
  1. Araçlar menüsünden, makro ' nun üzerine gelin ve makrolar ' ı tıklatın.
  2. Makro adı kutusunda, SetAllContactsToJournal yazın ve sonra Oluştur ' u tıklatın. Visual Basic Düzenleyicisi'ni başlatır ve bir alt yordam otomatik olarak oluşturur.
  3. Kod aşağıdaki satırları yazın:
    Sub SetAllContactsToJournal()   Dim objContactsFolder As Outlook.MAPIFolder   Dim objContacts As Outlook.Items   Dim objContact As Object   Dim iCount As Integer   ' Specify which contact folder to work with   Set objContactsFolder = Session.GetDefaultFolder(olFolderContacts)   Set objContacts = objContactsFolder.Items   iCount = 0   ' Process the changes   For Each objContact In objContacts      If TypeName(objContact) = "ContactItem" Then         If objContact.Journal = False Then            objContact.Journal = True            objContact.Save            iCount = iCount + 1         End If      End If   Next      MsgBox "Number of contacts updated:" & Str$(iCount)   ' Clean up   Set objContact = Nothing   Set objContacts = Nothing   Set objContactsFolder = NothingEnd Sub					
  4. Dosya menüsünde Kapat ve Microsoft Outlook'a dön'ı tıklatın.
Makroyu kullanmak için <a0></a0>:
  1. Araçlar menüsünden, makro ' nun üzerine gelin ve makrolar ' ı tıklatın.
  2. SetAllContactsToJournal ' ı tıklatın ve sonra da <a2>Çalıştır</a2>'ı tıklatın.
Güncelleştirildi, ilgili kişilerin sayısını belirten BIR pencere görünür.

NOTLAR

  • Kişiler klasörünüzdeki öğeleri işlemek için biraz zaman alabilir.
  • Kişilerinizi güncelleştirildiğinde, işaretçinizi bir kum saati için değişmez.
  • Bu sık sık kullanıyorsanız, makro için bir düğme atayabilirsiniz.Bu makroyu bir araç çubuğu düğmesine atama hakkında daha fazla bilgi için Microsoft Knowledge Base'deki makaleyi görüntülemek üzere aşağıdaki makale numarasını tıklatın:
    252426OL2000: nasıl bir araç çubuğu düğmesine makro atama
  • Örnek kod, yalnızca varsayılan Kişiler klasörü ile çalışır. Herhangi bir Kişiler klasörü çalışmasını istiyorsanız, <a1>Kod</a1>
    Set objContactsFolder = Session.GetDefaultFolder(olFolderContacts)						
    ve değiştirmeniz:
    Set objContactsFolder = Outlook.ActiveExplorer.CurrentFolder					
  • Programlama ile bilgi sahibiyseniz ve farklı bir konumda bir belirli kişiler klasörünü kullanmak istiyorsanız, Microsoft Knowledge Base'de aşağıdaki makaleye bakın:
208520OL2000: Başvuru öğeler ve klasörler programlama örnekleri
Referanslar
Kullanılabilen kaynaklar ve Microsoft Outlook çözümleri ile sık sorulan sorular answersto hakkında ek bilgi için Microsoft Knowledge Base'deki makaleyi görüntülemek üzere aşağıdaki makale numarasını tıklatın:
146636OL2000: Özel formlar ve Outlook çözümleri sorular
OutSol OutSol2000 OL2K

Warning: This article has been translated automatically

Özellikler

Makale No: 252947 - Son İnceleme: 02/13/2014 10:10:30 - Düzeltme: 3.2

  • Microsoft Outlook 2000
  • kbnosurvey kbarchive kbmt kbhowto KB252947 KbMttr
Geri bildirim