Một cách bạn có thể sử dụng dữ liệu từ Internet trong trang tính Excel là sao chép dữ liệu đó từ một trang Web và sau đó dán vào trang tính. Ví dụ: bạn có thể chọn một bảng dữ liệu trên một trang Web, nhấn Ctrl + C để sao chép nó vào Clipboard, chọn một ô trong Excel, rồi nhấn Ctrl + V. Excel cố gắng hết sức để phân tích cú pháp dữ liệu và đặt nó vào các ô thích hợp, giống như trong bảng gốc.

Vấn đề là bạn sẽ thường nhận được nhiều hơn dữ liệu bảng. Nếu có các đối tượng khác trong dữ liệu bạn đã sao chép từ Web, các đối tượng đó cũng sẽ được dán vào trang tính. Không có gì lạ khi kết thúc với tất cả các loại đồ họa nhỏ trong trang tính. Nếu những đồ họa này ban đầu là siêu liên kết, bạn có thể muốn thực sự trích xuất siêu kết nối và sau đó xóa đồ họa. Điều này sẽ làm cho dữ liệu trong trang tính hữu dụng hơn nhiều.

Cách để làm điều này là với một macro. Khi bạn đã dán thông tin Web vào trang tính, hãy chạy macro sau.

Sub ConvertHLShapes()

Dim shp As Shape     Dim sTemp As String

For Each shp In ActiveSheet.Shapes         sTemp = ""

Macro này sẽ chuyển qua từng hình dạng trong trang tính. Sau đó, nó sẽ kiểm tra xem hình dạng có một siêu liên kết được kết hợp hay không. Nếu đúng như vậy, thì địa chỉ của siêu kết nối đó (trong biến sTemp) được đặt vào ô ở góc trên bên trái của vị trí hình dạng. Macro xóa bất kỳ hình dạng nào có siêu liên kết; bạn có thể buộc nó xóa tất cả các hình trong trang tính bằng cách di chuyển dòng shp.Delete ra bên ngoài cấu trúc If …​ End If.

_Lưu ý: _

Nếu bạn muốn biết cách sử dụng các macro được mô tả trên trang này (hoặc trên bất kỳ trang nào khác trên trang ExcelTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.

ExcelTips là nguồn của bạn để đào tạo Microsoft Excel hiệu quả về chi phí.

Mẹo này (3578) áp dụng cho Microsoft Excel 2007, 2010, 2013, 2016, 2019 và Excel trong Office 365. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện menu cũ hơn của Excel tại đây: