Loại nội dung excel

Excel là một công cụ mạnh mẽ và phổ biến nhất để phân tích dữ liệu. Yêu cầu HTTP trong VBA cung cấp khả năng bổ sung cho Excel. Đối tượng XmlHttpRequest được sử dụng để thực hiện các yêu cầu HTTP trong VBA. Yêu cầu HTTP có thể được sử dụng để tương tác với dịch vụ web, API hoặc thậm chí các trang web. Hãy hiểu cách thức hoạt động của nó

Show

Loại nội dung excel

Mở tệp excel và mở trình soạn thảo VBA (Alt + f11) > mô-đun mới và bắt đầu viết mã trong phụ

Public sub XmlHttpTutorial

End Sub

Xác định XMLHttpRequest

Xác định ứng dụng khách http bằng mã sau

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")

Nếu bạn cần tính năng tự động hoàn thành Intellisense của VBA thì hãy làm theo cách này

Đầu tiên, Thêm tham chiếu đến MSXML (Công cụ > tham chiếu)

Chọn phiên bản phù hợp dựa trên PC của bạn.
1. Microsoft XML, phiên bản 3. 0.
2. Microsoft XML, phiên bản 4. 0 (nếu bạn đã cài đặt MSXML 4. 0 riêng biệt).
3. Microsoft XML, phiên bản 5. 0 (nếu bạn đã cài đặt Office 2003 – 2007 cung cấp MSXML 5. 0 cho các ứng dụng Microsoft Office).
4. Microsoft XML, phiên bản 6. 0 cho các phiên bản mới nhất của MS Office.

Sau đó xác định ứng dụng khách http

Dim xmlhttp As New MSXML2.XMLHTTP
'Dim xmlhttp As New MSXML2.XMLHTTP60 for Microsoft XML, v 6.0 

VBA Intellisense sẽ hiển thị cho bạn đúng khi bạn bắt đầu nhập

Thực hiện các yêu cầu

Yêu cầu có thể được thực hiện bằng phương pháp mở và gửi. Cú pháp phương thức mở như sau

xmlhttp.Open Method, URL, async(true or false)

Tôi đang sử dụng requestBin để kiểm tra các yêu cầu. Tạo một thùng ở đó và gửi yêu cầu tới URL đó để kiểm tra yêu cầu

Một yêu cầu GET đơn giản sẽ là

Dim xmlhttp As New MSXML2.XMLHTTP60, myurl As String
myurl = "http://requestb.in/15oxrjh1" //replace with your URL
xmlhttp.Open "GET", myurl, False
xmlhttp.Send
MsgBox(xmlhttp.responseText)

Chạy mã này, một hộp thông báo được hiển thị với phản hồi của yêu cầu

tiêu đề yêu cầu

Tiêu đề yêu cầu có thể được đặt bằng phương thức setRequestHeader. ví dụ

xmlhttp.setRequestHeader "Content-Type", "text/json"
xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xmlhttp.setRequestHeader "User-Agent", "Mozilla/5.0 (iPad; U; CPU OS 3_2_1 like Mac OS X; en-us) AppleWebKit/531.21.10 (KHTML, like Gecko) Mobile/7B405"
xmlhttp.setRequestHeader "Authorization", AuthCredentials

Yêu cầu POST đơn giản để gửi formdata

Các yêu cầu POST được sử dụng để gửi một số dữ liệu, dữ liệu có thể được gửi theo phương thức

xmlhttp.Open Method, URL, async(true or false)
2. Một yêu cầu POST đơn giản để gửi dữ liệu biểu mẫu

Public Sub httpclient()
Dim xmlhttp As New MSXML2.XMLHTTP, myurl As String
myurl = "http://requestb.in/15oxrjh1"
xmlhttp.Open "POST", myurl, False
xmlhttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
xmlhttp.Send "name=codingislove&[email protected]"
MsgBox (xmlhttp.responseText)
End Sub

Xác thực cơ bản trong VBA

Khi chúng tôi cần truy cập các dịch vụ web bằng xác thực cơ bản, Tên người dùng và mật khẩu phải được gửi cùng với tiêu đề Ủy quyền. Tên người dùng và mật khẩu cũng phải được mã hóa base64. Thí dụ

user = "someusername"
password = "somepassword"
xmlhttp.setRequestHeader "Authorization", "Basic " + Base64Encode(user + ":" + password)

Đây là một dán hàm tiện ích giúp mã hóa chuỗi thành Base64

Trường hợp sử dụng thực tế

Các trường hợp sử dụng thực tế của các yêu cầu http trong VBA là không giới hạn. Một số trong số họ đang lấy dữ liệu từ API tài chính của Yahoo, API thời tiết, lấy đơn đặt hàng từ bảng quản trị cửa hàng Thương mại điện tử, tải sản phẩm lên, truy xuất dữ liệu biểu mẫu web sang excel, v.v.

