Cách tạo một trong hai nội dung ô trong Excel
Excel cung cấp khả năng tóm tắt các ô. Với chức năng ĐỊNH DẠNG - TẾ BÀO - KÝ HIỆU - KẾT HỢP TẾ BÀO, bạn có thể kết hợp hai ô thành một đơn vị. Nhưng bạn sẽ làm gì khi có nội dung trong cả hai ô mà bạn không muốn mất? Sử dụng VBA để giải quyết vấn đề.
Ví dụ trong hình sau cho thấy một danh sách ngắn các tên:
Bạn muốn kết hợp hai nội dung từ cột A và B trong cột A đầu tiên và sau đó kết hợp hai ô từ cột A và B thành một ô. Macro sau thực hiện công việc này:
Hợp nhất SubCells ()
Làm mờ dòng dưới dạng số nguyên
Hàng = 1
While Not (IsEmpty (Cells (line, 1)))
Cells (row, 1) = Cells (row, 1) & "" & Cells (row, 2)
Ô (dòng, 2) .learContents
Phạm vi (Ô (hàng, 1), Ô (hàng, 2)). Hợp nhất
Dòng = dòng + 1
Wend
Cột (1) .AutoFit
Kết thúc Sub
Macro chạy qua các dòng từ dòng 1 cho đến khi cột A trống. Đối với mỗi nội dung không trống, nội dung của A và B được gắn liền với nhau (cách nhau bởi một khoảng trắng). Khi đó hai ô A và B được nối với nhau để tạo thành một ô. Hình sau cho thấy kết quả:
