2 ай бұрын
Жыл бұрын
2 жыл бұрын
2 жыл бұрын
Пікірлер
@hoanghung1910 6 күн бұрын
cảm ơn bạn rất nhiều
@anlethe6895 7 күн бұрын
Thay dấu , bằng dấu / đc ko bạn
@excelsoeasy 6 күн бұрын
dc nha bạn
@anlethe6895 6 күн бұрын
@@excelsoeasy excel 2010 làm vba đc ko bạn. Chứ excel 2010 ko có hàn text join
@xuancuongbatongsan3799 15 күн бұрын
hiện em đang bị lỗi ngay dòng này: sName = aSheet.Shapes(Application.Caller).Name bị báo lỗi 2023
@thienphuoc642 15 күн бұрын
Mua số cho nhiều đi rồi bán nhà!
@xoso640 16 күн бұрын
Cho mình xin zalo với ạ
@ActiveLearningforAll 26 күн бұрын
Hay lắm ạ
@thanhk5376 28 күн бұрын
Cám ơn Easy mình đã được theo như bạn hướng dẫn trên video, mình sex xem tiếp phần 2 ( nhớ đọc bình luận mình gửi cho bạn nhe)
@haunguyen-sb5cw 29 күн бұрын
Gặp đúng trường hợp bệnh này. Gặp đúng thuốc. Thanks😊
@ngahoang7587 29 күн бұрын
Tuyết vời anh ạ, anh add file thực hành thì lại càng tuyệt vời hơn ạ
@excelsoeasy 28 күн бұрын
Làm lâu lắm rồi. File đó mất luôn rồi. Giờ muốn làm lại thì mình cũng xem lại video này kkk
@thanhk5376 29 күн бұрын
Hi Easy, đúng là Excel quá dễ đối với bạn. Bạn làm file quản lý xuất nhập kho đi bạn, khi nhập hàng thì cần biết nhập từ ai và ai nhập hàng, khi xuất hàng thì ai xuất hàng và xuất cho ai, hàng lưu trong kho nào, để ở vị trí nào? hạn sử dụng của mỗi măt hàng còn số lượng bao nhiêu? khi cập nhật phiếu xuất nhập chỉ cần gõ số lượng không cần phải click chon mã hàng và chỉ báo báo xuất nhập tồn theo ngày, tháng, năm thôi. Mình đã làm file này trên Excel thuần tuý không dùng VBA (sử dụng rất tốt) giờ mình muốn file này chạy bằng code VBA trên Excel ( vì có nhiều người Excel dùng và để đặt bẫy file cho tốt - mình chỉ biết Acc, VB thôi, chuyển qua Excel mình không làm được), ưu điểm của file này là nhập liệu nhanh do không phải chọn mã hàng khi nhập liệu mà vẫn cập nhật số lượng xuất nhập tồn chính xác từng ngày theo mã hàng, hạn sử dụng, vị trí mã hàng trong kho, mình ở TP HCM nếu bạn cũng ở HCM thì mình muốn gặp bạn để trao đổi 1 chút được không? sđt của mình là 0898.249.816. Quản lý dữ liệu trên file của mình khác với tất cả các phần mềm quản lý kho trên thị trường hiện giờ ( do nhập liệu không phải click chọn mã hàng ) và còn nhiều thứ khác nữa... Ps: còn 1 yêu cầu nữa là khi cập nhật phiếu xuất nhập hàng phải gợi ý số lượng còn tồn kho của mỗi mã hàng còn bao nhiêu theo hạn sử dụng và vị trí kho. Làm hay không làm tuỳ bạn nhưng mình cũng muốn gặp bạn ở ngoài nhe ( nếu có thể mình tổ chức họp fan kênh Excel so easy nhe).
@khamphacuocsontv2020 Ай бұрын
Video chia sẽ cách sử dụng hàm trong excel bổ ích.
@ActiveLearningforAll Ай бұрын
Bài giảng rất dễ hiểu. Cảm ơn bạn đã chia sẻ
@Cule1502 Ай бұрын
Rất hữu ích. Cám ơn bạn rất nhiều!
@khamphacuocsontv2020 Ай бұрын
Cách làm hay và rất bổ ích
Ай бұрын
Tui k rành máy tính chứ mà rành thì học theo biêt dau may mắn trúng thật
@hungbk96 Ай бұрын
Cảm ơn bạn
@HungAnhNguyen-sm9hw 2 ай бұрын
Mình đã dùng lại code của bạn nhưng khi chạy thì kết quả báo lỗi #VALUE!. Giúp mình tìm ra lỗi với. Xin cảm ơn bạn nhiều Function udfTextJoin(txtRange As Range, Optional delimiter = ",") Dim Result As String Dim i As Integer Dim Arr() As Variant Dim arList As Object Set arList = CreateObject ("System.Collections.Array1ist") Arr = txtRange For i = 1 To UBound(Arr) If Arr(i, 1) <> "" Then If Not arList.contains(Arr(i, 1)) Then arList.Add (Arr(i, 1)) Result = Result & Arr(i, 1) & delimiter End If End If Next udfTextJoin = Left(Result, Len(Result) - Len(delimiter)) End Function
@sendahoasu 2 ай бұрын
Function udfTextJoin(TextRange As Range, Optional Delimiter As String = "|") Dim textString As String Dim ArrayList As Object Dim ArrRange() As Variant Set ArrayList = CreateObject("System.Collections.Arraylist") ArrRange = TextRange.Value Dim i As Long For i = 1 To UBound(ArrRange) If ArrRange(i, 1) <> "" Then If Not ArrayList.contains(ArrRange(i, 1)) Then ArrayList.Add (ArrRange(i, 1)) textString = textString & Delimiter & ArrRange(i, 1) End If End If Next udfTextJoin = Right(textString, Len(textString) - 1) End Function
@nobitatran5104 2 ай бұрын
mình muốn làm cái 6/55 thì sao vậy bạn
@hungphamvan9641 2 ай бұрын
Hay quá bro !!
@honganh814 2 ай бұрын
Làm theo nhưng vẫn k lấy lại được file chưa save ah
@VNDemiGod 2 ай бұрын
Đổi region sang UK cho cùng kiểu ngày tháng như VN cũng được
@hoangtulangtai 2 ай бұрын
Hay quá, cảm ơn bác
@duongquapham1486 2 ай бұрын
Hay quá e
@lavenderlinh4158 2 ай бұрын
Nếu tính phần trăm mình muốn bỏ dấu% đi phải làm sao ạ
@phongpham2182 3 ай бұрын
Có cách nào để lấy ngược lại từ phải sang trái ko bạn. Cho mình xin đoạn code đó đi
@trungnguyen9157 3 ай бұрын
Đã áp dụng, thấy hữu ích Cám ơn bạn
@binhanbuiuc973 4 ай бұрын
Có ai đã nghiên cứu được quy luật quay số vietlot chưa, xjn chỉ giáo
@quynhtrandinh6562 4 ай бұрын
Sử dụng với nhiều dữ liệu có nhanh ko ạ
@giodoc8x 4 ай бұрын
Có cách nào mà mình ko làm cột phụ ko add ơi
@rymku5008 4 ай бұрын
-- "Ở phút thử 20:20". Khi mình cho cái button"Tìm phòng trọ" của mình xuất hiện cái Messengerbox. Khi mình gán cái menuControl vào button đó, sau đó click vào thì mình bị lỗi "The item with the specified name wasn't found" ở sName. có bạn nào bị lỗi như mình và biết cách xử lí không ạh !
@nat.tulamo 5 ай бұрын
Phòng có hạn, mình nghĩ nên để những code hình phức tạp đó thành drop down list sẽ tiện hơn
@user-rm7dj9wx8o 6 ай бұрын
mình bị lỗi phần 4 , không tạo nút save được bạn nào có file cho mình xin , mình cảm ơn
@user-rm7dj9wx8o 6 ай бұрын
phần 4 mình tạo lỗi không save được cho mình xin file dc không ạ. xin cảm ơn
@nguyenuc1371 6 ай бұрын
Thank you sir.
@excelsoeasy 6 ай бұрын
drive.google.com/file/d/1sm4AF9QFOnN_DJK0usKl1Xqmvwe_eSUK/view?usp=drive_link
@thangha3811 6 ай бұрын
mail của anh là gì vậy ạ? em có file lọc số trùng mong anh giúp đỡ ạ
@excelsoeasy 6 ай бұрын
drive.google.com/file/d/1sm4AF9QFOnN_DJK0usKl1Xqmvwe_eSUK/view?usp=drive_link
@hunghuynh2145 7 ай бұрын
haha, bạn nc rất dễ thương, cám ơn ban
@cub7968 7 ай бұрын
cảm ơn bạn
@excelsoeasy 7 ай бұрын
oh, cám ơn bạn
@vinhlengoc7888 4 ай бұрын
Làm bảng tính tiền lô đề và dò tự động số trúng phí bao nhiêu vậy bạn
@lechidiep 7 ай бұрын
Làm như này m ng lại nghĩ IT nó có thể ưu tiên người trúng ( kiểu kiểu như bấm số xe). Tin tui đi.
@excelsoeasy 7 ай бұрын
khong đâu. hàm random nó ko điều khiển đc.
@excelsoeasy 7 ай бұрын
Với lại cái này phòng kế toán làm đc mà đâu cần IT
@lechidiep 7 ай бұрын
@@excelsoeasy nếu vậy sẽ đổ thừa người làm file, nói chung file thì quá OK rồi, nhưng áp dụng thực tế lại có nhiều cái phũ phàng lắm, ví dụ KT làm file, lỡ xui năm đó quay vô toàn phòng KT trúng giải cao không thì sẽ có dư luận thôi ah, đời nó kì lắm hii
@lechidiep 7 ай бұрын
@@excelsoeasy cái vấn đề mình nói là nếu như ai cũng biết như mình thì quá OK, còn như list danh sách trúng bao gồm công nhân xưởng thì họ có biết hàm gì đâu, cứ nghĩ mấy cha này làm ra chắc thế nào cũng ưu tiên phòng ổng hoặc ông A, bà B....này tôi cũng từng làm 1 năm cho cty tui rồi, cuối cùng quay về bốc thăm há há. Bởi nhiều khi tư tưởng con người nó kéo lùi công nghệ là vậy, chứ file của bạn là tuyệt vời rồi k có gì phải bàn hi
@hehequang 7 ай бұрын
Chưa hiểu lắm. T tưởng cái này chỉ cần copy paste chứ nhỉ?
@buithingocai8720 8 ай бұрын
Cho mình hỏi, mình đã làm được như bạn chỉ nhưng mà khi nhập dữ liệu vào bảng tổng, thì lại phải lặp lại việc Filter cho toàn bộ dữ liệu bao gồm vùng dữ liệu mới nhập, vậy có cách nào chỉ cần filter 1 lần mà khi nhập thêm vào bảng tổng thì các sheet nó sẽ tự cập nhật luôn ko bạn. Mình đã thử chọn cả phần dữ liệu trống nhưng không được. Cảm ơn bạn.
@excelsoeasy 8 ай бұрын
Hiếu, cách này thì không làm đc. Nếu muốn làm như vậy thì phải dùng code VBA. bạn có thể tham khảo thêm về SQL kzbin.info/aero/PLkHKycgB3ww8_j5B9kCud3URKIQC2yZUe. Mình sẽ dùng SQL kết nối đền file hoặc sheet rồi lấy dữ liệu về đưa qua sheet mà bạn cần. Nó cũng giống như filter thôi
@thuonghaxuan5477 4 ай бұрын
bạn đã tìm đc cách chưa vậy mình xem video nhưng có vẻ không đúng thứ mình cần như bạn :(
@Ngoc_TinVp 8 ай бұрын
bạn cho mình hỏi nếu muốn copy sheet từ excel đang mở sang 1 excel khác thì code thay đổi ntn a? cám ơn bạn nhiều.
@excelsoeasy 8 ай бұрын
Nghiên cứu sql như video là ok lắm bạn
@Ngoc_TinVp 8 ай бұрын
@@excelsoeasy mình đang muốn tìm hiểu cách copy dữ liệu báo cáo của mình vào file báo cáo của sếp để khi sếp mở có đc kêt báo cáo luôn, nhờ bạn tư vấn
@excelsoeasy 8 ай бұрын
@@Ngoc_TinVp làm theo series SQL là đc à. Ngâm cứu đi
@DouyinEntertainment 8 ай бұрын
Mà vietlott nó bịp mà, vé nào số nào bán ở đâu đều nằm trên hệ thống của nó hết, nó tính toán đc sẽ sổ số nào bn sẽ hạn chế đc số tiền trúng chi ra hết, mấy bạn nghĩ quay mấy quả bóng như z là minh bạch hả, ko có đâu, có chiêu trò bịp trong đó hết, bóng nhẹ, bóng nặng, độ nghiên các kiểu đều có thể kiểm soát đc kết quả hết, ko có chuyện vietlott ko kiểm soát đc kết quả đâu, nói chung toàn cú lừa, những con thiêu thân cứ lao vào 😂😂😂😂😂
@trunghuong6781 8 ай бұрын
Chỉ cách lập trande đi add
@zhilwan3511 8 ай бұрын
Yaw ayaw yay yaw yaw waw yaw myaw myaw yaw
@meovatnhonhat2592 9 ай бұрын
ad cho em hỏi sau khi điền 2 dòng code sysInfo.Range("B3").Value = ShapeName sysInfo.Range("B4").Value = ShapeText thì khi e click chọn Table 3 nó vẫn hiện Table 1. và trong sysinfo dòng B3, B4 hiện ShapeName tbl_3 ShapeText Table 3 Vậy giờ mình nên làm gì ạ
@excelsoeasy 9 ай бұрын
Thua.
@meovatnhonhat2592 9 ай бұрын
@@excelsoeasy em cũng chịu làm ra i chang clip hướng dẫn tới khúc đóa fail. Tứk chết
@sendahoasu 9 ай бұрын
@@meovatnhonhat2592 debug thử xem. vào lại vba Editor, trên em đặt debug ngay lệnh đó. Xong rồi trở lại excel Click thử xem nó ra lỗi gì. lên mạng tìm Debug trong VBA đi
@KhanhPham-ij2hw 9 ай бұрын
mình muốn truy vấn 2 file trong 1 folder có liên kết dữ liệu theo 1 cột thì phải làm sao ?
@sendahoasu 9 ай бұрын
bỏ nó vào 1 array rồi loop nó
@khoivk776 9 ай бұрын
láy 3 số ở côt B làm sao Bạn. Help me. Thanks!!
@brandon93087 9 ай бұрын
🤪🤪🤪🤪🤪👍👍👍👍👍❤❤❤❤❤
@TuanLe-qz2zg 9 ай бұрын
Hi bro, mình cũng mới vừa tự học VBA, mình dựa vào sườn code của b để mình viết code nhưng tới bước chọn nhiều file để bung ra thì bị lỗi nhưng chọn 1 file bung ra thì lại k, b có thể xem giúp mình sai ở chỗ nào đc k ? Đây là code mình viết Sub TH_DATA() Dim CNN As Object, RST As Object Dim SQL As String, PRO As String, EXT As String Dim I As Integer, HDR As Integer Dim FILE_NAME As Variant Application.ScreenUpdating = False Set CNN = CreateObject("ADODB.Connection") Set RST = CreateObject("ADODB.Recordset") PRO = "Provider = Microsoft.ACE.OLEDB.12.0; Data Source =" EXT = ";Extended Properties =""Excel 12.0 Xml; HDR = Yes;IMEX = 1"";" FILE_NAME = Application.GetOpenFilename("Excel Files,*.xlsx", , , , True) Sheet1.UsedRange.ClearContents For I = LBound(FILE_NAME) To UBound(FILE_NAME) CNN.Open PRO & FILE_NAME(I) & EXT SQL = "Select * From [Sheet1$]" RST.Open SQL, CNN For HDR = 0 To RST.Fields.Count - 1 Sheet1.Range("A1").Offset(, HDR) = RST.Fields(HDR).Name Next HDR Sheet1.Range("A" & Rows.Count).End(xlUp).Offset(1, 0).CopyFromRecordset RST Next I RST.Close CNN.Close Set RST = Nothing Set CNN = Nothing Application.ScreenUpdating = True End Sub