Marinos làm việc với các tệp CSV rất nhiều. Trong trường hợp của anh ấy, các tệp CSV được tạo bởi một ứng dụng tùy chỉnh và anh ấy nhận thấy rằng anh ấy thậm chí có thể bao gồm các công thức trong đó. Vì vậy, nếu một dòng của tệp CSV chứa “,,, Total :, = SUM (D5: D13) ,,,,” thì công thức được đánh giá và tất cả đều ổn.

Tuy nhiên, một điều Marinos muốn làm là chỉ ra trong tệp CSV cách các ô riêng lẻ phải được căn chỉnh sau khi chúng được nhập vào Excel.

Dường như anh ấy nhớ rằng trong Lotus 123, anh ấy có thể sử dụng một ký tự tiền tố để chỉ ra sự liên kết của ô (‘cho bên trái, ^ cho giữa và “

cho bên phải); anh ấy nghĩ rằng khả năng tương tự sẽ rất tốt trong Excel.

Không có cách nào để thực hiện việc này trong Excel; việc căn chỉnh dữ liệu đã nhập dựa trên các giá trị mặc định của hệ thống, sao cho văn bản được căn trái và các số được căn phải. Tuy nhiên, một tùy chọn , sẽ là thêm một ký tự tiền tố mà sau đó bạn có thể “phân tích cú pháp” bằng macro để áp dụng căn chỉnh mong muốn. Ví dụ: bạn có thể sử dụng “<” cho bên trái, “^” cho chính giữa và “>” cho bên phải. Khi Excel nhập tệp CSV, các trường được coi là văn bản. Sau đó, bạn có thể chạy macro này để tìm kiếm ký tự căn chỉnh hàng đầu và thực hiện hành động mong muốn:

Sub SetJustification()

Dim rCell As Range

For Each rCell In ActiveSheet.UsedRange         With rCell             Select Case Left(.Value, 1)

Case "<"

.Value = Mid(.Value, 2)

.HorizontalAlignment = xlHAlignLeft                 Case "^"

.Value = Mid(.Value, 2)

.HorizontalAlignment = xlHAlignCenter                 Case ">"

.Value = Mid(.Value, 2)

.HorizontalAlignment = xlHAlignCenter             End Select         End With     Next     Set rCell = Nothing End Sub

Macro kiểm tra từng ô trong trang tính. Nếu ô bắt đầu bằng một ký tự căn chỉnh thì ký tự đó sẽ bị xóa và căn chỉnh thích hợp là đã áp dụng.

_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 (3131) áp dụng cho Microsoft Excel 97, 2000, 2002 và 2003. Bạn có thể tìm thấy phiên bản của mẹo này cho giao diện ribbon của Excel (Excel 2007 trở lên) tại đây: