Kết quả tìm kiếm cho từ khóa: Co giản dòng

Đây là đoạn code của bạn befaid dùng để xoá dong trống nhưng mình chưa biết thêm vào đâu để chạy tiếp sau khi chạy xong code gộp log Main phụ() Dim Rng As Range Set Rng = Sheet3.UsedRange Application.ScreenUpdating = Sai RemoveBlankRows Rng Application.ScreenUpdating = True...

Tôi chỉ biết một cách là duyệt từng dòng text, tìm dòng trống rồi xoá và cách làm này tất nhiên sẽ mất thời gian vì chạy vòng lặp. (Cách tôi đang làm ở trên là đọc toàn bộ file một lần chứ không đọc từng dòng) Do đó theo tôi thì chỉ nên code xoá dòng trong tác vụ kế tiếp khi thao tác trên dữ...

Mình chưa rõ dùng cái này, bạn hướng dẫn mình được không?

Chào các bạn, Sau quá trình học hỏi các bạn trên diễn đàn và sưu tầm tài liệu trên internet. Hôm nay mình chia sẻ các bạn tiện ích cho Excel. Link tải tiện ích: Đã xóa Link hướng dẫn cài đặt và sử dụng: Đã xóa Tính năng: Định dạng văn bản: in hoa, thường, viết hoa chữ cái đầu từ mỗi câu, viết...

Thêm tính năng ẩn dòng tự động kèm giãn dòng khi in ấn quá tuyệt vời tác giả ah.

@jerryhg Bạn gộp đến dòng 12 hoặc chỉnh chiều cao dòng 12. Chia đều chiều cao có ở phiên bản cũ, phiên bản mới tôi đã đổi giải thuật giãn dòng. Có thời gian tôi sẽ cập nhật lại

e dùng thì nó bị ntn e đã gộp B8:L11,B14:L17 nhưng khi giãn n lại chỉ giãn thằng 1 dòng đầu là thằng B8 và thằng B14 có cách nào để cho mấy thằng gộp kia n cũng giãn đều không ạ?? e cảm ơn trên là giải pháp tạm thời của e nhưng khi tới dòng rỗng thì nó sẽ thừa ra mấy đoạn rất chướng mắt

Hôm nay tôi lại chia sẻ cho các bạn một hàm mã hóa chuỗi Unicode Tiếng Việt để dễ dàng viết chuỗi tiếng Việt vào trong VBA với kiểu gõ Telex đặc trưng của người Việt. Lý do tại sao lại mã hóa? là vì trong VBA chỉ hỗ trợ lưu mã với một dạng mã hóa nhất định không hỗ trợ ký tự Unicode, nên cần...

Thớt lười làm tay chứ gì nữa. Nhưng mà thôi coi như gặp lúc tôi muốn thử lại nghề lấy chỉ số mảng của mình: Công thức tại A1, kéo qua O1 là 15 người, kéo xuống dòng 72 là 72 ngày. Cột R, S là tôi chứng minh một người làm tối đa 45, tối thiểu 42 ngày; đạt điều kiện. Luu ý là tôi chỉ nói bài #1...

Làm việc với CSDL Access đa người dùng mà bạn không xài tính năng ưu việt của nó là Split Database thì là một thiếu sót lớn. Việc nhập liệu đa người dùng sẽ phải gặp tình trạng nhập trùng số phiếu khi 2, 3 người cập nhật dữ liệu cùng lúc, hiếm khi nhưng vẫn có và phải có giải pháp chống nhập...

Câu trả lời ngắn gọn là: được. Với điều kiện: Bạn quy định dòng nào trong tình trạng là "giãn"? (rowHeight=?)

Các bác cho em hỏi có cách nào lọc được hàng chưa được giãn dòng không ạ

Bạn không có căn bản về lập trình và ngữ pháp VBA cho nên "hiểu" sai rồi. Theo ngữ pháp, chỗ nào có lệnh "rẽ nhánh" mới xảy ra chuyện "nhảy". Nếu không có lệnh rẽ nhánh thì VBA cứ tự nhiên đí tiếp xuống. Các lệnh rẽ nhánh: - Goto, Goto CaiGiDo. CaigiDo là một mốc (địa chỉ) để Goto biết chỗ mà...

Code này thì bỏ luôn cái regex kia nha, bạn test lại: Option Explicit Option Compare Text 'Phan biet hoa-thuong thi bo dong nay Sub SplitData() Dim a(), b(), i&, j&, k&, x&, tmp With Sheets("Sheet1") a = .Range("A2:A" & .Cells(Rows.Count, "A").End(xlUp).Row).Value ReDim b(1 To UBound(a))...

Cho em hỏi thêm đoạn này SheetName = "Sheet1": RangeAddress = "B2:K2" em lấy được dữ liệu từ ô B2 đến K2 Em thử nhân 3 lần lên để lấy được dữ liệu của B5:K5 & B6:K6 nhưng thời gian cũng nhân 3 lần lên (Em làm với 1000 file). Bác xem giúp em cho nó lấy cùng lúc với B2:K2 và chuyển đổi hàng...

trường hợp này của mình tự bỏ filter rồi làm tiếp thì không được. Do đang dùng chức năng lọc nâng cao theo Ngày giao thành công trong khoảng thời gian chỉ định của app KuTools. Lọc xong rồi nhờ code của bạn Cu Tồ phân loại Người gửi theo SĐT để trả tiền COD. Hiện tại đang kết hợp thêm code bạn...

Giờ con mới xem code đúng là rất công phu chú ạ. Tạm thời con nhờ anh 'rô bốt' dịch giúp đã ạ rồi sau khi có thời gian con nghiên cứu lại: Sub NXT() Dim DictTon As Object, DictNX As Object Dim IDKey As String, WH As String, Item As String Dim NextRw As Long, LastRw As Long, Rws As...

Dù sao đi nữa thì bạn cũng nên tỏ thái độ tôn trọng với bác SA-DQ (Thành viên lớn tuổi nhất GPE, có lẽ sắp có cháu cố rồi cũng nên). Quay lại với đề tài của bạn, cách của tôi là duplicate sheet, tạo sheet "trùng", dùng 3 cột cuối để tách giờ, và lồng hàm COUNTIFS Sau đó xóa hết các cột và dòng...

Chỗ này ((KVLV=F7)+(KVLV=F9)+(KVLV=F14)) thay thế bằng (LEFT(KVLV,3)="Khu") gọn hơn Hoặc có thể tham khảo thêm công thức : =SUMPRODUCT(1/(COUNTIF(ngayNM,ngayNM))*(ngayNM>=J7)*(ngayNM<=L7)*(DKLK=160)*(LEFT(KVLV,3)="Khu"))

Chịu khó chép lại nha!