Nhờ giúp đỡ sửa lỗi khi set với Workbooks.OpenText

Liên hệ QC
Status
Không mở trả lời sau này.

Ngày mai trời lại sáng

Thành viên thường trực
Tham gia
4/7/21
Bài viết
339
Được thích
139
(@$%@(@$%@(@$%@ đêm thu buồn lắm chị Hằng ơi ..

1632239426765.png

Mã:
Option Explicit
Sub test_open()
    Dim wb As Workbook
    Set wb = Workbooks.OpenText(Filename:=ThisWorkbook.Path & "\DATA.TXT", DataType:=xlDelimited, Tab:=True)
End Sub
 
(@$%@(@$%@(@$%@ đêm thu buồn lắm chị Hằng ơi ..

View attachment 266469

Mã:
Option Explicit
Sub test_open()
    Dim wb As Workbook
    Set wb = Workbooks.OpenText(Filename:=ThisWorkbook.Path & "\DATA.TXT", DataType:=xlDelimited, Tab:=True)
End Sub
Bạn thử vầy xem:
Mã:
Sub test_open()
    Workbooks.OpenText Filename:="DATA.TXT", DataType:=xlDelimited, Tab:=True
End Sub

Tham khảo:

 
Bạn thử vầy xem:
Mã:
Sub test_open()
    Workbooks.OpenText Filename:="DATA.TXT", DataType:=xlDelimited, Tab:=True
End Sub

Tham khảo:

Ồ chào sếp,
Em muốn set với mục đích là vì để sau khi gán workbook vào một biến , có thể thông qua biến này để lấy dữ liệu đưa vào một mảng và đóng workbook thông qua biến này sếp ạ.
Em cũng mở nhiều file trong đó có xlsx và txt nên không xác định định rõ vì vậy mong muốn là lảm thế nào để gán vào một biến sếp ạ.
Em có sử dụng:
Set wb = activeworkbook có vẻ cũng không đúng lắm lúc được lúc không có lẽ do trước khi mở file em đã sử dụng câu lệnh tắt thông báo và các chế độ cập nhật màn hinh chăng.
 
Ồ chào sếp,
Em muốn set với mục đích là vì để sau khi gán workbook vào một biến , có thể thông qua biến này để lấy dữ liệu đưa vào một mảng và đóng workbook thông qua biến này sếp ạ.
Em cũng mở nhiều file trong đó có xlsx và txt nên không xác định định rõ vì vậy mong muốn là lảm thế nào để gán vào một biến sếp ạ.
Em có sử dụng:
Set wb = activeworkbook có vẻ cũng không đúng lắm lúc được lúc không có lẽ do trước khi mở file em đã sử dụng câu lệnh tắt thông báo và các chế độ cập nhật màn hinh chăng.
OpenText là phương thức của đối tượng Workbooks chứ không là hàm nên không trả về cái gì cả, càng không trả về đối tượng Workbook.

Mã:
Sub test_open()
Dim wb As Workbook
    Workbooks.OpenText Filename:="DATA.TXT", DataType:=xlDelimited, Tab:=True
    Set wb = Workbooks("data.txt")
'    ......
End Sub
 
OpenText là phương thức của đối tượng Workbooks chứ không là hàm nên không trả về cái gì cả, càng không trả về đối tượng Workbook.

Mã:
Sub test_open()
Dim wb As Workbook
    Workbooks.OpenText Filename:="DATA.TXT", DataType:=xlDelimited, Tab:=True
    Set wb = Workbooks("data.txt")
'    ......
End Sub
Ồ ra là vậy, cảm ơn chú SN đã xuất hiện và giúp đỡ.
 
...
Cụ thể cái chữ sờ nờ kia viết ra là gì để đến nông nỗi "không tốt lắm"?
Nó là một cụm từ rất tâng bốc đối tượng. Cho nên nếu nói rõ ra sẽ "không tốt lắm":
1. chứng tỏ là mình hay nịnh. Và cũng để tránh trường hợp bị hiểu lầm là mỉa mai (xem câu 2)
2. buồn lòng những người khác. Nhất là người được gọi thẳng là sếp. (có những môi trường mà từ "sếp" được dùng với ý mỉa mai).
 
Với người quản lý thì em gọi là "sếp", ở diễn đàn ban quản trị cũng như người quản lý.
Nịnh hay không cũng đâu ảnh hưởng gì đến ai, người có tài năng và giúp đỡ người khác được người khác khen hay tâng bốc thần tượng thì cũng đáng,em đăng bài ai biết, vui vẻ thoải mái thì giúp, còn không giúp thì thôi xin đừng có chuyện nọ xọ chuyện kia.
Càm ơn
 
Với người quản lý thì em gọi là "sếp", ở diễn đàn ban quản trị cũng như người quản lý.
Nịnh hay không cũng đâu ảnh hưởng gì đến ai, người có tài năng và giúp đỡ người khác được người khác khen hay tâng bốc thần tượng thì cũng đáng,em đăng bài ai biết, vui vẻ thoải mái thì giúp, còn không giúp thì thôi xin đừng có chuyện nọ xọ chuyện kia.
Càm ơn
Đầu dây mối nhợ, đầu cua tai nheo là do bạn viết tắt. Chủ ý viết tắt là để 1 mình một đối tượng hiểu (chắc là anh @batman1) mà chính đối tượng đó cũng không hiểu. Vậy thì viết tắt làm gì?
Cảm ơn bác, em nghĩ chú ấy sẽ hiểu, vì em thông tin đến chú ấy.
Có những cái nếu viết rõ ra có lẽ sẽ không tốt lắm.
Biết là không tốt thì đừng làm.
Cho đến giờ thì chủ đề bị làm loãng bởi trên 1 chục bài thảo luận về cái "không tốt lắm" đó, bạn nghĩ sao?
Tôi khóa chủ đề lại.
 
Status
Không mở trả lời sau này.
Web KT

Bài viết mới nhất

Back
Top Bottom