Cách lấy dữ liệu từ Google Sheet vào Excel bằng VBA

Microsoft Excel và Google Sheets – công cụ hỗ trợ xử lý và phân tích dữ liệu trở nên không còn xa lạ với người đi làm hiện đại ngày nay. Đôi khi, người dùng đang quen với việc sử dụng Google Sheet trực tuyến nhanh chóng và tiện lợi. Nhưng trong một số trường hợp, cần trích xuất dữ liệu từ Google Sheet sang Excel với nhiều mục đích khác nhau. Trong bài viết này, UniTrain sẽ hướng dẫn bạn 3 bước để nhập dữ liệu từ Google Sheets sang Excel bằng mã VBA.

Hãy cùng thực hiện một ví dụ thao tác lấy dữ liệu từ Google Sheet vào Excel. Giả sử, người dùng có tệp Importing Data to Excel (như hình dưới). Tập dữ liệu gồm Sales Rep, Product Name, UnitSales trong các cột B, C, D và E.

import data from google sheets to excel vba

Bước 1: Thay đổi quyền riêng tư của Google Sheet

1. Nhấn vào nút Share ở góc trên bên phải màn hình.

Change Privacy of Google Sheets

2. Hộp thoại Share “Importing Data to Excel” sẽ hiển thị, nhấp vào mũi tên thả xuống trong phần General access > chọn Anyone with the link > Done. 

Making the Google Sheets Accessible for everyone

Bước 2: Chèn mã VBA để nhập dữ liệu vào Excel

1. Mở sổ làm việc mới trên Excel.

2. Chọn tab Developer trên thanh công cụ.

3. Chọn Visual Basic trong nhóm Code.

Insert VBA Code to Import Data to Excel

4. Cửa sổ Microsoft Visual Basic for Applications sẽ hiển thị, chọn Insert > Module.

Inserting Code Module

5. Sau đó, chúng sẽ tạo ra một module mã để nhập dữ liệu từ Google Sheet sang Excel. Hãy nhập mã dưới đây:

Sub Import_Sheets_to_Excel()
Dim QRT As QueryTable, ul As String, ky As String
If ActiveSheet.QueryTables.Count > 0 Then ActiveSheet.QueryTables(1).Delete
ActiveSheet.Cells.Clear
ky = "1slumgR5et-cG7Er-9udweCSthufb7xYdsmoP9H2AOFs"
ul = "https://spreadsheets.google.com/tq?tqx=out:html&key=" & ky
Set QRT = ActiveSheet.QueryTables.Add(Connection:="URL;" & ul, _
Destination:=Range("$A$4"))
With QRT
.WebSelectionType = xlAllTables
.WebFormatting = xlWebFormattingNone
.Refresh
End With
End Sub

VBA Code to import data from google sheets to excel

6. Chạy mã bằng cách nhấp vào nút phát màu xanh lục (như hình dưới).

Run the VBA Code to import data from google sheets to excel

7. Quay lại Sheet1, bạn sẽ thấy Excel đang lấy dữ liệu từ một nguồn bên ngoài.

Getting Data from Google Sheets to Excel

Và cuối cùng, kết quả sẽ hiển thị như hình dưới:

Extracted Data from Google Sheets

Bước 3: Chỉnh sửa định dạng tập dữ liệu 

Bạn sẽ thấy dữ liệu được nhập từ Google Sheet không có bất kỳ loại định dạng nào. Do đó, người dùng sẽ thao tác các loại định dạng khác nhau để làm tập dữ liệu dễ nhìn hơn bằng cách:

1. Đặt tiêu đề tập dữ liệu trong ô B2. Chúng được định dạng ở Heading 2 Cell Style.

Apply Formatting to Dataset to Make It Engage

2. Chọn các ô trong phạm vi B4:E14.

3. Chọn Home trên thanh công cụ > chọn biểu tượng Middle AlignCenter trên nhóm lệnh Alignment.

Applying Center and Middle Alignment

4. Chèn kẻ viền All Borders. Kết quả sẽ hiển thị như hình dưới:

Applying All Borders to the dataset

5. Chọn các tiêu đề trong phạm vi B4:E4 và chèn Bold. Ngoài ra, bạn có thể thay đổi Fill Color (màu nền) và Font Color (màu phông chữ). Bảng dữ liệu mới sẽ hiển thị như hình dưới:

Apply Formatting to Imported data from Google Sheets to Excel to Make It Engage

Xem thêm

Khóa học Ứng dụng VBA trong Excel

[Tải tài liệu miễn phí] Template Update tỷ giá tự động bằng Power Query, Dashboard và VBA

Tổng hợp các thuật ngữ quan trọng trong VBA

Cách thêm, xóa, chặn nhận xét trong Excel VBA

 

Để lại một bình luận

Email của bạn sẽ không được hiển thị công khai. Các trường bắt buộc được đánh dấu *

1 + 1 = ? (Nhập Haii để trả lời đúng)

Bài viết liên quan
Phím tắt Excel giúp tiết kiệm 90% thời gian nhập liệu

Trong quá trình xử lý dữ liệu bằng Excel, việc sử dụng các phím tắt không chỉ giúp tối ưu tốc độ làm việc mà còn tăng tính chính xác. Bài

Xem thêm
Ứng dụng hàm TEXTJOIN nâng cao trong Excel

1. Giới thiệu hàm TEXTJOIN và IF  Hàm TEXTJOIN trong Excel giúp nối các giá trị từ một phạm vi hoặc danh sách các ô, sử dụng dấu phân cách tùy

Xem thêm
30 tháng Tư rực rỡ, 01 tháng Năm ưu đãi bất ngờ

Mừng 50 năm thống nhất Đất nước, UniTrain ưu đãi đến 2.500.000 VNĐ trên học phí gốc cho học viên đăng ký các khóa combo. Hình thức online: 🔸Giảm 1.400.000đ trên học

Xem thêm
Nối các mảng dữ liệu trong Python

Trong quá trình xử lý dữ liệu với pandas, việc kết hợp nhiều bảng dữ liệu là thao tác rất phổ biến. Hàm concat() chính là công cụ mạnh mẽ giúp

Xem thêm