Bài này rất tuyệt vời. Mình đã thêm " Dim duong_dan As String On Error GoTo err duong_dan = Application.GetOpenFilename()" để tìm file và lấy đường dẫn để chạy cho phần trong lệnh For. Cám ơn bài rất nhiều.
Đây là nội dung nhỏ trong bộ khóa học: ▷ Khoá học "Học Excel, Có Việc Ngay": bit.ly/ex101_dtnguyen ▷ Xem ngay "Tự động hoá Excel và báo cáo với VBA": bit.ly/vba101_dtnguyen ▷ Theo dõi Facebook cá nhân: fb.me/kuldokk ▷ Blog cá nhân: blog.hocexcel.online ▷ Video được cung cấp miễn phí bởi hocexcel.online ▷ Facebook Group: bit.ly/heoFBG -- Khám phá thêm thật nhiều kiến thức với Học Excel Online: 🔑 Học Excel, Có Việc Ngay: www.hocexcel.online/ex101 🔑 Hãy để VBA giúp bạn: www.hocexcel.online/vba101 🔑 Hiểu và phân tích dữ liệu với Excel: www.hocexcel.online/dv101
để giải quyết vấn đề nhiều hơn 255 ký tự các Bạn chia nhỏ chuối cấn thay thế StrReplace thành các các chuỗi nhỏ SubStr có số ký tự 255 then Dim Str1 As String 'Chuoi can tim Dim StrReplace As String 'Chuoi thay the Dim SubStr As String 'Chuoi thay the con Dim Maxlen As Long Maxlen = 255 - Len(Str1) n = Len(StrReplace) \ Maxlen 'xac dinh so vong lap kn = (n * Maxlen) + 1 'Xac dinh chi so k khi chay vong cuoi For k = 1 To Len(StrReplace) Step Maxlen SubStr = Mid(StrReplace, k, Maxlen) & Str1 'them str1 vao SubStr de thay the dan If k = kn Then SubStr = Mid(StrReplace, k, Maxlen) 'vong cuoi khong them str1 vao SubStr Set template = .documents.Open(TemplatePath) Set t = template.Content t.Find.Execute _ FindText:=Str1, _ ReplaceWith:=SubStr, _ Replace:=2 Next k End if
Ad cho hỏi nếu có nhiều file word nhưng có trường dữ liệu cần điền giống nhau. Có cách nào viết 1 mã code chung khi run thì các file word còn lại vẫn điền dữ liệu không. Không cần phải code riêng cho từng file
Làm ngược lại là chuyện từ khó đến rất khó. Nếu dữ liệu trong file word có quy luật thì có thể làm được nhưng mình nghĩ không phải là một nhiệm vụ đơn giản nếu chỉ dùng các kỹ thuật lập trình cơ bản, có thể sẽ cần dùng đến AI.
cho hỏi nếu muốn chỉ điền dữ lieu vào file word khi chọn tên cụ thể sau đó save as ra ten file đó. VD khi chạy chương trình thì sẽ hỏi: "Enter customer Name:" sau đó chỉ tạo ra file word của customer name đó. code lại thế nào anh.Thanks
Bạn dùng 1 biến k, định nghía k là chuỗi, (Dim k as string), sau đó trong phàn for j ấy, cho k bằng giá trị của ô mà bạn muốn lấy ra để đặt tên. đến đoạn đặt tên thì cho template.SaveAs2 Filename:=k & ".docx" là xong. nhớ là phải có số 2
Hi anh, nếu em không muốn điền tất cả các cột trong Excel vào các từ trong file Word thì có cách nào không ạ ? Ví dụ có cột tên, ngày tháng năm sinh, thu nhập. Nhưng trong Word template, em chỉ cần điền họ tên và thu nhập, thì có cách nào bỏ qua cột ngày tháng năm sinh không ạ? Em cảm ơn ạ.
Em chào thầy, thầy ơi nếu em không muốn tách các giấy mời trên thành nhiều giấy. Mà muốn để tất cả các giấy mời vào một file word luôn được không thầy?
Anh Nguyên ơi! Cho e xin hỏi mình muốn in ra chỉ một file Word gồm nhiều [[ong_hay_ba]] và những thông tin liên quan đến [[ong_hay_ba]] được không anh?
Trường hợp muốn lọc riêng từng file word nhưng mà có thêm điều kiện là lọc theo 1 cột rồi điền vào word đó thì làm sao, ví dụ danh sách giấy mời học sinh theo lớp, đẩy ra mỗi lớp chỉ 1 bản word thôi, còn danh sách học sinh tại 1 lớp sẽ tạo từng template theo từng trang trong 1 word, đến lớp khác thì mới sinh file word mới. Xin cảm ơn
Chào bạn mình gõ đoạn code như của bạn sao vẫn báo lỗi ở dấu := nhỉ, chỉ giúp mình với, mình muốn bản word trong cùng một file như chức năng mailing thì làm như nào vậ bạn.
template.SaveAs filename:=ThisWorkbook.Path & Application.PathSeparator & i & "-Gm.docx" nếu save chổ thư mục khác thì đã thử cách này template.SaveAs filename:=("D:\Tam\"-Gm.docx") được nhưng muốn thêm vô tên file 1 giá trị có dạng như Sheet1.Range("b1").Value thì cấu trúc ra sao vậy bạn?
@@HocExcelOnline Cám ơn bạn! đã làm được rồi, phải đúng cú pháp và dẫu cách thì nó mới chịu vì đã thử cách này nhưng thiếu dấu cách nó đỏ hoài, giờ thì làm được.
Video rất hay. cảm ơn bạn đã chia sẻ! Mình làm theo tuy nhiên nó chạy ra từng file rồi mà nội dung thì không thay đổi, giữ nguyên như file template. Bạn giải thích mình với?
Mình dowload file về và chạy thử, tuy nhiên nó chạy ra từng file rồi mà nội dung thì không thay đổi, giữ nguyên như file template. Làm ơn giải thích giùm mình với?
Chào bạn ạ, giúp mình chút với ạ, khi mình tích vào phần shape đã tạo thì exl hiện ra thông báo lỗi như sau: Microsoft Visual Basic for application 400, cho mình hỏi đây là lỗi gì ạ? và chỉnh sửa như thế nào ạ. hay code mình đang tạo sai ạ
anh cho e hỏi chút a. cột số đếm nếu là giá trị lớn, ví dụ như 1.000. Khi bấm code thì nó hiển thị sang bên word là 1,000.như vậy là sai định dạng. anh có thể chỗ này được không a. Em cám ơn.
Set template = .Document.Open("C:\Users\Dell\Desktop\87B_TEMPLATE.docx") minh bị lỗi ngay dòng này , không mở file lên được bạn giúp mình với Object doesn't support this property or method (Error 438)
Cảm ơn bài học cực kỳ hay của anh. Cách này mình áp dụng rất hiệu quả. Anh Thanh cho mình hỏi: khi mình copy số từ Excel vào file Word thì các dấu chấm cách nghìn bị mất, kiểu thế này: 145379512 (thay vì: 145.379.512). Mình có cách nào để copy qua Word mà vẫn còn dấu cách ngàn không anh?
Chào anh, rất vui video có ích cho anh. Trước khi đưa số liệu sang word, chúng ta có thể sử dụng hàm Format(số, format) trong vba để định dạng. Chúc anh thành công.
@@HocExcelOnline Cảm ơn anh đã phản hồi. Mình đã nghĩ ra một cách nữa cũng rất đơn giản mà đáp ứng được yêu cầu của mình, đó là trong đoạn code này của anh: "ReplaceWith:=Sheet1.Cells(i + 1, j).Value, _" mình thay thế thuộc tính "Value" bằng thuộc tính "Text" thì nó sẽ đưa vào trong file Word đúng y định dạng trong ô ở Excel. Cái thuộc tính text này mình xem ở một video khác của anh nên áp dụng thử vào đây và đã chạy được. Mình cũng đang học khóa VBA101 của anh. Anh Thanh dạy rất hay. Chúc anh luôn mạnh khỏe!
Ad ơi mình làm được rồi nhưng bị vướng chỗ lớn hơn 255 ký tự khi chuyển sang word đó, ad có bài nào hướng dẫn giải quyết vấn đề này không 😁 hi hi chỉ mình với, thank ad
Hiển Đặng không ra như mong muốn thì là phải debug mới biết được lỗi do đâu, không debug thì sao biết là thiếu ở đâu và sai gì để sửa? Chạy bình thường mà không thay đổi giá trị thì cũng là có bug chứ?
@@HocExcelOnline mình debug thử thì thấy chỗ wdreplaceAll báo giá trị empty. có phải do chỗ này giá trị trống nên không có giá trị nào được thay thế phải không ad.
Anh ơi cho em hỏi em chạy file thì bị lỗi sau: "Compile error -Can't file project or library" dù mình đã chỉnh lại đường link của template vậy cho em hỏi cách xử lí như thế nào được không,em cảm ơn!
Anh ơi em hỏi chút, cách này mình tạo ra nhiều file, nhưng khi mình gửi mail nó sẽ k gửi tự động như maillings đc. Vậy có cách nào để gửi mail từng file tự động cho đúng đối tượng đc?
+ĐT Nguyễn [Học Excel Online] a ơi e muốn nhập 1 lần mà nó hiển thị ở nhiều file khác nhau mà có sự trùng lặp ý thì làm thế nào, sát của e 01685111158, giúp e với
Chào bạn, mình cũng không biết khắc phục thế nào bởi vì mình không ngồi trước máy của bạn hoặc nhìn vào file của bạn đã làm. Bạn hãy post file vào nhóm của mình nhé: fb.com/groups/hocexcel.online
Chào anh Em đã thực hiện bài học đúng theo hướng dẫn. Nhưng khi Run thì báo lỗi là không tìm thấy file tempate. (file word cần sử dụng) Mong anh hướng dẫn giúp. Cám ơn anh nhiều
![ĐT Nguyễn [Học Excel Online]](http://yt3.ggpht.com/ytc/AIdro_m_AvtZ8fKn8_EN5_zyQlE-gslnB8cJRzrTv0jBsEg2YQ=s48-c-k-c0x00ffffff-no-rj)
Bài này rất tuyệt vời.
Mình đã thêm
" Dim duong_dan As String
On Error GoTo err
duong_dan = Application.GetOpenFilename()"
để tìm file và lấy đường dẫn để chạy cho phần trong lệnh For.
Cám ơn bài rất nhiều.
bạn có thể cho mình số liên lạc được không
Đây là nội dung nhỏ trong bộ khóa học:
▷ Khoá học "Học Excel, Có Việc Ngay": bit.ly/ex101_dtnguyen
▷ Xem ngay "Tự động hoá Excel và báo cáo với VBA": bit.ly/vba101_dtnguyen
▷ Theo dõi Facebook cá nhân: fb.me/kuldokk
▷ Blog cá nhân: blog.hocexcel.online
▷ Video được cung cấp miễn phí bởi hocexcel.online
▷ Facebook Group: bit.ly/heoFBG
--
Khám phá thêm thật nhiều kiến thức với Học Excel Online:
🔑 Học Excel, Có Việc Ngay: www.hocexcel.online/ex101
🔑 Hãy để VBA giúp bạn: www.hocexcel.online/vba101
🔑 Hiểu và phân tích dữ liệu với Excel: www.hocexcel.online/dv101
hay thật mình đang tìm cách thay thế chức năng mailmerge trên word. cảm ơn bạn nhiều
Bài hướng dẩn quá hay
Cám ơn nhiều
để giải quyết vấn đề nhiều hơn 255 ký tự các Bạn chia nhỏ chuối cấn thay thế StrReplace thành các các chuỗi nhỏ SubStr có số ký tự 255 then
Dim Str1 As String 'Chuoi can tim
Dim StrReplace As String 'Chuoi thay the
Dim SubStr As String 'Chuoi thay the con
Dim Maxlen As Long
Maxlen = 255 - Len(Str1)
n = Len(StrReplace) \ Maxlen 'xac dinh so vong lap
kn = (n * Maxlen) + 1 'Xac dinh chi so k khi chay vong cuoi
For k = 1 To Len(StrReplace) Step Maxlen
SubStr = Mid(StrReplace, k, Maxlen) & Str1 'them str1 vao SubStr de thay the dan
If k = kn Then SubStr = Mid(StrReplace, k, Maxlen) 'vong cuoi khong them str1 vao SubStr
Set template = .documents.Open(TemplatePath)
Set t = template.Content
t.Find.Execute _
FindText:=Str1, _
ReplaceWith:=SubStr, _
Replace:=2
Next k
End if
video hay qua cam on ban
Mình thấy thú vị về cái =Rand(10,10) của bạn; Không biết trong Words còn có những cái gì khác tương tự vậy không. Cảm ơn bạn, video rất hay.
=lorem(10,10)
a ơi mình muốn để tên từng người vào vị trí "giay_moi" đó thì phải làm thêm lệnh j nữa a, chỉ e với.
Ad cho hỏi nếu có nhiều file word nhưng có trường dữ liệu cần điền giống nhau. Có cách nào viết 1 mã code chung khi run thì các file word còn lại vẫn điền dữ liệu không. Không cần phải code riêng cho từng file
Thanks @ĐT Nguyễn
Tuyệt vời, cảm ơn ĐT Nguyễn, Bạn có thể hướng dẫn tiếp đối với những trường hợp những cell có chứa dữ liệu lớn hơn 255 ký tự không?
LU CO BINH agri chào a
cho mình hỏi: nếulàm ngược lại thi code ntn vậy admin. Mình có file word, muốn trích xuất các trường vào excel theo danh sách dc koa
Làm ngược lại là chuyện từ khó đến rất khó. Nếu dữ liệu trong file word có quy luật thì có thể làm được nhưng mình nghĩ không phải là một nhiệm vụ đơn giản nếu chỉ dùng các kỹ thuật lập trình cơ bản, có thể sẽ cần dùng đến AI.
Anh Thanh chỉ giúp em cách làm chỗ đoạn văn nhieu hơn 255 ký tư đuợc k anh
cho hỏi nếu muốn chỉ điền dữ lieu vào file word khi chọn tên cụ thể sau đó save as ra ten file đó. VD khi chạy chương trình thì sẽ hỏi: "Enter customer Name:" sau đó chỉ tạo ra file word của customer name đó. code lại thế nào anh.Thanks
Em học VBA rồi dùng câu lệnh Input là đc
Bạn dùng 1 biến k, định nghía k là chuỗi, (Dim k as string), sau đó trong phàn for j ấy, cho k bằng giá trị của ô mà bạn muốn lấy ra để đặt tên. đến đoạn đặt tên thì cho template.SaveAs2 Filename:=k & ".docx" là xong. nhớ là phải có số 2
Anh ơi, chỉ cho em làm cách nào để trong 1 ô của excel chứa được nhiều dữ liệu vậy. Anh chỉ em với
ad ơi phiền bạn bày giúp mình lưu file thành tên từng người với, xin chân thành cảm ơn bạn
Rất cám ơn tác giả, mình muốn replace nhiều hơn 255 ký tự, nhờ giúp đỡ
Có cách nào để copy bảng excel rồi dán vào vị trí xác định như sau một đoạn văn trong word bằng vba ko admin?
Có, bằng vba
@@HocExcelOnline làm như thế nào vậy ad ơi?
@nguyenhaiviet8542 mời bạn đón xem ở những video tiếp theo
Cảm ơn ad🎉🎉
Mình đã tìm ra cách xử lý rồi. Thanks ad nhé
Hi anh, nếu em không muốn điền tất cả các cột trong Excel vào các từ trong file Word thì có cách nào không ạ ? Ví dụ có cột tên, ngày tháng năm sinh, thu nhập. Nhưng trong Word template, em chỉ cần điền họ tên và thu nhập, thì có cách nào bỏ qua cột ngày tháng năm sinh không ạ? Em cảm ơn ạ.
Thì trong template em sửa lại và code vba cũng sửa lại là được.
Tham khảo khoá học VBA:
hocexcel.online
Em chào thầy, thầy ơi nếu em không muốn tách các giấy mời trên thành nhiều giấy. Mà muốn để tất cả các giấy mời vào một file word luôn được không thầy?
Được em nhé
Muốn tạo tất cả các giấy mời trong 1 file word thì phải viết vba như thế nào? Mình rất mong được giúp đỡ
Thì mình học VBA rồi viết code theo ý mình thôi
1 thư mục có nhiều file word thì fai làm thế nào ạ.chỉ dùng 1 file excel thui ạ
Bài Sử dụng Mail Merge trong Excel mà không cần mở Word, e chưa tìm ra video của a Thanh
Anh Nguyên ơi!
Cho e xin hỏi mình muốn in ra chỉ một file Word gồm nhiều [[ong_hay_ba]] và những thông tin liên quan đến [[ong_hay_ba]] được không anh?
Được em ơi
@@HocExcelOnline code như thế nào để chỉ cần 1 nút bấm mình in ra toàn bộ trong 1 file anh?
Vấn đề của em không trả lời được trong 1 comment. Anh có khoá VBA201 tương ứng, em tham khảo nhé
Trường hợp muốn lọc riêng từng file word nhưng mà có thêm điều kiện là lọc theo 1 cột rồi điền vào word đó thì làm sao, ví dụ danh sách giấy mời học sinh theo lớp, đẩy ra mỗi lớp chỉ 1 bản word thôi, còn danh sách học sinh tại 1 lớp sẽ tạo từng template theo từng trang trong 1 word, đến lớp khác thì mới sinh file word mới. Xin cảm ơn
A Thanh làm video mail merge tương tự trên Google sheet và Google doc đi ạ
mail merge trên đấy là ko cần code VBA luôn đó ạ, và có thể gửi trực tiếp cho người nhận luôn.
Giọng đọc của bạn này giống 1 admin bên Phê Phim quá :D
Không phải đọc mà là giảng nhé
Chào bạn mình gõ đoạn code như của bạn sao vẫn báo lỗi ở dấu := nhỉ, chỉ giúp mình với, mình muốn bản word trong cùng một file như chức năng mailing thì làm như nào vậ bạn.
Bạn ơi bạn đã lưu bản word trong cùng một file như chức năng mailing chưa ạ?
template.SaveAs filename:=ThisWorkbook.Path & Application.PathSeparator & i & "-Gm.docx"
nếu save chổ thư mục khác thì đã thử cách này
template.SaveAs filename:=("D:\Tam\"-Gm.docx")
được nhưng muốn thêm vô tên file 1 giá trị có dạng như Sheet1.Range("b1").Value thì cấu trúc ra sao vậy bạn?
Bạn nối đoạn file path kèm giá trị đó thôi:m
“D:\Tam\” & Sheet1.range(“B1”).value & “-Gm.docx”
@@HocExcelOnline Cám ơn bạn! đã làm được rồi, phải đúng cú pháp và dẫu cách thì nó mới chịu vì đã thử cách này nhưng thiếu dấu cách nó đỏ hoài, giờ thì làm được.
Tien Dat Tran chúc mừng bạn
Chào thầy tôi nhờ thầy hướng dẫn câu lệnh thay vì lưu file word temple thì tôi muốn in file temple đó tôi xin cảm ơn thầy rất nhiều
Bạn có thể cho mình hỏi là chộn số lệnh theo số thứ tự từ 1 đên 200 sang word mà đổi theo số đc ko
Em đã thực hiên theo bài học ma có bảng thông báo ghi Compile error: Object required, thế thì xử lý ra sao ạ
Video rất hay. cảm ơn bạn đã chia sẻ!
Mình làm theo tuy nhiên nó chạy ra từng file rồi mà nội dung thì không thay đổi, giữ nguyên như file template. Bạn giải thích mình với?
bạn vào tool-reference-chọn word 14 mới ok
Hai hoang. Em làm y chẳng. Ra file nhưng ko thấy đổi nội dung. Cái references>word em làm rồi
anh cho em hỏi, em làm y chang nhưng nó chỉ tạo ra file Templete giống như file gốc mà ko chuyển dữ liệu sang thì do lỗi ở đâu ạ
Kiểm tra đã bật lên của ms word, và ms office hết chưa (rà trong cửa sổ viết code vba vào Tool > reference ấy)
Mình dowload file về và chạy thử, tuy nhiên nó chạy ra từng file rồi mà nội dung thì không thay đổi, giữ nguyên như file template. Làm ơn giải thích giùm mình với?
Chào bạn ạ, giúp mình chút với ạ, khi mình tích vào phần shape đã tạo thì exl hiện ra thông báo lỗi như sau: Microsoft Visual Basic for application 400, cho mình hỏi đây là lỗi gì ạ? và chỉnh sửa như thế nào ạ. hay code mình đang tạo sai ạ
Bạn tham khảo bài viết này để xử lý lỗi 400 nhé
stackoverflow.com/questions/44607423/how-to-resolve-error-400-in-excel-vba
Bổ ích
anh cho e hỏi chút a. cột số đếm nếu là giá trị lớn, ví dụ như 1.000. Khi bấm code thì nó hiển thị sang bên word là 1,000.như vậy là sai định dạng. anh có thể chỗ này được không a. Em cám ơn.
mình muốn code sao cho mình chọn 1 dòng thì chỉ xuất ra 1 file word thôi, ko xuất hết cả file excel ak
Vậy bạn cần học để viết lại phần code liên quan thôi
Set template = .Document.Open("C:\Users\Dell\Desktop\87B_TEMPLATE.docx")
minh bị lỗi ngay dòng này , không mở file lên được bạn giúp mình với
Object doesn't support this property or method (Error 438)
Chỉ có 1 dòng code thì mình chưa biết bạn làm sai chỗ nào, nếu có cả file thì tốt nhất
@@HocExcelOnline mình sửa đc rồi bạn
M muốn trộn cho nhiều mẫu word thì code thế nào bani
Cảm ơn bài học cực kỳ hay của anh. Cách này mình áp dụng rất hiệu quả. Anh Thanh cho mình hỏi: khi mình copy số từ Excel vào file Word thì các dấu chấm cách nghìn bị mất, kiểu thế này: 145379512 (thay vì: 145.379.512). Mình có cách nào để copy qua Word mà vẫn còn dấu cách ngàn không anh?
Chào anh, rất vui video có ích cho anh. Trước khi đưa số liệu sang word, chúng ta có thể sử dụng hàm Format(số, format) trong vba để định dạng. Chúc anh thành công.
@@HocExcelOnline Cảm ơn anh đã phản hồi. Mình đã nghĩ ra một cách nữa cũng rất đơn giản mà đáp ứng được yêu cầu của mình, đó là trong đoạn code này của anh: "ReplaceWith:=Sheet1.Cells(i + 1, j).Value, _" mình thay thế thuộc tính "Value" bằng thuộc tính "Text" thì nó sẽ đưa vào trong file Word đúng y định dạng trong ô ở Excel. Cái thuộc tính text này mình xem ở một video khác của anh nên áp dụng thử vào đây và đã chạy được. Mình cũng đang học khóa VBA101 của anh. Anh Thanh dạy rất hay. Chúc anh luôn mạnh khỏe!
Chúc anh thành công
Cho e hỏi nếu đoạn văn bản hơn 255 ký tự phải làm sao vậy?? Mong giúp đỡ
Ad ơi mình làm được rồi nhưng bị vướng chỗ lớn hơn 255 ký tự khi chuyển sang word đó, ad có bài nào hướng dẫn giải quyết vấn đề này không 😁 hi hi chỉ mình với, thank ad
chào ad, mình làm thử theo ad nhưng khi chạy file nó lại không thay đổi giá trị như của ad. không biết có cần phải làm thêm bước nào hay không.
Bạn cần debug đoạn code đó xem có viết sai gì không nhé, bạn có biết debug trong VBA chưa?
@@HocExcelOnline no khong bao bi bug cho nào hết, mình chạy vẫn ra file bình thường.
Hiển Đặng không ra như mong muốn thì là phải debug mới biết được lỗi do đâu, không debug thì sao biết là thiếu ở đâu và sai gì để sửa? Chạy bình thường mà không thay đổi giá trị thì cũng là có bug chứ?
@@HocExcelOnline ok ad, de minh tim bug thu :D
@@HocExcelOnline mình debug thử thì thấy chỗ wdreplaceAll báo giá trị empty. có phải do chỗ này giá trị trống nên không có giá trị nào được thay thế phải không ad.
Cho em hỏi, em làm đúng y. Ra file nhưng nội dung không đổi. Đã chọn tool>references>word rồi a. Chỉ em với
Uh em học vba thì mới làm tiếp được:
bit.ly/2lTP3Vk
Anh ơi cho em hỏi em chạy file thì bị lỗi sau: "Compile error -Can't file project or library" dù mình đã chỉnh lại đường link của template vậy cho em hỏi cách xử lí như thế nào được không,em cảm ơn!
Em đã xem hết videos đến đoạn thêm references tới Microsoft Word chưa?
máy e dùng word 2013 em đã chọn Microsoft office/word 15.0 object library mà không được anh à
trên máy em báo lỗi gì?
nó báo "error in loading DLL" anh à
+Minh Dũng Đặng Uh thế bản office em cài không đầy đủ hoặc lỗi rồi. Em thử cài lại nhé
Minh có làm theo video của bạn mà không thể nào thay thế được nhỉ? chỉ lấy giá trị dòng đầu tiên thui. có ai giúp đc k ạ?
Anh ơi em hỏi chút, cách này mình tạo ra nhiều file, nhưng khi mình gửi mail nó sẽ k gửi tự động như maillings đc. Vậy có cách nào để gửi mail từng file tự động cho đúng đối tượng đc?
Có cách nhưng không cover trong bài này.
+ĐT Nguyễn [Học Excel Online] a ơi e muốn nhập 1 lần mà nó hiển thị ở nhiều file khác nhau mà có sự trùng lặp ý thì làm thế nào, sát của e 01685111158, giúp e với
Tai sao nó cứ báo lỗi chỗ := vậy bạn, câu lệnh ko đúng à
FindText := Sheet1.Cells(1, j).value, _
RepaceWith := Sheet1.Cells(i + 1, j).Value,_
Replace:=wdReplaceAll
Thay wdReplaceAll bằng con số 2
docs.microsoft.com/en-us/previous-versions/office/developer/office-2003/aa211923(v%3Doffice.11)#wdreplace
hi mình muốn chèn đoạn văn bản dài hơn 255 ký tự, bạn chỉ giúp mình nhé , cám ơn bạn nhiều.
Sau khi chạy mình bị lỗi run-time error '5825' object has been deleted không biết khắc phục thế nào giúp mình với
Chào bạn, mình cũng không biết khắc phục thế nào bởi vì mình không ngồi trước máy của bạn hoặc nhìn vào file của bạn đã làm.
Bạn hãy post file vào nhóm của mình nhé:
fb.com/groups/hocexcel.online
Một hợp đồng dài có làm được không ah?
Dạ, vẫn làm được bình thường
vậy có thể chèn từ excel qua word không
Có em nhé
Sao mình code y nguyên mà lại báo lỗi "Variable not difined" tại dòng Replace:=wdReplaceAll là sao Thanh nhỉ
+Quang Anh Nguyen bạn thay wdReplaceAll bằng số 2 nhé
@@HocExcelOnline vẫn còn báo lỗi chỗ replace = 2
MÌnh làm nhuwban hướng dẫn để làm file của mình mà ko được chạy nó báo lỗi
Ad cho em hỏi VBA của em không viết được tiếng việt có dấu ad có thể chỉ giúp em cách khắc phục được không ạ? em xin cảm ơn
Nếu lưu 1 file mà nhiều trang như trong Mail Merge thì như nào hả bạn.
+LÊ TIẾN HÙNG thì bạn lại dùng Mail merge thôi?!
+ĐT Nguyễn [Excel] m muốn dùng cách này chứ cái kia m biết rồi.
+LÊ TIẾN HÙNG thế bạn học VBA là làm đc
Bạn xử lý giúp mình đưa dữ liệu về định dạng %, hoặc ngày tháng năm dd-mm-yyyy. Thank
Chào anh
Em đã thực hiện bài học đúng theo hướng dẫn. Nhưng khi Run thì báo lỗi là không tìm thấy file tempate. (file word cần sử dụng)
Mong anh hướng dẫn giúp.
Cám ơn anh nhiều
+Vu Tranhuy uh vì ngoài file excel em cần chuẩn bị file word để làm template
Bạn chỉ giúp mình khắc phục lỗi 255 ký tự được ko? xin cảm ơn
Anh có thể chỉ giúp em cách làm chỗ đoạn văn nhiều hơn 255 ký tự được không ạ ?
Dùng chức năng mailing có sẵn trong word đi bạn.
Bạn ơn cho mình xin clip làm vs word trên 255 ký tự với ạ
Muốn xuất một dữ liệu ở hàng cuối cùng mới nhập thì làm cách nào?
Bác nào biết code này chỉ dùm với
kể cả lọc dữ liệu cũng chỉ giới hạn 255 ký tự thôi Anh ĐT Nguyễn ah! Vả lại để xem được hết Video VBA của Anh cần phải làm gì!
anh ơi làm cuốn chữ trong userform đc k a
M muốn đặt bạn viết app
Bạn nhắn qua fb nhé. fb.me/kuldokk
Thầy cho em xin file excel được không thầy, trang download bị lỗi ạ
hay
cho e xin lại link donwload file trong video với ạ. em cảm ơn nhiều ạ
+Vũ Đình Chí file trong khoá học nên ko public nữa em nhé
để tạo tên file word bằng tên ông(bà) đó thì làm thế nào ạ
Mình muốn xuất dữ liệu cho 1 người thôi có được ko
Được nhé bạn
@@HocExcelOnline Nhờ add hỗ trợ em với ạ! thank anh!
Code chạy xuất file được rồi nhưng nó không cập nhật được dữ liệu từ excel qua word, Bác nào biết lổi gì chỉ giúp với
+Tuấn Nguyễn Minh tham khảo lớp học vba để biết thêm chi tiết
hocexcel.online
em đã thử và vẫn copy ra dc nhiều file nhưng dữ liệu không được thay thế! thank anh
Em thay wdReplaceAll trong code bằng số 2 nhé
mình gõ như b nhưng đến đoạn có dấu := thì vba báo lỗi :(
tệp chứa virus, google báo thế bác ạ
Mình bị lỗi can't find project or library
Giúp mình với thank bạn
Anh cho em xin file được không a? link file bị lỗi ạ
Mình Dowload bị lỗi Ad ơi "Sorry, this link has been automatically turned off for now. Learn more about traffic limits"
Tham khảo
hocexcel.online
Cho xin số điện thoại của Anh được không!
sao đang ky hoc roi ma ko thay gi
+Quốc Hoàn Nguyễn em để lại số điện thoại nhé
anh ơi cho em xin code với ạ em cảm ơn ạ
Chỉ có một điều là với file gồm 200 người thì tốc độ thực thi xuất ra file khá là chậm!? chậm hơn là làm với mailmerg
anh ơi cho em xin số dt anh vs