Cookie giúp chúng tôi cung cấp dịch vụ của chúng tôi. Bằng cách sử dụng dịch vụ của chúng tôi, bạn đồng ý sử dụng cookie.
Mẹo: Các ngôn ngữ khác được Dịch bởi Google. Bạn có thể ghé thăm English phiên bản của liên kết này.
Đăng nhập
x
or
x
x
Ghi danh
x

or

Làm thế nào để mở thư mục Outlook cụ thể từ Excel?

Bạn đã bao giờ thử mở một thư mục Outlook cụ thể từ tệp Excel, chẳng hạn như mở thư mục Hộp thư đến, Thư mục danh bạ hoặc bất kỳ thư mục nào khác? Bài viết này, tôi sẽ nói về cách mở một thư mục Outlook mong muốn từ sổ làm việc Excel?

Mở thư mục Outlook cụ thể từ tệp Excel bằng mã VBA


Mở thư mục Outlook cụ thể từ tệp Excel bằng mã VBA

Mã VBA sau đây có thể giúp bạn mở một thư mục Outlook cụ thể từ trang tính Excel, hãy làm như sau:

1. Trong Excel, giữ ALT + F11 phím để mở Microsoft Visual Basic cho các ứng dụng cửa sổ.

2. Nhấp chuột Chèn > Mô-đun, và dán macro sau vào Cửa sổ mô-đun.

Mã VBA: Mở một thư mục Outlook cụ thể từ tệp Excel:

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

chú thích: Trong đoạn mã trên, bạn có thể thay đổi Hộp thư đến trong Đặt xFolder = xNameSpace.GetDefaultFolder (olFolderInbox) tập lệnh vào bất kỳ tên thư mục nào khác mà bạn muốn mở.

3. Sau đó nhấn vào Công cụ > dự án trong Microsoft Visual Basic cho các ứng dụng cửa sổ, trong popped ra Tài liệu tham khảo-Project1 hộp thoại, kiểm tra Thư viện đối tượng Microsoft Outlook tùy chọn từ Tài liệu tham khảo có sẵn hộp danh sách, xem ảnh chụp màn hình:

doc mở thư mục outlook 1

4. Và sau đó, nhấp vào OK để đóng hộp thoại và nhấn F5 để chạy mã này và thư mục Outlook được chỉ định sẽ được mở ngay lập tức.



Các công cụ sản xuất được đề nghị

Tab Office

sao vàng1 Mang các tab tiện dụng vào Excel và các phần mềm Office khác, giống như Chrome, Firefox và Internet Explorer mới.

Kutools cho Excel

sao vàng1 Kinh ngạc! Tăng năng suất của bạn trong 5 phút. Không cần bất kỳ kỹ năng đặc biệt, tiết kiệm được hai giờ mỗi ngày!

sao vàng1 300 Các tính năng mới cho Excel, Làm cho Excel dễ dàng và mạnh mẽ:

  • Hợp nhất ô / Hàng / Cột mà không mất dữ liệu.
  • Kết hợp và Hợp nhất nhiều trang tính và Workbooks.
  • So sánh các dãy, sao chép nhiều dãy, chuyển đổi văn bản sang ngày, đơn vị và chuyển đổi tiền tệ.
  • Đếm theo màu sắc, Paging Subtotals, sắp xếp nâng cao và Super Filter,
  • Thêm / Chèn / Xóa / Văn bản / Định dạng / Liên kết / Nhận xét / Tập tin / Workheets Công cụ ...

Ảnh chụp màn hình của Kutools cho 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.