Định dạng bảng ASCII với Spaces (Microsoft Word)
Không có gì lạ trong nhiều bộ xử lý văn bản để định dạng bảng có dấu cách.
Chèn đủ khoảng cách giữa mỗi cột để căn chỉnh chữ cái đầu tiên của mỗi cột. Tuy nhiên, Word bao gồm một trình chỉnh sửa bảng, cung cấp tính linh hoạt hơn trong việc định dạng và làm việc với bảng. Việc chuyển đổi bảng ASCII được định dạng ban đầu với khoảng trắng sang bảng Word có thể tốn thời gian. Macro VBA sau sẽ thực hiện định dạng tự động.
Nó giả định rằng mỗi dòng đại diện cho một hàng khác nhau trong bảng và bất kỳ thứ gì vượt ra ngoài một khoảng trắng đều thể hiện sự phân chia giữa các cột.
Sub SpacesToTable With Selection.Find .ClearFormatting .Replacement.ClearFormatting .Text = " {2,}" .Replacement.Text = "^t" .Forward = True .Wrap = wdFindStop .Format = False .MatchCase = False .MatchWholeWord = False .MatchAllWordForms = False .MatchSoundsLike = False .MatchWildcards = True End With Selection.Find.Execute Replace:=wdReplaceAll Selection.ConvertToTable _ Separator:=wdSeparateByTabs, _ Format:=wdTableFormatNone End Sub
Trước khi chạy macro, hãy chọn văn bản bạn muốn chuyển đổi. Khi bạn chạy macro này, bạn sẽ nhận được điều tương tự như bạn sẽ nhận được nếu bạn chọn tùy chọn từ menu Bảng và sau đó chọn Văn bản thành Bảng.
Điều này có nghĩa là các cột của bạn có thể trông rất thú vị; chúng chắc chắn sẽ cần được thay đổi kích thước. Nhưng công việc khó khăn để loại bỏ tất cả các khoảng trống đã được thực hiện cho bạn.
_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 các trang WordTips), tôi đã chuẩn bị một trang đặc biệt bao gồm thông tin hữu ích.
WordTips là nguồn của bạn để đào tạo Microsoft Word hiệu quả về chi phí.
(Microsoft Word là phần mềm xử lý văn bản phổ biến nhất trên thế giới.) Mẹo này (781) áp dụng cho Microsoft Word 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 Word (Word 2007 và sau này) tại đây: