Giúp đỡ Về đọc Các File Text Từ Thư Mục Input Sau đó Ghi Dữ Liệu Ra File ...

• Trang chủ Có gì mới Hoạt động gần nhất Tác giả
• Diễn đàn Tìm bài viết mới Tìm theo chuyên mục
• Video Video về Excel Video về tin học khác Tin tức về tin học chung
• Thông tin mới Featured content Tìm bài mới Tài Nguyên Mới Hoạt động gần nhất
• Tài nguyên Đánh giá mới nhất Tìm tài nguyên
• Facebook
• Đóng góp

Đăng nhập Đăng Ký Có gì mới? Tìm kiếm

Tìm kiếm

Mọi nơi Đề tài Diễn đàn này Đề tài này Chỉ tìm trong tiêu đề Note Bởi: Tìm kiếm Tìm nâng cao…

• Tìm bài viết mới
• Tìm theo chuyên mục

Menu Đăng nhập Đăng Ký Install the app Install How to install the app on iOS

Follow along with the video below to see how to install our site as a web app on your home screen.

Note: This feature may not be available in some browsers.

• Khách ơi! GPE thông tin đến bạn ấn phẩm "lập trình VBA trong Excel": - Phần cơ bản - Phần Nâng Cao - VBA trong Excel - Cải thiện và tăng tốc

• Trang chủ
• Diễn đàn
• Excel và các ngôn ngữ lập trình khác

You are using an out of date browser. It may not display this or other websites correctly.You should upgrade or use an alternative browser. Giúp đỡ về đọc các file text từ thư mục input sau đó ghi dữ liệu ra file excel (1 người xem)

• Thread starter Thread starter quydouct
• Ngày gửi Ngày gửi 13/6/12

Người dùng đang xem chủ đề này

Đang trực tuyến: 2 (Thành viên: 0, Khách: 2) Q

quydouct

Thành viên mới

Tham gia 12/6/12 Bài viết 7 Được thích 2 Chào các bạn, Mình mới tập viết code VBA và đang có vấn đề như sau mong các bạn giúp đỡ. Mình cần viết code VBA để đọc các file trong 1 thư mục input nội dung các file đó có dạng giống nhau như thế này : <% abc dfe ghi = "xxxxxxx" 123 fgv poi = "yyyyyy" ..................................... %> Bài toán đặt ra là đọc các file này và ghi ra 1 file excel có các sheet là tên của các file trong thư mục input. Trong sheet này có 2 trường là Name ( phần trước dấu "=" trong file input) và trường Value ( sau dấu "=" ). Thanks

File đính kèm

• output.xlsx output.xlsx 8.7 KB · Đọc: 30
• file1.txt file1.txt 57 bytes · Đọc: 43

Lần chỉnh sửa cuối: 13/6/12

ndu96081631

Huyền thoại GPE

Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,982

quydouct đã viết: Chào các bạn, Mình mới tập viết code VBA và đang có vấn đề như sau mong các bạn giúp đỡ. Mình cần viết code VBA để đọc các file trong 1 thư mục input nội dung các file đó có dạng giống nhau như thế này : <% abc dfe ghi = "xxxxxxx" 123 fgv poi = "yyyyyy" ..................................... %> Bài toán đặt ra là đọc các file này và ghi ra 1 file excel có các sheet là tên của các file trong thư mục input. Trong sheet này có 2 trường là Name ( phần trước dấu "=" trong file input) và trường Value ( sau dấu "=" ). Thanks Nhấp chuột vào đây để mở rộng...

Thì bạn cũng phải đưa lên 1 vài file txt + file Excel làm ví dụ minh họa chứ Q

quydouct

Thành viên mới

Tham gia 12/6/12 Bài viết 7 Được thích 2 Mình đã attact 2 file mẫu lên. Mình xin giải thích rõ hơn cho 2 file đó giả sử thư mục input có 3 file là file1, file2, file3 với nội dung tương tự như file txt mình đưa lên, khi đó file result sẽ có 3 sheet là file1, file2, file3 và trên mỗi sheets sẽ có các giá trị được đọc từ file txt ghi vào.

ndu96081631 đã viết: Thì bạn cũng phải đưa lên 1 vài file txt + file Excel làm ví dụ minh họa chứ Nhấp chuột vào đây để mở rộng...

ndu96081631

Huyền thoại GPE

Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,982

quydouct đã viết: Mình đã attact 2 file mẫu lên. Mình xin giải thích rõ hơn cho 2 file đó giả sử thư mục input có 3 file là file1, file2, file3 với nội dung tương tự như file txt mình đưa lên, khi đó file result sẽ có 3 sheet là file1, file2, file3 và trên mỗi sheets sẽ có các giá trị được đọc từ file txt ghi vào. Nhấp chuột vào đây để mở rộng...

Món này làm chẳng khó khăn gì, chỉ là hơi.. cực thân 1 chút Tôi đề xuất code như sau: 1> Các hàm hổ trợ: PHP: Sao chép. Function GetTxtFileName(ByVal fldName As String) Dim Arr(), fle As Object, n As Long On Error Resume Next With CreateObject("Scripting.FileSystemObject") With .GetFolder(fldName) For Each fle In .Files If fle.Type = "Text Document" Then ReDim Preserve Arr(n) Arr(n) = fle.Path n = n + 1 End If Next End With End With If IsArray(Arr) Then GetTxtFileName = Arr End Function PHP: Sao chép. Function GetValFromTxt(ByVal txtFile As String) Dim tmpArr, Arr(), n As Long, i As Long, tmp As String, Item On Error Resume Next With CreateObject("Scripting.FileSystemObject") If .FileExists(txtFile) Then With .OpenTextFile(txtFile, 1) tmpArr = Split(.ReadAll, vbCrLf) If IsArray(tmpArr) Then ReDim Arr(1 To UBound(tmpArr) + 2, 1 To 3) Arr(1, 1) = "No" Arr(1, 2) = "Name" Arr(1, 3) = "Value" n = 1 For i = 0 To UBound(tmpArr) tmp = Trim(CStr(tmpArr(i))) If Len(tmp) Then If InStr(1, tmp, "=") Then Item = Split(tmp, "=") n = n + 1 Arr(n, 1) = n - 1 Arr(n, 2) = Item(0) Arr(n, 3) = Item(1) End If End If Next If IsArray(Arr) Then GetValFromTxt = Arr End If .Close End With End If End With End Function PHP: Sao chép. Function SheetExists(ByVal wksName As String) As Boolean On Error Resume Next SheetExists = Not ThisWorkbook.Sheets(wksName) Is Nothing End Function 2> Code chính: PHP: Sao chép. Sub Main() Dim fleName As String, txtFile As String, fldName As String, wksName As String, tmp As String Dim n As Long, i As Long, Arr, aFile On Error Resume Next With CreateObject("Shell.Application") fldName = .BrowseForFolder(0, "", 1).Self.Path End With If Len(fldName) Then aFile = GetTxtFileName(fldName) If IsArray(aFile) Then For i = 0 To UBound(aFile) txtFile = CStr(aFile(i)) Arr = GetValFromTxt(txtFile) With CreateObject("Scripting.FileSystemObject") fleName = .GetFile(txtFile).Name wksName = Left(fleName, Len(fleName) - 4) End With If Len(wksName) Then If Not SheetExists(wksName) Then ThisWorkbook.Sheets.Add(After:=Sheets(Sheets.Count)).Name = wksName End If With ThisWorkbook.Sheets(wksName) .UsedRange.ClearContents .Range("A1").Resize(UBound(Arr, 1), 3) = Arr End With End If Next End If End If End Sub Viết sơ qua thế thôi, không biết còn lỗi nào ngoài ý muốn không. Bạn tải file về chạy code và tự kiểm tra nhé Có vấn đề gì ta sẽ bàn tiếp

File đính kèm

• output.rar output.rar 20.3 KB · Đọc: 135

Q

quydouct

Thành viên mới

Tham gia 12/6/12 Bài viết 7 Được thích 2 Cảm ơn bạn, mình đã chạy thử thì bị lỗi chỗ kiểm tra điều kiện file txt If fle.Type = "Text Document" Then ( Đoạn này chạy có file txt trong thư mục nhưng nó k nhận ra ) chỗ này mình sửa lại thành If Right(fle, 3) = "txt" Then thì chạy đc rồi

ndu96081631

Huyền thoại GPE

Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,982

quydouct đã viết: Cảm ơn bạn, mình đã chạy thử thì bị lỗi chỗ kiểm tra điều kiện file txt If fle.Type = "Text Document" Then ( Đoạn này chạy có file txt trong thư mục nhưng nó k nhận ra ) chỗ này mình sửa lại thành If Right(fle, 3) = "txt"Then thì chạy đc rồi Nhấp chuột vào đây để mở rộng...

Bởi vậy mới nói bạn kiểm tra! (dù tôi đã test trên máy tôi và chạy bình thường) Cũng có thể do phiên bản Office khác nhau nên lệnh cũng có khác nhau chăng? (tôi dùng Office 2010) Ai mà biết được Ẹc... Ẹc... -------------- Ngoài ra, nếu sửa như bạn thì phải sửa cho "chắc" 1 chút Thay If Right(fle, 3) = "txt" Then Thành: If UCase(Right(fle.Name , 4)) = ".TXT" Then Lý dọ: - Có những file text mà đuôi của nó là TXT chứ không phải txt - Có dạng file không có phần mở rộng và tên nó có dạng filetxt thì sao? (lấy right 3 ký tự cũng ra txt nhưng nó không phải file text) Lần chỉnh sửa cuối: 14/6/12 Q

quydouct

Thành viên mới

Tham gia 12/6/12 Bài viết 7 Được thích 2

ndu96081631 đã viết: Bởi vậy mới nói bạn kiểm tra! (dù tôi đã test trên máy tôi và chạy bình thường) Cũng có thể do phiên bản Office khác nhau nên lệnh cũng có khác nhau chăng? (tôi dùng Office 2010) Ai mà biết được Ẹc... Ẹc... -------------- Ngoài ra, nếu sửa như bạn thì phải sửa cho "chắc" 1 chút Thay If Right(fle, 3) = "txt" Then Thành: If UCase(Right(fle.Name , 4)) = ".TXT" Then Lý dọ: - Có những file text mà đuôi của nó là TXT chứ không phải txt - Có dạng file không có phần mở rộng và tên nó có dạng filetxt thì sao? (lấy right 3 ký tự cũng ra txt nhưng nó không phải file text) Nhấp chuột vào đây để mở rộng...

Đúng là sửa như bạn sẽ "chắc" hơn thật. Mình mới tập code vba được vài ngày nên chưa có kinh nghiệm Ngoài ra nhờ bạn chút, mình thấy ở đây có vấn đề 1 chút nếu như cái file txt nó line nào đó có nhiều hơn 1 dấu "=" dạng như thế này thì sẽ bị lỗi ví dụ như line: bien_x = "value_x= abc" nó sẽ lấy name = bien_x , value = "value_x mà bỏ đi mất phần: = abc" Mình muốn chỉ cắt theo dấu "=" đầu tiên của line đó còn tất cả phần sau dấu "=" đầu tiên đó đều coi là value hết thì sửa thế nào?

ndu96081631

Huyền thoại GPE

Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,982

quydouct đã viết: Đúng là sửa như bạn sẽ "chắc" hơn thật. Mình mới tập code vba được vài ngày nên chưa có kinh nghiệm Ngoài ra nhờ bạn chút, mình thấy ở đây có vấn đề 1 chút nếu như cái file txt nó line nào đó có nhiều hơn 1 dấu "=" dạng như thế này thì sẽ bị lỗi ví dụ như line: bien_x = "value_x= abc" nó sẽ lấy name = bien_x , value = "value_x mà bỏ đi mất phần: = abc" Mình muốn chỉ cắt theo dấu "=" đầu tiên của line đó còn tất cả phần sau dấu "=" đầu tiên đó đều coi là value hết thì sửa thế nào? Nhấp chuột vào đây để mở rộng...

Trong hàm GetValFromTxt, hãy sửa đoạn: Arr(n, 3) = Item(1) Thành: Arr(n, 3) = Mid(tmp, InStr(1, tmp, "=") + 1, Len(tmp)) ----------------- Ngoài lề chút. Bạn nói

quydouct đã viết: Mình mới tập code vba được vài ngày nên chưa có kinh nghiệm Nhấp chuột vào đây để mở rộng...

Đúng là cũng... khó tin thật đấy! Vì nhìn cả "rừng" code thế kia mà bạn vẫn biết cần phải sửa lại chổ nào mới chạy được Khâm phục! Lần chỉnh sửa cuối: 14/6/12 Q

quydouct

Thành viên mới

Tham gia 12/6/12 Bài viết 7 Được thích 2

ndu96081631 đã viết: Trong hàm GetValFromTxt, hãy sửa đoạn: Arr(n, 3) = Item(1) Thành: Arr(n, 3) = Mid(tmp, InStr(1, tmp, "=") + 1, Len(tmp)) ----------------- Ngoài lề chút. Bạn nói Đúng là cũng... khó tin thật đấy! Vì nhìn cả "rừng" code thế kia mà bạn vẫn biết cần phải sửa lại chổ nào mới chạy được Khâm phục! Nhấp chuột vào đây để mở rộng...

Mình sửa lại theo bạn đã chạy OK rồi. Chính xác thì mình mới tập code VBA từ hôm thứ 3 vừa rồi, nhưng trước kia có học qua C# thấy nó có nhiều cái tương đồng nên cũng nhanh. Còn phát hiện ra chỗ cần sửa thì đặt vài cái Msgbox cho in giá trị rồi chạy Debug là biết nó sai ở đâu thôi mà Cảm ơn NDU rất nhiều chắc sẽ có nhiều cái cần bạn giúp đỡ Q

quydouct

Thành viên mới

Tham gia 12/6/12 Bài viết 7 Được thích 2 Mình muốn sau khi lấy dữ liệu sẽ ghi ra 1 file excel khác và xoá đi các Sheet có sẵn (sheet1,2,3) Nên đã sửa lại code như bên dưới nhưng khi xoá Sheet đi nó vẫn còn Sheet2 không bị xoá k biết bị lỗi thế nào?

Sub Main() Dim fleName As String, txtFile As String, fldName As String, wksName As String, tmp As String Dim n As Long, i As Long, Arr, aFile On Error Resume Next With CreateObject("Shell.Application") fldName = .BrowseForFolder(0, "", 1).Self.Path End With If Len(fldName) Then aFile = GetTxtFileName(fldName) If IsArray(aFile) Then For i = 0 To UBound(aFile) txtFile = CStr(aFile(i)) Arr = GetValFromTxt(txtFile) With CreateObject("Scripting.FileSystemObject") fleName = .GetFile(txtFile).Name wksName = Left(fleName, Len(fleName) - 4) End With If Len(wksName) Then Workbooks.Add Workbooks.Item(2).Activate If Not SheetExists(wksName) Then ActiveWorkbook.Sheets.Add(After:=Sheets(Sheets.Count)).Name = wksName End If With ActiveWorkbook.Sheets(wksName) .UsedRange.ClearContents .Range("A1").Resize(UBound(Arr, 1), 3) = Arr End With End If Application.DisplayAlerts = False Sheets(1).Delete Sheets(2).Delete Sheets(3).Delete ActiveWorkbook.SaveAs Filename:="C:\ResourceList.xls", FileFormat:=xlNormal, Password:="", WriteResPassword:="", _ ReadOnlyRecommended:=False, CreateBackup:=False ActiveWorkbook.Close Next End If End If End Sub Nhấp chuột vào đây để mở rộng...

Lần chỉnh sửa cuối: 14/6/12

ndu96081631

Huyền thoại GPE

Thành viên BQT Super Moderator Tham gia 5/6/08 Bài viết 30,703 Được thích 53,982

quydouct đã viết: Mình muốn sau khi lấy dữ liệu sẽ ghi ra 1 file excel khác và xoá đi các Sheet có sẵn (sheet1,2,3) Nên đã sửa lại code như bên dưới nhưng khi xoá Sheet đi nó vẫn còn Sheet2 không bị xoá k biết bị lỗi thế nào? Nhấp chuột vào đây để mở rộng...

