Excel dường như sử dụng dấu phân cách được sử dụng cuối cùng trong phiên. Dave Peterson mô tả một giải pháp khả thi ở đây Về cơ bản, bạn tạo một macro đặt dấu phân cách mặc định và đặt nó vào thư mục xlstart. Nếu bạn đang làm điều này cho một tệp trên các máy của người khác, điều đó có thể sẽ không hoạt động, nhưng đây là cách bạn sẽ tiếp cận nó, lập trình trên hệ thống của riêng bạn và bạn có thể điều chỉnh nó theo tình huống của mình. Chạy đoạn mã sau sẽ đặt dấu phân cách cho bạn trước. Điều này sẽ hoạt động trên một phiên hiện có. Vì vậy, nếu bạn có nội dung mong muốn thiết lập các dấu phân cách cụ thể, hãy chạy một cái gì đó như thế này trước khi nhập, đặt bất kỳ tham số nào bạn thích
With ThisWorkbook.Worksheets(1).Range("a1")
.TextToColumns Destination:=.Columns(1), DataType:=xlDelimited, TextQualifier:=xlDoubleQuote, ConsecutiveDelimiter:=True, Tab:=False, Semicolon:=False, Comma:=True, Space:=False, Other:=False
End With
ThisWorkbook.Close SaveChanges:=False