Slapukai padeda mums pristatyti mūsų paslaugomis. Naudodamiesi mūsų paslaugomis, jūs sutinkate su mūsų slapukų naudojimą.
Patarimas: kitos kalbos yra "Google" išverstos. Galite aplankyti English šios nuorodos versija.
Prisijungti
x
or
x
x
Registruotis
x

or

Kaip atidaryti tam tikrą "Outlook" aplanką iš "Excel"?

Ar kada nors bandėte atidaryti tam tikrą "Outlook" aplanką iš "Excel" failo, pvz., Atidaryti aplanką "Gautieji", aplanką "Kontaktai" ar bet kurį kitą aplanką? Šiame straipsnyje aptarsiu kaip atidaryti norimą "Outlook" aplanką iš "Excel" darbaknygės?

Atidarykite konkretų "Outlook" aplanką iš "Excel" failo su VBA kodu


Atidarykite konkretų "Outlook" aplanką iš "Excel" failo su VBA kodu

Šis VBA kodas gali padėti atidaryti tam tikrą "Outlook" aplanką iš "Excel" darbalapio, prašau, atlikite šiuos veiksmus:

1. "Excel" laikykite nuspaudę ALT + F11 raktus atidaryti "Microsoft Visual Basic for Applications" langas.

2, Spauskite įsiuvas > Moduliaiir įklijuokite toliau nurodytą makrokomandą Modulio langas.

VBA kodas: atidarykite specialų "Outlook" aplanką iš "Excel" failo:

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

pastabos: Pirmiau nurodytu kodu galite pakeisti pašto dėžutę viduje Nustatyti xFolder = xNameSpace.GetDefaultFolder (olFolderInbox) scenarijų į bet kurį kitą aplanko pavadinimą, kurį norite atidaryti.

3. Tada spustelėkite Įrankiai > Nuorodos viduje "Microsoft Visual Basic for Applications" langas, iššokęs langas Nuorodos-Project1 dialogo lange patikrinkite Microsoft Outlook Objektų biblioteka pasirinkimas iš Galimos nuorodos sąrašo langelis, žr. ekrano kopiją:

doc atidaryti Outlook aplanką 1

4. Ir tada spustelėkite OK uždaryti dialogo langą ir paspauskite F5 raktas paleisti šį kodą ir nurodytas "Outlook" aplankas bus nedelsiant atidarytas.



Rekomenduojami įrankiai našumui

Office Tab

aukso žvaigždutė1 Pateikite patogius skirtukus "Excel" ir kitai "Office" programinei įrangai, kaip ir "Chrome", "Firefox" ir "Internet Explorer".

Kutools for Excel

aukso žvaigždutė1 Nuostabi! Padidinkite savo našumą per 5 min. Nereikia jokių specialių įgūdžių, išskyrus dvi valandas kiekvieną dieną!

aukso žvaigždutė1 "300" naujos funkcijos "Excel", "Excel" daug lengvumo ir galingumo:

  • Sujungti elementus / eilutes / stulpelius neprarandant duomenų.
  • Suderinkite ir susinenkite kelis lapus ir darbaknygius.
  • Palyginkite diapazonus, nukopijuokite keletą diapazonų, konvertuokite tekstą į datą, vienetą ir valiutos konvertavimą.
  • Skaičiuojamas pagal spalvas, tarpinių pranešimų vidurkis, išplėstinis rūšiavimas ir super filtras,
  • Daugiau Pasirinkite / Įterpti / Ištrinti / Tekstas / Formatas / Nuoroda / Komentaras / Darbaknygiai / Užduotys Įrankiai ...

Kutools ekrano kopija Excel

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.