Đọc. Phân tích cú pháp HTML trong Excel VBA – Tìm hiểu bằng cách phân tích cú pháp trang chủ tin tức của hacker nơi tôi truy xuất một trang web bằng cách sử dụng yêu cầu HTTP GET và phân tích cú pháp HTML của nó để lấy dữ liệu từ một trang web

Đọc Cách xây dựng ứng dụng thời tiết đơn giản trong Excel VBA nơi tôi tạo HTTP Nhận yêu cầu tới API thời tiết

Đọc JSON Api trong Excel VBA nơi tôi gọi JSON Apis bằng các yêu cầu HTTP GET và POST

Nếu bạn có câu hỏi hoặc phản hồi, hãy bình luận bên dưới

Nhận thông báo khi có bài đăng mới bằng cách nhấp vào

Loại nội dung excel
ở dưới cùng bên trái

Cần giúp đỡ?

Để trống trường này nếu bạn là người.

  • Tác giả
  • Bài viết gần đây

Loại nội dung excel

rajith kumar

Một CA- do giáo dục, lập trình viên tự học bằng niềm đam mê, thích khám phá các công nghệ mới và tin tưởng vào việc học bằng cách làm

Hãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuậtChi tiết tài sảnHãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuậtnội dungTypeHãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuậtNgày thành lậpHãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuậtHãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuậtđã giải quyếtTrạng thái chủ đề nhận xét. Giá trị của nội dung. string;4 có nghĩa là chủ đề nhận xét đã giải quyếtđã giải quyếtTrạng thái chủ đề nhận xét. Giá trị của nội dung. string;4 có nghĩa là chủ đề nhận xét đã giải quyếtTrạng thái chủ đề nhận xét. Giá trị của nội dung. string;4 có nghĩa là chủ đề nhận xét đã giải quyếtđã giải quyếtNội dung phong phúTrạng thái chủ đề nhận xét. Giá trị của nội dung. string;4 có nghĩa là chủ đề nhận xét đã giải quyếtNội dung phong phúNội dung phong phúNội dung phong phúNội dung phong phúđã giải quyết

Nội dung chính Hiển thị Hiển thị

  • trong bài viết này
  • Chi tiết tài sản
  • nội dungType
  • Ngày thành lập
  • Nội dung phong phú
  • Chi tiết phương pháp
  • getLocation()
  • tải (tùy chọn)
  • tải (tên thuộc tính)
  • tải (propertyNamesAndPaths)
  • thiết lập (thuộc tính, tùy chọn)
  • đặt (thuộc tính)
  • cập nhậtMentions(contentWithMentions)
  • phản hồi

Nội dung chính

  • trong bài viết này
  • Chi tiết tài sản
  • nội dungType
  • nội dungType
  • Ngày thành lập
  • Nội dung phong phú
  • Chi tiết phương pháp
  • getLocation()
  • tải (tùy chọn)
  • tải (tên thuộc tính)
  • tải (propertyNamesAndPaths)
  • thiết lập (thuộc tính, tùy chọn)
  • đặt (thuộc tính)
  • cập nhậtMentions(contentWithMentions)
  • phản hồi

Nội dung chính

Nội dung chính

  • tên tác giả
  • trong bài viết này
  • Chi tiết tài sản
  • phản hồi
  • nội dungType
  • nội dungType
  • Ngày thành lập
  • Nội dung phong phú
  • Chi tiết phương pháp
  • getLocation()
  • tải (tùy chọn)
  • tải (tên thuộc tính)
  • tải (propertyNamesAndPaths)
  • thiết lập (thuộc tính, tùy chọn)
  • đặt (thuộc tính)
  • cập nhậtMentions(contentWithMentions)
  • phản hồi

Nội dung chính

  • tên tác giả

phản hồi

trong bài viết này

Trình duyệt này không còn được hỗ trợ nữa

Excel. Lớp nhận xét

tác giảEmail

Hãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuật

Tài liệu tham khảo

Đại diện cho một nhận xét trong sổ làm việc

kéo dài

Nhận xét

[ Bộ API. ExcelApi 1. 10 ]

Đặc tính

tác giảEmail

Nhận email của tác giả bình luận

tên tác giả

Lấy tên của tác giả bình luận

Nội dung

Nội dung bình luận. Chuỗi là văn bản thuần túy

nội dungType

Nhận loại nội dung của bình luận

định nghĩa bài văn

Bối cảnh yêu cầu được liên kết với đối tượng. Điều này kết nối quy trình bổ trợ với quy trình ứng dụng máy chủ Office

Ngày thành lập

Nhận thời gian tạo bình luận. trả lại

content: string;
3 nếu bình luận được chuyển đổi từ một ghi chú, vì bình luận không có ngày tạo

