Cookies bizim xidmətlər təqdim kömək edir. Bizim xidmətlərimizdən istifadə edərək, siz cookies bizim istifadə razıyam.
İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Excel-dən xüsusi Outlook qovluğunu necə açmaq olar?

Gələnlər qovluğunu, Kontaktlar qovunu və ya digər qovluğu açmaq kimi Excel faylından müəyyən bir Outlook qovluğunu açmağa cəhd etdiniz mi? Bu yazı, Excel iş kitabından istənilən Outlook qovluğunu necə açmaq barədə danışacağam?

Excel faylından VBA kodu ilə xüsusi Outlook qovluğunu açın


Excel faylından VBA kodu ilə xüsusi Outlook qovluğunu açın

Aşağıdakı VBA kodu, Excel iş kitabından müəyyən bir Outlook qovluğu açmanıza kömək edə bilər, belə edin:

1. Excel-də, basıb saxlayın ALT + F11 düymələri açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. Basın Taxmaq > Modules, və aşağıdakı makroyu yapışdırın Modul Pəncərəsi.

VBA kodu: Excel faylından müəyyən bir Outlook qovluğu açın:

Sub OpenOutlookFolder()
    Dim xOutlookApp As Outlook.Application
    Dim xNameSpace As Outlook.Namespace
    Dim xFolder As Outlook.Folder
    Dim xFolderType As OlDefaultFolders
    On Error Resume Next
    Set xOutlookApp = New Outlook.Application
    Set xNameSpace = xOutlookApp.Session
    Set xFolder = xNameSpace.GetDefaultFolder(olFolderInbox)
    xFolder.Display
    Set xFolder = Nothing
    Set xNameSpace = Nothing
    Set xOutlookApp = Nothing
    Exit Sub
End Sub

Qeyd: Yuxarıda göstərilən kodu dəyişə bilərsiniz Gələnlər ci Set xFolder = xNameSpace.GetDefaultFolder (olFolderInbox) açmaq istədiyiniz hər hansı digər qovluq adına skript.

3. Sonra basın Tools > References ci Proqramlar üçün Microsoft Visual Basic Pəncərədən çıxdı References-Project1 informasiya qutusunu yoxlayın Microsoft Outlook Nesne Kitabxanası seçimdən Mövcud References siyahı qutusuna bax:

doc açıq 1 qovluq qovluğu

4. Və sonra basın OK dialoq qutusunu bağlamaq və basın F5 bu kodu çalıştırmak üçün düyməsini basın və müəyyən Outlook qovluğu dərhal açılacaq.



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.