Hướng dẫn cách đơn giản quét dữ liệu web với VBA

Quét dữ liệu là gì ?

Quét dữ liệu là kỹ thuật giúp trích xuất thông tin mong ước từ website HTML sang tệp cục bộ có trong máy cục bộ của bạn. Thông thường, một tệp cục bộ hoàn toàn có thể tương ứng với một tệp excel, tệp từ hoặc để nói bất kể ứng dụng văn phòng nào của Microsoft. Nó giúp trong việc truyền thông tin quan trọng từ website .
Việc thu thập dữ liệu trở nên đơn thuần khi thao tác trên một dự án Bất Động Sản dựa trên nghiên cứu và điều tra hàng ngày và một dự án Bất Động Sản như vậy trọn vẹn nhờ vào vào internet và website. Để minh họa rõ hơn về chủ đề này, tất cả chúng ta hãy lấy ví dụ về một nhà thanh toán giao dịch hàng ngày chạy macro excel để kéo thông tin thị trường từ một website kinh tế tài chính vào một bảng excel bằng VBA .

Làm cách nào để sẵn sàng chuẩn bị Excel Macro trước khi thực thi Quét dữ liệu bằng Internet explorer ?

Có một số ít điều kiện kèm theo nhất định phải được triển khai trên tệp macro excel trước khi đi vào quy trình giải quyết và xử lý dữ liệu trong excel .

Những điều kiện như sau: –

Bước 1) Mở Macro trên Excel và truy cập tùy chọn nhà phát triển của excel.

Bước 2) Chọn tùy chọn Visual Basic trên thanh công cụ Nhà phát triển.

Bước 3) Chèn một mô-đun mới.

Bước 4) Khởi tạo chương trình con mới

 Sub test()
 End sub 

Các mô-đun sẽ có tác dụng như sau : –

Bước 5) Truy cập tùy chọn tham chiếu trong tab công cụ và tham khảo Thư viện đối tượng Microsoft HTML và kiểm soát internet của Microsoft.

Các tệp sau đây sẽ được tham chiếu đến mô-đun vì nó giúp mở trình duyệt internet và tạo điều kiện kèm theo tăng trưởng ngữ cảnh macro .
Bây giờ tệp Excel đã sẵn sàng chuẩn bị để tương tác với trình duyệt internet explorer. Bước tiếp theo sẽ là tích hợp những tập lệnh macro sẽ để quét dữ liệu trong HTML .

Làm cách nào để mở Internet Explorer bằng Excel VBA ?

Bước 1) Khởi tạo biến trong chương trình con như hiển thị bên dưới

 Sub test() 
Dim ie As New InternetExplorer  
Dim doc As New HTMLDocument 

Bước 2) Để mở trình duyệt Internet Explorer bằng VBA, hãy viết  i.e. visible=true và nhấn F5.

 Sub test() Dim ie As New InternetExplorer  Dim doc As New HTMLDocument Ie.visible=true 

Các mô-đun sẽ như sau : –

Làm thế nào để mở website trong Internet explorer bằng VBA ?

Dưới đây là những bước để mở website trong trình duyệt Internet bằng VBA

Bước 1) Khi bạn truy cập trình duyệt Internet Explorer bằng Excel VBA, bước tiếp theo sẽ kết hợp truy cập trang web bằng VBA. Điều này được hỗ trợ bởi Điều hướng thuộc tính, trong đó URL phải ở dưới dạng dấu ngoặc kép trong thuộc tính. Thực hiện theo các bước sau như hiển thị dưới đây.

 Sub test()
 Dim, ie As New InternetExplorer 
 Dim doc As New HTMLDocument
 Dim ecoll As Object ie.Visible = True  ie.navigate"http://demo.guru99.com/test/web-table-element.php" 
Do 
DoEvents 
Loop Until ie.readyState = READYSTATE_COMPLETE 

Bước 2) – Nhấn F5 để chạy macro. Trang web sau sẽ được mở như hiển thị sau

Bây giờ, macro excel đã chuẩn bị sẵn sàng để triển khai những công dụng lọc. Bước tiếp theo sẽ hiển thị cách trích xuất thông tin từ trình thám hiểm internet bằng VBA .

Làm thế nào để vô hiệu thông tin từ website bằng VBA ?

