Kết quả tìm kiếm

Cần gì phải code. Dùng Text-to-Columns xem sao!

Bảng check không công kéo từ 3 ngày trở lên mà tính vậy thì có đúng hay không? (vd: Ở 1 tuần khác cũng có nghỉ 3 ngày trở lên thì tính thế nào?) Theo mình thì nên tìm hàm tính số lần xuất hiện liên tục với điều kiện lớn hơn 3 thì lấy, còn nhỏ hơn 3 thì không tính. Xin lỗi nếu hiểu sai ý của bạn!

Mình sửa lại ở #6 rồi bạn. Nhờ bạn test giúp mình!

Thử xem nhé bạn! Public Sub BangB() Dim sArr(), dArr(), Tmp, I As Long, J As Long, K As Long, Rws As Long If Sheets("Bang A").Range("A4") <> Empty Then sArr = Sheets("Bang A").Range("A4", Sheets("Bang A").Range("A10000").End(xlUp)).Resize(, 3).Value Rws = UBound(sArr)...

=OFFSET($A$1,MOD(ROWS($1:1)-1,ROWS(vung)),INT((ROWS($1:1)-1)/(ROWS(vung)))) : kéo xuống Đăt tên vung = $A$1:$E$6

Bạn @Phuocam code thiệt đi tề. Người ta để mục lập trình mà bạn bắt thử hàm. File có 1000 sheets.. ghê thật!

Đọc bài thấy có gì đó ảo ảo thì phải. Quy đổi ra gạo.... nhưng dự kiến giá thóc... Mình thấy giá thị trường thì thóc với gạo khác nhau hoàn toàn.

Định dạng mm/dd/yyy đâu có liên quan đến ngày âm lịch sai.

09/03/2022 DL là ngày 07/02/Nhâm dần.

Vâng ! cảm ơn anh rất nhiều.!

Nhờ anh @giaiphap sửa code tương tự bị thiếu mất 1 dòng và sắp xếp tên sản phẩm theo thứ tự tăng dần giúp em với ! Public Sub GPE() Dim Dic As Object, sArr(), dArr(), Txt As String Dim i As Long, K As Long, R As Long, Rws As Long, col As Long, xRow As Long, xCol As Long With Sheets("Sheet1")...

Bác ấy nói là do hậu covid đó anh.

Lên kế hoạch tiến về Sài Gòn Anh @giaiphap ơi. hẹn gặp lại Anh!

Mình ở xa TPHCM nên đăng ký trước một suất nhé @moneymong.pt ! Năm nay có nháp trước không bác @SA_DQ để chuẩn bị đến sớm.!

Em có code này trên GPE gần giống yêu cầu của chủ thớt. code tự tìm file nguồn, sheet nguồn trong một Folder. khác với yêu cầu của chủ thớt là Openfile theo đường dẫn khác. Anh có thể sửa lại đúng yêu cầu của chủ thớt giúp em.

Sài gòn hết nhân tài hay sao mà đưa ông này lên làm Giám đốc sở.

Dùng hàm tự tạo trên GPE. Option Explicit Function AbbName(ByVal Text As String, Optional ByVal Delimiter As String = vbNullString, Optional ByVal IncName As Boolean = False) As String Dim sPart1 As String, sPart2 As String, sp As String, lPos As Long sp = Space(1) If InStr(1, Text, sp)...

Tham gia được 2 lần tại TPHCM.

Sửa lại dòng tiêu đề theo code là được. STT Masp Soluong Dongia ThanhTien

Anh đăng ký 01 áo: Size: L nha em M.T. Tài khoản chuyển muộn so với thời gian đăng ký vài hôm.