Bạn không cần phải Add Workbook, cũng không cần phải xóa các sheet 1, 2, 3 làm gì cho mất công! Cách của tôi là: - Cứ chạy code bình thường - Khi đã tạo ra được các sheet mới, Move or copy to các sheet ấy ra 1 Workbook mới rồi save nó là được rồi Code như sau: Mã: Sao chép. Sub Main() Dim fleName As String, txtFile As String, fldName As String, wksName As String, tmp As String Dim n As Long, i As Long, Arr, aFile, [COLOR=#ff0000][B]aWks(), lCount As Long[/B][/COLOR] On Error Resume Next With CreateObject("Shell.Application") fldName = .BrowseForFolder(0, "", 1).Self.Path End With If Len(fldName) Then aFile = GetTxtFileName(fldName) If IsArray(aFile) Then For i = LBound(aFile) To UBound(aFile) txtFile = CStr(aFile(i)) Arr = GetValFromTxt(txtFile) If IsArray(Arr) Then With CreateObject("Scripting.FileSystemObject") fleName = .GetFile(txtFile).Name wksName = Left(fleName, Len(fleName) - 4) [COLOR=#ff0000][B] lCount = lCount + 1 ReDim Preserve aWks(1 To lCount) aWks(lCount) = wksName[/B][/COLOR] End With If Not SheetExists(wksName) Then ThisWorkbook.Sheets.Add(After:=Sheets(Sheets.Count)).Name = wksName End If With ThisWorkbook.Sheets(wksName) .UsedRange.ClearContents .Range("A1").Resize(UBound(Arr, 1), 3) = Arr End With End If Next [COLOR=#ff0000][B] If lCount Then ThisWorkbook.Sheets(aWks).Move With ActiveWorkbook .SaveAs "C:\ResourceList", xlNormal .Close End With End If[/B][/COLOR] End If End If End Sub Những dòng code màu đỏ là cái thêm vào đấy (các chổ khác để nguyên) ------------------- Ngoài ra cũng xin sửa lại 2 đoạn code sau cho "chắc" hơn: PHP: Sao chép. Function GetTxtFileName(ByVal fldName As String) Dim Arr(), fle As Object, n As Long On Error Resume Next With CreateObject("Scripting.FileSystemObject") With .GetFolder(fldName) For Each fle In .Files If UCase(Right(fle.Name, 4)) = ".TXT" Then n = n + 1 ReDim Preserve Arr(1 To n) Arr(n) = fle.Path End If Next End With End With If n Then GetTxtFileName = Arr End Function PHP: Sao chép. Function GetValFromTxt(ByVal txtFile As String) Dim tmpArr, Arr(), n As Long, i As Long, tmp As String, Item On Error Resume Next With CreateObject("Scripting.FileSystemObject") If .FileExists(txtFile) Then With .OpenTextFile(txtFile, 1) tmpArr = Split(.ReadAll, vbCrLf) If IsArray(tmpArr) Then ReDim Arr(1 To UBound(tmpArr) + 2, 1 To 3) Arr(1, 1) = "No" Arr(1, 2) = "Name" Arr(1, 3) = "Value" n = 1 For i = 0 To UBound(tmpArr) tmp = Trim(CStr(tmpArr(i))) If Len(tmp) Then If InStr(1, tmp, "=") Then Item = Split(tmp, "=") n = n + 1 Arr(n, 1) = n - 1 Arr(n, 2) = Item(0) Arr(n, 3) = Mid(tmp, InStr(1, tmp, "=") + 1, Len(tmp)) End If End If Next If n > 1 Then GetValFromTxt = Arr End If .Close End With End If End With End Function Lần chỉnh sửa cuối: 15/6/12 Q

quydouct

Thành viên mới

Tham gia 12/6/12 Bài viết 7 Được thích 2 Mình đã sửa đc rồi K

khonggianviet

Thành viên mới

Tham gia 30/11/10 Bài viết 31 Được thích 6 Mọi người ơi cho mình hỏi Hàng ngày mình nhận văn bản sau đó cuối tháng phải thông kê và phân loại. Mình mới tạo song Form nhập liệu và ghi dữ liệu như theo hướng ở trên mạng, vấn đề của mình bang biểu thông kê là có sẵn (tức hàng và cột là cố định không phải thêm bớt gì cả) khi nhập và ghi dữ liệu thì dữ liệu sẽ tự động ghi vào các ô cố định đó. Đến cuối tháng hoặc cuối kỳ thống kê sẽ ra số liệu trong tháng đó đã nhận được tổng bao văn bản và những loại văn bản gì trong từng lĩnh vực. Ví dụ: - ngày 1.1.2017 mình nhận được 5 văn bản trong đó - 3 văn bản về tranh chấp tài sản, 2 văn bản thuộc lĩnh vực về tranh chấp đất đai, - Có 4 văn bản gửi cho mình đúng hạn theo luật định và 1 văn bản gửi quá hạn. - 5.1.2017 mình nhận được 6 văn bản trong đó - 4 văn bản về tranh chấp tài sản, 2 văn bản thuộc lĩnh vực về tranh chấp đất đai,- Có 3 văn bản gửi cho mình đúng hạn theo luật định và 2 văn bản gửi quá hạn. Đến cuối tháng 1 thì số liệu thống kê (tại sheet Bieu_13 cột F và tại các hàng 11, 13,14 sẽ có số liệu lần lượt là: 11 văn bản; 7 về tranh chấp tài sản; 4 về tranh chấp đất đai; 3 văn bản quá hạn. Mình có gửi file đính kèm, nhờ các bạn giúp đỡ. Thanks nhiều

File đính kèm

• bieu mau dan su 11_7.xlsm bieu mau dan su 11_7.xlsm 253.2 KB · Đọc: 7

Bạn phải đăng nhập hoặc đăng ký để trả lời bài viết tại đây.

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

Chương trình lập Báo cáo khảo sát Địa chất công trình GeoSection (1 người xem)

• • 

• PhanTuHuong
• 7/10/21
• Xây dựng ứng dụng.

Trả lời 11 Đọc 7K Hôm qua, lúc 23:04 PhanTuHuong G Vẽ mặt cắt dầm từ excel

• • 
  • 
  • 

• gpe.vn
• 17/6/24
• Xây dựng ứng dụng.

Trả lời 18 Đọc 2K Hôm qua, lúc 21:56 gpe.vn G C

• Question Question

Tự động điền thông tin từ danh sách vào template, nhờ anh chị trợ giúp (1 người xem)

• chienminhanh
• Thứ ba lúc 22:19
• Lập Trình với Excel

Trả lời 3 Đọc 137 Hôm qua, lúc 20:11 Maika8008 File kiểm đếm phiếu bầu cử 2026-2031 dễ hiểu có kết quả và biên bản (5 người xem)

• • 

• katanvn
• Thứ tư lúc 13:46
• Excel Ứng Dụng

Trả lời 2 Đọc 1K Hôm qua, lúc 11:07 katanvn

• Dán lên cao

Phiên bản mới Add-in A-Tools AI v10 (2024)

• • 

• Nguyễn Duy Tuân
• 13/9/24
• BLUESOFTS: A-Excel, A-Tools

Trả lời 67 Đọc 13K Hôm qua, lúc 09:48 Nguyễn Duy Tuân

• Đã giải quyết

LocalizeXL v1.73 - Làm nổi bật ô đang chọn và cuộn trang tự động (phiên bản 2026)

• • 
  • 
  • 

• HeSanbi
• 5/3/21
• Lập Trình với Excel

Trả lời 87 Đọc 19K Hôm qua, lúc 09:23 HeSanbi C

• Question Question

Tải tin nhắn từ Zalo về Excel

• cantl
• 28/8/23
• Lập Trình với Excel

Trả lời 3 Đọc 2K Hôm qua, lúc 09:22 ManhDuy2026 M

• Question Question

Co, Dãn dòng vừa trang in (1 người xem)

• vova2209
• Hôm qua, lúc 00:42
• Lập Trình với Excel

Trả lời 0 Đọc 69 Hôm qua, lúc 00:42 vova2209

• Question Question

Tải hóa đơn điện tử (https://hoadondientu.gdt.gov.vn/) Excel Vba (1 người xem)

• • 
  • 
  • 

• ongke0711
• 6/10/24
• Lập Trình với Excel

5 6 7 Trả lời 640 Đọc 95K Thứ năm lúc 21:37 jgdhkkfhkdf J Giúp kết nối từ Excel VBA đến Oracle database.

• MinhKhai
• Thứ tư lúc 17:08
• Cơ sở dữ liệu

Trả lời 4 Đọc 150 Thứ năm lúc 18:12 Nguyễn Duy Tuân Copilot bình luận các ván cờ vua từng ngày. (1 người xem)

• • 

• SA_DQ
• 3/11/25
• Chia sẻ

Trả lời 88 Đọc 3K Thứ năm lúc 16:03 SA_DQ H Chào cả nha! Xin tư vấn về câu chuyện quản lý nhân sự

• • 

• hotboykute
• 22/2/26
• Những vấn đề chung

Trả lời 15 Đọc 440 Thứ năm lúc 10:09 yeudoi File Excel kiểm phiếu bầu cử Quốc hội và HĐND các cấp

• • 

• adua29
• 9/4/21
• Excel Ứng Dụng

Trả lời 24 Đọc 7K Thứ tư lúc 22:38 doredore1988 D

• Question Question

Trình điều khiển Web tải hóa đơn điện tử từ trang Misa (actapp.misa.vn/app) (1 người xem)

• • 
  • 

• HeSanbi
• 26/2/26
• Lập Trình với Excel

Trả lời 2 Đọc 286 Thứ tư lúc 17:10 HeSanbi Gửi tặng file excel kiểm phiếu bầu cử Đại biểu Quốc hội và Hội đồng nhân dân các cấp

• • 
  • 

• adua29
• 19/5/11
• Ứng dụng cho lĩnh vực khác

Trả lời 25 Đọc 29K Thứ tư lúc 13:27 NamCT9x N T Chương trình kiểm phiếu bầu cử QH và HĐND các cấp

• • 
  • 

• thanhtratt
• 5/5/21
• Ứng dụng cho lĩnh vực khác

Trả lời 6 Đọc 2K Thứ tư lúc 11:54 PhanTuHuong

• Question Question

Lấy tỷ giá ngân hàng về file Excel bằng Power Query

• Cá ngừ F1
• 13/8/21
• PowerQuery

Trả lời 11 Đọc 3K Thứ ba lúc 21:35 ptm0412 SodokuX nhờ Copilot trợ giúp (1 người xem)

• SA_DQ
• Thứ ba lúc 14:14
• Chơi Game với Excel

Trả lời 0 Đọc 86 Thứ ba lúc 14:14 SA_DQ TaxCode v4.37 - Tra cứu mã số thuế từ tổng cục thuế, masothue và thuvienphapluat

• • 
  • 

• HeSanbi
• 27/11/25
• Các Add-ins cho excel

Trả lời 21 Đọc 4K Thứ ba lúc 14:05 HeSanbi

• Dán lên cao

Phần mềm quản lý kho chuyên nghiệp BS Silver

• Nguyễn Duy Tuân
• 1/10/12
• BLUESOFTS: A-Excel, A-Tools

2 Trả lời 131 Đọc 46K Thứ ba lúc 08:54 Nguyễn Duy Tuân Xem thêm… Chia sẻ: Facebook X Bluesky LinkedIn Reddit Pinterest Tumblr WhatsApp Email Chia sẻ Link

Thành viên có số lượng bài viết cao nhất tháng

• Maika8008 4
• adua29 3
• SA_DQ 3
• HeSanbi 3
• doredore1988 2
• MinhKhai 2
• vova2209 2
• Nguyễn Duy Tuân 2
• katanvn 2
• chienminhanh 2
• PhanTuHuong 2
• C. Hoa 1
• ThuyMay93 1
• Tuanba1992 1
• fdxfdcfd 1
• tuquyen1711 1
• Thóc Sama 1
• ptm0412 1
• NamCT9x 1
• gpe.vn 1

Thành viên có điểm tương tác cao nhất tháng

• Maika8008 5
• adua29 2
• yeudoi 2
• SA_DQ 2
• katanvn 2
• mafiana 1
• ThuyMay93 1
• ptm0412 1
• doredore1988 1

Thời gian đếm ngược.

000 Ngày 00 Giờ 00 phút 00 giây Thân mời tham dự sự kiện sinh nhật GPE 2025

• Trang chủ
• Diễn đàn
• Excel và các ngôn ngữ lập trình khác

• Website này sử dụng cookies. Tiếp tục sử dụng trang này, đồng nghĩa với việc bạn chấp nhận website sử dụng cookies. Chấp nhận Tìm hiểu thêm.…

Back Top Bottom