Nhờ mọi người lập trình lại marco (1 người xem)

[PhuongPB]

Mình có 1 vài vấn đề trong file excel dính kèm, mong mọi người giúp đỡ.

1. Phiếu xuất (PX)001/07, PX002/07, PX005/07 và Phiếu nhập (PN)019/07 bị lỗi không chạy được marco

2. Có cách nào chạy maro để Phiếu yêu cầu nhập kho (PYCNK) và Phiếu yêu cầu xuất kho (PYCXK) không còn dòng trống bên dưới chữ ký. VD: Chạy PX004/07, không cần 02 dòng 14 và 15

3. Phần ký tên để rộng thêm 02 dòng

4. Ô E5 sheet 2 sử dụng công thức nào để lấy dữ liệu ngày ở cột B sheet 1

5. Trong PYCXK thêm dòng tổng cộng cho cột “SL yêu cầu”

6. Trong PYCNK thêm 02 dòng VAT 10% và tổng cộng cho cột “Thành tiền”

Thanks

 

[Hoang2013]

1. Phiếu xuất (PX)001/07, PX002/07, PX005/07 và Phiếu nhập (PN)019/07 bị lỗi không chạy được marco

Với FX001/07 có hơn 32 dòng dữ liệu (bên CSDL); Nhưng khai báo mảng cần chứa chúng lại chỉ là

ReDim dArr(1 To 11, 1 To 6)

Thì không báo lỗi mới lạ;
Khi chạy macro & báo lỗi, bạn rà chuột vô tham biến W sẽ thấy trị của nó đang là 12;

Bạn tự tìm các lỗi trong những trường hợp khác đi nha.

(Mình thấy macro này quá quen!)

 

[PhuongPB]

Với FX001/07 có hơn 32 dòng dữ liệu (bên CSDL); Nhưng khai báo mảng cần chứa chúng lại chỉ là

ReDim dArr(1 To 11, 1 To 6)

Thì không báo lỗi mới lạ;
Khi chạy macro & báo lỗi, bạn rà chuột vô tham biến W sẽ thấy trị của nó đang là 12;

Bạn tự tìm các lỗi trong những trường hợp khác đi nha.

(Mình thấy macro này quá quen!)

File này bạn tạo cho mình mà. Mình có biết lập trình marco đâu

 

[SA_DQ]

File này bạn tạo cho mình mà. Mình có biết lập trình marco đâu

Lúc bạn đưa file giả lập lên, chắc chỉ có vài ba dòng trong 1 fiếu nhập hay xuất, nên mới nên nổi!
Lí ra lúc đó bạn cần nêu là mỗi loại fiếu có thể tối đa là 40 dòng thì đã là chuyện khác.
Mà mình theo thông thường chưa thấy fiếu nhập/xuất nào đến từng í mặt hàng!

Cách khắc fục:
Tăng số dòng cho fiếu để chứa hết số mặt hàng tối đa, đồng thới tăng chỉ số của biến mảng lên ngần í nữa. & lần sau nên rút kinh nghiệm về chuyện cung cấp thông tin để khỏi tự mình làm tốn thời gian của mình.

Xin hỏi bạn lần cuối: Số dòng tối đa của 1 loại fiếu cao nhất là bao?

Chúc vui!

 

[PhuongPB]

Lúc bạn đưa file giả lập lên, chắc chỉ có vài ba dòng trong 1 fiếu nhập hay xuất, nên mới nên nổi!
Lí ra lúc đó bạn cần nêu là mỗi loại fiếu có thể tối đa là 40 dòng thì đã là chuyện khác.
Mà mình theo thông thường chưa thấy fiếu nhập/xuất nào đến từng í mặt hàng!

Cách khắc fục:
Tăng số dòng cho fiếu để chứa hết số mặt hàng tối đa, đồng thới tăng chỉ số của biến mảng lên ngần í nữa. & lần sau nên rút kinh nghiệm về chuyện cung cấp thông tin để khỏi tự mình làm tốn thời gian của mình.

Xin hỏi bạn lần cuối: Số dòng tối đa của 1 loại fiếu cao nhất là bao?

Chúc vui!

Vì bên công ty mình nhập xuất văn phòng phẩm nhiều nên có tháng lên tới 50 mặt hàng lận

Bạn có thể bỏ những dòng tróng được như vấn đề số 2 cho minh dược không.

Thêm dòng VAT 10% và tổng cộng cho phiếu yêu cầu nhập kho

 

[SA_DQ]

(1) Bạn có thể bỏ những dòng tróng được như vấn đề số 2 cho minh dược không.
(2) Thêm dòng VAT 10% và tổng cộng cho phiếu yêu cầu nhập kho

(1) Bạn nên dịch các câu lệnh này sang tiếng Việt là giải quyết được vấn đề thôi; Bạn thử trước xem sao:

    If W = 0 Then GoTo GPE
    If W <= 2 Then W = 3
    Rows(13 + W & ":23").Hidden = True

Gợi í: Tại sao lại viết là W=1 thì dời nó đến W=3
(2) Chuyện này bạn làm cũng được mà; Này nhé:

a./ Bạn đẩy dòng 26 hiện tại xuống 29 (thêm 3 dòng)
Thêm vô dòng 26 & 27 (mới) những từ ngữ & công thức thích hợp cho các ô là được.

Chúc thành công trong ngày!

 

[PhuongPB]

(1) Bạn nên dịch các câu lệnh này sang tiếng Việt là giải quyết được vấn đề thôi; Bạn thử trước xem sao:

    If W = 0 Then GoTo GPE
    If W <= 2 Then W = 3
    Rows(13 + W & ":23").Hidden = True

Gợi í: Tại sao lại viết là W=1 thì dời nó đến W=3
(2) Chuyện này bạn làm cũng được mà; Này nhé:

a./ Bạn đẩy dòng 26 hiện tại xuống 29 (thêm 3 dòng)
Thêm vô dòng 26 & 27 (mới) những từ ngữ & công thức thích hợp cho các ô là được.

Chúc thành công trong ngày!

Thanks bạn chỉ dẫn

Nhưng mình không biết lập trình marco

File trên do bạn Hoang2013 tạo cho mình

 

[SA_DQ]

Thì bạn làm theo chỉ dẫn đi; Có lập trình cái chi mô; Chỉ là những thao tác chuột & gõ vô bàn fím mà!
Macro thì thử chạy sau mỗi lần đổi cái gì đó trong thiết kế xem sao. Đừng sợ hư nếu bạn đừng lưu thay đổ là được mà

 

[PhuongPB]

Thì bạn làm theo chỉ dẫn đi; Có lập trình cái chi mô; Chỉ là những thao tác chuột & gõ vô bàn fím mà!
Macro thì thử chạy sau mỗi lần đổi cái gì đó trong thiết kế xem sao. Đừng sợ hư nếu bạn đừng lưu thay đổ là được mà

Khi mình insert thêm 1 dòng hay đẩy dòng xuống thì chỗ phần ký tên nhảy chữ lung tung

 

[thuhuonglee]

Mình cũng thích macro lắm,nhưng mỗi lần cắn 1 miếng là thấy "mắc cổ" ah!

 

[PhuongPB]

Không ai rãnh giúp mình sao hixhix

 

[PhuongPB]

Up

 

[PhuongPB]

Up