Ở File Mẫu thu (2), cột Đơn Giá. Em muốn lấy giá dựa theo loại hàng và ngày của phiếu. Em muốn giá nó tự động lấy giá theo ngày của phiếu ở khoảng ngày bên sheet DL Giá .
Em có tìm hiểu bên ytb, thấy 1 bạn chỉ để loại hàng theo hàng dọc. Em thấy hơi khó xem, nên em muốn để theo hàng ngang.
Em...
Vẫn dùng spin button hoặc không, nhưng viết code tạo vòng lặp từ a đến b (số nguyên giống như nhấn spin). Câu lệnh là ActiveSheet.PrintOut
Tuy vậy, code luôn luôn chạy nhanh hơn máy in nên cẩn thận máy in bị tràn bộ nhớ.
Cảm ơn bạn @ptm0412 đã rất tận tình với vấn đề của mình đưa ra!
Hôm nay mình mới có thời gian để trả bài cho bạn được, mong bạn bỏ chút thời gian xem lại giùm mình với.
Với mong muốn xử lý hồ sơ được tối ưu, nên mình muốn việc ẩn hiện dòng không cần đến nút Spinner. Vì khi in nhiều hồ sơ mình...
Từ sáng giờ loay hoay đủ cách của các bạn chỉ bảo mà nó vẫn không chịu chạy đúng ý đồ. Mình xin gửi lại file và nói rõ ý đồ của mình hơn để các bạn dể dàng giúp đỡ. File này có 2 sheet, 1 sheet dữ liệu gốc (DATABASE) và 1 sheet xuất kết quả (PHIEU KET QUA THI NGHIEM). Tại sheet xuất kết quả ô...
Nên được đặt sự kiện vào Spinner Change, nháy phải lên Spinner gán macro (edit để tạo mới) rồi dùng code sau
Sub Spinner5902_Change()
Rows("25:35").Hidden = False
If Range("$Q$24").Value + 26 < 35 Then
Rows((Range("$Q$24").Value + 26) & ":35").Hidden = True...
Cảm ơn bạn nhiều, mình hiểu ý định của bạn, nhưng công thức ở Q24 là không thể thay đổi, vì chính nó quyết định đến việc tự động ẩn hiện dòng, còn ở cột P là chỉ để đánh giá, nhiều khi đánh giá ko đạt nhưng vẫn phải hiển thi để xuất hồ sơ
Tuổi tác chưa khi nào là vấn đề (có tuổi thì không dùng từ chat chit như "ko"). Bạn đọc không vào, thì bạn hỏi lại cho đến khi vào. Tôi thì quan tâm còn bạn thì thay vì hỏi lại cho "vào" lại lo giải thích chuyện không đáng.
Tạo 1 module, dùng thủ tục sau và gán cho cái spin button. Nếu làm...
Theo
Theo gợi ý của Anh @ptm0412 bạn thử làm theo cách sau:
1 /Xóa bỏ công thức ở Q24
2/ Thêm đoạn code sau vào module Sh PHIEU...
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim t&
If Target.Address = "$Q$24" Then
For Each Rng In [P26:P35]
If Rng = "P" Then t = t + 1...
Mình có file như đính kèm và đã có đoạn mã code, tuy nhiên đoạn mã code ẩn dòng có điều kiện cho địa chỉ Q24 của sheet PHIEU KET QUA THI NGHIEM chỉ chạy được khi đánh vào, còn khi nó là giá trị của công thức thì không thể chạy được. Anh/chị/em rành về mã code có thể sửa giúp mình với
Mình xin...
Nói rõ vậy mà bạn vẫn không hiểu à. Lại càng chứng tỏ phía trên là nói đại cho vui.
Từ Office 2016 khi cài đặt ấn 1 phát là cài tuốt tuồn tuột. Không có cái chuyện chọn chiếc gì cả như bạn nói. Bạn đã hiểu chưa?
Muốn cài đặt riêng cái gì đó thì trình độ phải ở dạng không tầm thường.
Làm như thế...
khi cài đặt nó có chỗ chọn các ứng dụng mình cần cài mà. em chọn mình excel ( cả word và pp ko chọn luôn , khi cần soạn các hợp đồng hay phiếu xuất gì em cũng làm luôn excel)
1731121015
???
1 dấu hỏi lớn trong lòng em :(
VD về stock reconciliation:
- một vế: tổng nhâp - tổng xuất = tổng phát sinh trong tài khoản hàng
- vế thứ hai: tổng các hóa đơn nhập - tổng các phiếu xuất liên quan đến hàng.
Hai vế phải là hai số cân nhau.
Thường thì tổng các hóa đơn nhập và tổng các phiếu xuất làm rất thủ công và khó cho nên...