Tôi

Chỉ định định danh nhận xét

đề cập

Lấy các thực thể (e. g. , mọi người) được đề cập trong nhận xét

trả lời

Đại diện cho một tập hợp các đối tượng trả lời được liên kết với nhận xét

giải quyết

Trạng thái chủ đề bình luận. Giá trị của
content: string;
4 có nghĩa là chuỗi nhận xét đã được giải quyết

Nội dung phong phú

Nhận nội dung bình luận phong phú (e. g. , đề cập trong phần bình luận). Chuỗi này không có nghĩa là được hiển thị cho người dùng cuối. Phần bổ trợ của bạn chỉ nên sử dụng phần bổ trợ này để phân tích nội dung nhận xét phong phú

phương pháp

xóa bỏ()

phương pháp

xóa bỏ()

phương pháp

xóa bỏ()

Xóa nhận xét và tất cả các câu trả lời được kết nối

getLocation()

Lấy ô chứa nhận xét này

tải (tùy chọn)

Xếp hàng một lệnh để tải các thuộc tính đã chỉ định của đối tượng. bạn phải gọi

content: string;
5 trước khi đọc thuộc tính. tải (tên thuộc tính)

tải (propertyNamesAndPaths)

Chi tiết tài sản

Đại diện cho một nhận xét trong sổ làm việc

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
1

kéo dài

Excel. Lớp nhận xét

tác giảEmail

Nhận xét

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
2

kéo dài

Excel. Lớp nhận xét

tác giảEmail

Hãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuật

Đặc tính

________số 8

kéo dài

Excel. Lớp nhận xét

tác giảEmail

Hãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuật

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
4

nội dungType

Nhận email của tác giả bình luận

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
5

kéo dài

Excel. Lớp nhận xét

tác giảEmail

Hãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuật

Lấy tên của tác giả bình luận

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
6

kéo dài

Ngày thành lập

Nội dung bình luận. Chuỗi là văn bản thuần túy

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
7

kéo dài

Excel. Lớp nhận xét

tác giảEmail

Hãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuật

Tài liệu tham khảo

Bối cảnh yêu cầu được liên kết với đối tượng. Điều này kết nối quy trình bổ trợ với quy trình ứng dụng máy chủ Office

content: string;
0

kéo dài

Excel. Lớp nhận xét

tác giảEmail

Hãy nâng cấp lên Microsoft Edge để tận dụng các tính năng mới nhất, bản cập nhật cập nhật bảo mật và hỗ trợ kỹ thuật

Nhận thời gian tạo bình luận. trả lại

content: string;
3 nếu bình luận được chuyển đổi từ một ghi chú, vì bình luận không có ngày tạo.
content: string;
2

Giá trị tài sản

Nhận xét

[Bộ API. Excelapi 1. 10]

đã giải quyết

Trạng thái chủ đề nhận xét. value of

content: string;
4 có nghĩa là chủ đề nhận xét được giải quyết.
content: string;
4

Giá trị tài sản

Nhận xét

[Bộ API. Excelapi 1. 10]

đã giải quyết

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
20

Trạng thái chủ đề nhận xét. Giá trị của nội dung. string;4 có nghĩa là chủ đề nhận xét đã giải quyết

[Bộ API. Excelapi 1. 11]

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
21

Giá trị tài sản

Nhận xét

[Bộ API. Excelapi 1. 10]

đã giải quyết

Trạng thái chủ đề nhận xét. Giá trị của nội dung. string;4 có nghĩa là chủ đề nhận xét đã giải quyết

[Bộ API. Excelapi 1. 11]

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
22

Ví dụ

Nhận xét

[Bộ API. Excelapi 1. 10]

đã giải quyết

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
23

Trạng thái chủ đề nhận xét. Giá trị của nội dung. string;4 có nghĩa là chủ đề nhận xét đã giải quyết

[Bộ API. Excelapi 1. 11]

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
24

Ví dụ

Nhận xét

[Bộ API. Excelapi 1. 10]

đã giải quyết

Trạng thái chủ đề nhận xét. value of

content: string;
4 có nghĩa là chủ đề nhận xét được giải quyết.
Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
25

[Bộ API. Excelapi 1. 11]

Ví dụ

Nội dung phong phú

Trạng thái chủ đề nhận xét. value of

content: string;
4 có nghĩa là chủ đề nhận xét được giải quyết

Dim xmlhttp as object
Set xmlhttp = CreateObject("MSXML2.serverXMLHTTP")
26

[Bộ API. Excelapi 1. 11]

Ví dụ

Nội dung phong phú

Nhận nội dung nhận xét phong phú (ví dụ. đề cập nhật trong các bình luận). This string has no mean is being display for the end of user. Phần bổ trợ của bạn chỉ nên sử dụng điều này để phân tích nội dung nhận xét phong phú