Giả sử người thanh toán giao dịch mỗi ngày muốn truy vấn dữ liệu từ website hàng ngày. Mỗi lần người thanh toán giao dịch nhấn nút bấm, nó sẽ tự động hóa kéo dữ liệu vào excel .
Từ website trên, cần phải kiểm tra dữ liệu và cách dữ liệu được cấu trúc .

Bước 1) Truy cập mã nguồn HTML bên dưới bằng cách nhấn control + Shift + I

 
Company
 
Group
 
Pre Close (Rs)
Current Price (Rs)
% Change
 
 

Mã nguồn sẽ như sau : –

 Sub test() 
 Dim ie As New InternetExplorer
 Dim doc As New HTMLDocument 
 Dim ecoll As Object 
 ie.Visible = True
 ie.navigate "http://demo.guru99.com/test/web-table-element.php"
 Do
 DoEvents 
 Loop Until ie.readyState = READYSTATE_COMPLETE 
 Set doc = ie.document 

Như hoàn toàn có thể thấy rằng dữ liệu được cấu trúc như một Bảng HTML duy nhất. Do đó, để lấy hàng loạt dữ liệu từ bảng html, nó sẽ nhu yếu phong cách thiết kế macro thu thập dữ liệu dưới dạng một bộ tài liệu

Bộ sưu tập sau đó sẽ được dán vào excel. Để đạt được, kết quả mong muốn thực hiện các bước dưới đây:

Bước 2) Khởi tạo tài liệu Html trong chương trình con

Mô-đun VBA sẽ trông như sau : –

Bước 3) Khởi tạo bộ tài liệu có trong tài liệu HTML

Mô-đun VBA sẽ trông như sau : –

 Sub test() 
Dim ie As New InternetExplorer 
Dim doc As New HTMLDocument 
Dim ecoll As Object 
ie.Visible = True 
ie.navigate "http://demo.guru99.com/test/web-table-element.php" 
Do 
DoEvents 
Loop Until ie.readyState = READYSTATE_COMPLETE 
Set doc = ie.document 
Set ecoll = doc.getElementsByTagName("table") 

Bước 4) Khởi tạo các ô excel với sự trợ giúp của vòng lặp lồng nhau

Mô-đun VBA sẽ trông như sau : –

 Sub test()
 Dim ie As New InternetExplorer 
Dim doc As New HTMLDocument 
Dim ecoll As Object 
ie.Visible = True 
ie.navigate "http://demo.guru99.com/test/web-table-element.php" 
Do 
DoEvents 
Loop Until ie.readyState = READYSTATE_COMPLETE 
Set doc = ie.document 
Set ecoll = doc.getElementsByTagName("table") 

Excel hoàn toàn có thể được khởi tạo trong khoanh vùng phạm vi của trang excel hoặc trải qua thuộc tính ô của trang excel. Để giảm độ phức tạp của tập lệnh VBA, dữ liệu tích lũy được tạo thành thuộc tính ô của sheet 1 .
Khi tập lệnh macro đã sẵn sàng chuẩn bị, chuyển và gán chương trình con cho excel và thoát khỏi mô-đun của VBA. đặt tên mới cho nó. Như ví dụ sau

Bước 5) Nhấn nút refresh để xuất dữ liệu

Bước 6) So sánh kết quả trong excel với kết quả của trình duyệt internet explorer

Tóm lược :

• Việc lọc dữ liệu cho phép người dùng chỉ loại bỏ thông tin mà người dùng muốn.
• Lọc có thể được thực hiện bằng cách sử dụng internet explorer.
• Quá trình lọc chậm hơn internet explorer, tuy nhiên, nó mang lại kết quả mong muốn cho người dùng.
• Việc lọc phải được thực hiện một cách cẩn thận và thận trọng tuyệt đối vì nó có thể gây hại và làm hỏng hệ thống đang được sử dụng để lọc.

Để tìm hiểu thêm nhiều kiến thức về VBA, mời bạn tham dự khóa học VBAG01 – Tuyệt đỉnh VBA – Viết code trong tầm tay Đây là khóa học rất hữu ích dành cho bạn, giúp bạn hiểu một cách bài bản về VBA và cách sử dụng VBA, ứng dụng VBA vào công việc để tăng hiệu quả. Hãy cùng khám phá nào:

Đánh giá bài viết này

Source: https://thomaygiat.com
Category : Kỹ Thuật Số