Bài viết này minh họa 3 cách đơn giản để chuyển đổi file Excel thành lưu dưới dạng CSV với dấu ngoặc kép. Việc lưu file CSV với dấu ngoặc kép là cần thiết để tránh biểu diễn sai dữ liệu. Ví dụ, xem hàng dữ liệu USD,25,000,Model1. Ở đây, dấu phẩy phân tách hơi gây nhầm lẫn. Thay vào đó, USD,“25,000”,Model1 phù hợp hơn. Hình sau nêu bật mục đích bài viết. Xem nhanh để biết cách thực hiện.
Bạn có thể tải file thực hành từ nút tải xuống dưới.
3 Cách Nhanh Nhất Lưu Excel Dưới Dạng CSV Với Dấu Ngoặc Kép
1. Dùng Định Dạng Tùy Chỉnh Để Lưu Excel Dưới Dạng CSV Với Dấu Ngoặc Kép
Giả sử bạn có tập dữ liệu sau. Bạn muốn lưu nó thành file CSV với giá trị ô được bọc trong dấu ngoặc kép. Làm theo các bước dưới.
📌 Các Bước
- Trước tiên, chọn toàn bộ phạm vi (A1:B6) của tập dữ liệu.
- Sau đó, nhấn CTRL+1 để mở cửa sổ Format Cells.
- Tiếp theo, chọn định dạng Custom từ tab Number.
- Sau đó, nhập \“#\”;\“@\” vào trường Type.
- Sau đó, nhấn OK.
- Tiếp theo, chọn File >> Save As. Sau đó duyệt vị trí mong muốn để lưu file.
- Sau đó, nhập tên file. Bây giờ, chọn CSV (Comma delimited) (*.csv) làm loại file dùng mũi tên thả xuống.
- Sau đó, nhấn nút Save.
- Tiếp theo, đến vị trí mong muốn đó. Sau đó mở file CSV bằng trình soạn thảo văn bản (Notepad v.v.).
- Sau đó, bạn sẽ thấy kết quả sau chứa một số dấu ngoặc kép thừa.
- Bây giờ, nhấn CTRL+H để mở cửa sổ Thay Thế. Nhập dấu ngoặc kép vào trường Tìm nội dung không có khoảng trắng giữa chúng. Để trống trường Thay thế bằng và chọn Thay thế tất cả.
- Cuối cùng, bạn sẽ nhận được kết quả mong muốn như sau.
Đọc thêm: Cách Áp Dụng Macro Để Chuyển Đổi Nhiều File Excel Sang CSV
2. Sử Dụng Windows PowerShell
Thay vào đó, bạn có thể lưu file CSV không có dấu ngoặc kép trước. Sau đó, bạn có thể thêm dấu ngoặc kép dùng Windows Powershell. Làm theo các bước dưới để có thể làm được điều đó.
📌 Các Bước
- Trước tiên, đến trang tính bạn muốn lưu dưới dạng file CSV.
- Tiếp theo, chọn File >> Save As như phương pháp trước.
- Sau đó, duyệt vị trí mong muốn cho file. Tiếp theo, nhập tên cho file.
- Sau đó, chọn CSV (Comma delimited) (*.csv) làm loại file dùng mũi tên thả xuống.
- Sau đó, nhấn nút Save.
- Sau đó, bạn sẽ nhận được kết quả sau.
- Bây giờ, giữ phím SHIFT và chuột phải vào bất kỳ khoảng trống nào ở vị trí file CSV không có dấu ngoặc kép.
- Sau đó, nhấn vào Open PowerShell window here.
- Bây giờ, sao chép lệnh sau. Bạn cần thay đổi tên file dựa trên file của bạn.
import-csv Sales1.csv | export-csv Sales2.csv -NoTypeInformation -Encoding UTF8- Sau đó, dán code đã sao chép vào cửa sổ PowerShell và nhấn Enter.
- Sau đó, bạn sẽ nhận được kết quả mong muốn như hình dưới.
Đọc thêm: Cách Chuyển Đổi File Excel Sang File Văn Bản Với Dấu Phân Cách Phẩy (3 Phương Pháp)
Các Bài Đọc Tương Tự
- Macro Chuyển Đổi Excel Sang File Văn Bản Phân Cách Bằng Dấu Gạch Dọc (3 Phương Pháp)
- Cách Chuyển Đổi Nhiều File Excel Sang CSV (3 Cách Phù Hợp)
3. Áp Dụng Code VBA Cho File CSV Với Dấu Ngoặc Kép
Bạn cũng có thể dùng Excel VBA để có cùng kết quả. Làm theo các bước dưới để làm điều đó.
📌 Các Bước
- Trước tiên, nhấn ALT+F11 để mở cửa sổ VBA.
- Sau đó, chọn Insert >> Module như hình sau. Điều này sẽ tạo một module mới.
- Bây giờ, sao chép code dưới, dùng nút sao chép.
Sub ExcelToCSV() Dim rng, row, cell As Range Dim dqt, dlim, text As String Dim file As Variant On Error Resume Next If ActiveWindow.RangeSelection.Count > 1 Then text = ActiveWindow.RangeSelection.AddressLocal Else text = ActiveSheet.UsedRange.AddressLocal End If Set rng = Application.InputBox("Please select the data range:", "ExcelDemy.Com", text, , , , , 8) If rng Is Nothing Then Exit Sub file = Application.GetSaveAsFilename("", "CSV File (*.csv), *.csv") dlim = Application.International(xlListSeparator) Open file For Output As #1 For Each row In rng.rows dqt = "" For Each cell In row.Cells dqt = dqt & """" & cell.Value & """" & dlim Next While Right(dqt, 1) = dlim dqt = Left(dqt, Len(dqt) - 1) Wend Print #1, dqt Next Close #1 If Err = 0 Then MsgBox "The CSV file has been saved to: " & file, vbInformation, "ExcelDemy.Com" End Sub- Sau đó, dán code đã sao chép vào module như hình dưới.
- Tiếp theo, nhấn F5 để chạy code. Điều này sẽ hỏi phạm vi mong muốn. Bây giờ, bạn có thể chuyển về trang tính và chọn phạm vi. Sau đó, nhấn OK. Điều này sẽ đưa bạn trực tiếp đến cửa sổ Save As.
- Bây giờ, duyệt vị trí cho file và nhập tên. Sau đó, nhấn Save.
- Sau đó, Excel sẽ hiển thị thông báo sau.
- Cuối cùng, bạn có thể kiểm tra kết quả sau.
🔎 Giải Thích Code VBA
Sub ExcelToCSV()
Chúng ta sẽ viết code bên trong thủ tục chủ thể này.
Dim rng, row, cell As Range
Dim dqt, dlim, text As String
Dim file As Variant
Khai báo các biến cần thiết.
On Error Resume Next
Bỏ qua mọi lỗi.
If ActiveWindow.RangeSelection.Count > 1 Then
text = ActiveWindow.RangeSelection.AddressLocal
Else
text = ActiveSheet.UsedRange.AddressLocal
End If
Tự động phát hiện dữ liệu để chọn.
Set rng = Application.InputBox(“Please select the data range:”, “ExcelDemy.Com”, text, , , , , 8)
Yêu cầu phạm vi dữ liệu.
If rng Is Nothing Then Exit Sub
Thoát thao tác nếu không có đầu vào.
file = Application.GetSaveAsFilename(“”, “CSV File (*.csv), *.csv”)
Đặt định dạng file mới.
dlim = Application.International(xlListSeparator)
Chỉ định dấu phẩy làm phân tách.
Open file For Output As #1
Tạo file mới.
For Each row In rng.rows
dqt = “”
For Each cell In row.Cells
dqt = dqt & “””” & cell.Value & “””” & dlim
Next
While Right(dqt, 1) = dlim
dqt = Left(dqt, Len(dqt) – 1)
Wend
Print #1, dqt
Next
Close #1
Bọc giá trị ô bằng dấu ngoặc kép và điền vào file mới.
If Err = 0 Then MsgBox “The CSV file has been saved to: ” & file, vbInformation, “ExcelDemy.Com”
Xác nhận lưu file CSV.
Đọc thêm: Cách Chuyển Đổi File Excel Sang CSV Tự Động (3 Phương Pháp Dễ Dàng)
Lưu Ý
- Bạn cần cung cấp đường dẫn file đúng trong lệnh PowerShell nếu bạn mở nó từ vị trí khác.
- Bạn cần thay đổi tên file dựa trên file của bạn.
Kết Luận
Bây giờ bạn biết cách chuyển đổi file Excel để lưu dưới dạng file CSV với dấu ngoặc kép. Vui lòng cho chúng tôi biết nếu bài viết này đã cung cấp giải pháp mong muốn cho bạn. Bạn cũng có thể dùng phần bình luận dưới cho thêm truy vấn hoặc đề xuất. Hãy truy cập blog ExcelDemy để học thêm về Excel. Hãy cùng chúng tôi và tiếp tục học tập.
Các Bài Viết Liên Quan
- [Đã Sửa!] Excel Không Lưu CSV Với Dấu Phẩy (7 Giải Pháp Có Thể)
- Cách Chuyển Đổi File Excel Sang Định Dạng CSV (5 Cách Dễ Dàng)
- Chuyển Đổi Excel Sang File CSV Phân Cách Phẩy (2 Cách Dễ Dàng)
- Cách Chuyển Đổi Excel Sang CSV Không Mở File (4 Phương Pháp Dễ Dàng)