Sửa Code trong UsesForm nhập Giúp em với (1 người xem)

[quoc nhat]

Em có cái Form nhập nhưng trong File. Em vừa tự làm. Vì kiến thức VBA kém quá nên làm nó chạy bị sai
Các tiền bối giúp em với.
trong Txtsoluong 1-2-3-4-5 nó không vào đúng ô và khi nhập số lượng vào đó ví dụ là 10 khi nó chuyển qua worksheet thì không phải là 10 nữa
và em không biết sắp xếp tab thế nào để khi nhấn enter để nó nhảy theo ý muốn cả
như: họ tên -tuổi-địa chỉ -mã bhyt - hạn dùng từ - đến - chẩn đoán - mã bệnh - mã thuốc 1 -số lượng 1-
mã thuốc 2 -số lượng 2 -mã thuốc 3 -số lượng 3- mã thuốc 4 -số lượng 4-mã thuốc 5 -số lượng và giúp em làm cái button tạo mới cho usesform nữa với nhé

 

[hanhpptc]

Em có cái Form nhập nhưng trong File. Em vừa tự làm. Vì kiến thức VBA kém quá nên làm nó chạy bị sai
Các tiền bối giúp em với.
trong Txtsoluong 1-2-3-4-5 nó không vào đúng ô và khi nhập số lượng vào đó ví dụ là 10 khi nó chuyển qua worksheet thì không phải là 10 nữa
và em không biết sắp xếp tab thế nào để khi nhấn enter để nó nhảy theo ý muốn cả
như: họ tên -tuổi-địa chỉ -mã bhyt - hạn dùng từ - đến - chẩn đoán - mã bệnh - mã thuốc 1 -số lượng 1-
mã thuốc 2 -số lượng 2 -mã thuốc 3 -số lượng 3- mã thuốc 4 -số lượng 4-mã thuốc 5 -số lượng và giúp em làm cái button tạo mới cho usesform nữa với nhé

File bạn làm rất khó hiểu. Tại sao khi xuất không theo dõi mà chỉ trừ vào tồn? Dữ liệu xuất lấy đâu ra mà để truy vấn khi cần thiết? Mình đang bận có chút việc. Mình sẽ thiết kế lại sau cho, hen bạn sáng mai ngày 30/6/2012 nhé.
- Về giá xuất cố định hay thay đổi (thường là thay dổi). Vậy phải theo dõi theo ngày kể từ ngày thay đổi.
- Về đơn thuốc: có tối đa mấy dòng (vì theo mình hiểu đây là mẫu in sẵn)
Bạn hãy trao đổi với mình nhé

 

[quoc nhat]

sửa lại code cho Form

Do em không được học kỷ về phần lập trình này nên chie biết làm đến đáy thôi. mong anh thông cảm và chỉ bảo giúp em với. Thực sự em rất muốn có file giống như là phần mềm chuyên dụng để quản lý nhưng tìm mải mà không thấy. Anh dựa trên file của em và thiết kế lại giúp em với. File gồm các thành phần: 1. Phieux xuất 2. Cơ sở dữ liệu - Thẻ kho ( trong đó gồm nhập đầu kỳ - xuất trong kỳ - tồn cuối kỳ) và 3 là truy vấn có nghĩa là khi em đánh một mã thuốc nào đó thì nó sẽ cho em biết nhập.-xuất - tồn của thuốc theo mã mà em muốn kiểm tra.
- về giá xuất: thường có sự thay đổi do hàng nhận từ bệnh viện tuyến huyện nên loại thuốc nào mà không có thì em sẽ thay đổi chính mã và tên thuốc củ = mã mới + tên mới trên dòng đó luôn và không cần theo dỏi hạn dùng của thuốc đâu.
gVD em còn tồn trong kho 1000 viên Amoxcilin 500 mg em chỉ muốn theo dỏi nó đã xuất hết hay chưa thôi, nếu hết em chuyển sang loại thuốc mới nhập về. 1 tháng em nhập kho 1 lần trong đó : VD cùng 1 loại thuốc như trên trong kho tồn 1000 viên và em nhận về thêm 1000 viên nữa em sẽ cộng nó vào tồn đầu kỳ để tiếp tục xuất mới cho tháng khác
- về đơn thuốc không kể mấy dòng trên thì mỗi đơn chỉ có 5 hàng để ghi thuốc ( 5 loại thuốc khác nhau) từ A174 : F178 ( như trên sheet" phieuxuat in" nhưng có khi chỉ có 1 thuốc trên 1 đơn hoặc 2 ,3, 4... nhưng em cần sheet "phiếu xuất in" để in phiếu thanh toán rồi lấy dữ liệu từ đó mà tính cho các sheet khác.
em có gửi File đính kèm là hình mẫu phiếu giống mẫu phiếu thật mà em dùng để in đè lên nó ở sheet "Phieuxuat in". anh xem rồii giúp đỡ em với nhé. Em cảm ơn anh nhiều!

 

[hanhpptc]

OK. Mình sẽ làm theo ý bạn, có gì thì trao đổi tiếp nhé. Thân

 

[Quang_Hải]

Trước tiên là phải cơm no áo ấm. Khi nào thật sự no rồi, ấm rồi thì hãy tính đến bước tiếp theo là ăn ngon mặc đẹp.
Cũng như mình nè, chỉ giải quyêt mọi công việc trên sheet, khi công việc ok rồi thì nâng cấp dần dần. Dùng FORM thì đẹp và oai thiệt nhưng nếu có vấn đề thì xử lý mệt mỏi lắm. Vì nhiều khi mình viết ra code mà lâu ngày nhìn lại cũng không hiểu gì hết trơn.

 

[hosibien]

Lập phiếu thanh toán đơn thuốc cho bệnh nhân làm như vậy e rằng chưa ổn, Đã lập form, trước hết cần xem giá bình quân của từng loại thuốc mới tính được đơn giá, còn nếu không lập bình quan gia quyền thì danh mục có khi lên tới hàng 100 nghìn tên thuốc dử liệu lên đến 100.000 dòng thì làm thế nào.

 

[quoc nhat]

cảm ơn anh quanghai1969 và anh hosibien đã góp ý giúp em.
Thưa anh HiSiBien thực ra phiếu thanh toán này dùng để sao chép từ đơn mà bác sỉ đã kê rồi tính ra giá tiền để thanh toán với tuyến trên.
Thực ra kho thuốc của Trạm y tế ở quê em là gì mà có đến 100 nghìn tên thuốc đâu anh. Chỉ < 100 loại thuốc thiết yếu mà thôi , chỉ vì 1 ngày có hàng trăm bệnh nhân đến trạm y tế để xin thuốc nên số lượng đơn mà bác sỹ đã kê lên đến hàng trăm tờ mà nhập trực tiếp vào sheet thì mất thời gian đưa chuột vào đúng ô minh cần đánh quá nên em mới nghĩ đến cách này mong anh giúp đỡ

 

[quoc nhat]

cảm ơn anh quanghai1969 và anh hosibien đã góp ý giúp em.
Thưa anh HiSiBien thực ra phiếu thanh toán này dùng để sao chép từ đơn mà bác sỉ đã kê rồi tính ra giá tiền để thanh toán với tuyến trên.
Thực ra kho thuốc của Trạm y tế ở quê em là gì mà có đến 100 nghìn tên thuốc đâu anh. Chỉ < 100 loại thuốc (tên thuốc) thiết yếu mà thôi , chỉ vì 1 ngày có hàng trăm bệnh nhân đến trạm y tế để xin thuốc nên số lượng đơn mà bác sỹ đã kê lên đến hàng trăm tờ mà nhập trực tiếp vào sheet thì mất thời gian đưa chuột vào đúng ô minh cần đánh quá nên em mới nghĩ đến cách này mong anh giúp đỡ

 

[hosibien]

cảm ơn anh quanghai1969 và anh hosibien đã góp ý giúp em.
Thưa anh HiSiBien thực ra phiếu thanh toán này dùng để sao chép từ đơn mà bác sỉ đã kê rồi tính ra giá tiền để thanh toán với tuyến trên.
Thực ra kho thuốc của Trạm y tế ở quê em là gì mà có đến 100 nghìn tên thuốc đâu anh. Chỉ < 100 loại thuốc (tên thuốc) thiết yếu mà thôi , chỉ vì 1 ngày có hàng trăm bệnh nhân đến trạm y tế để xin thuốc nên số lượng đơn mà bác sỹ đã kê lên đến hàng trăm tờ mà nhập trực tiếp vào sheet thì mất thời gian đưa chuột vào đúng ô minh cần đánh quá nên em mới nghĩ đến cách này mong anh giúp đỡ

Mình có thiết kế phần khám bệnh kê đơn cấp thuốc trên file Excel cho phòng khám, nhưng không biết lưu ở đâu, khi nào tìm ra sẽ giúp bạn

 

[quoc nhat]

chỉ cần bạn nhớ tên file rồi vào seach mycomputer là tìm thấy thôi mà

 

[hosibien]

Không phải lưu ở máy mình mà làm giúp cho một phòng khám cách đây 15 năm rồi, Nhưng mình thấy chổ bạn TYT xã mà khám đến 100 BN/ ngày thật khủng khiếp, ngay bệnh viện 100 GB mà một ngày khám ngoại trú chỉ đến 100 BN cũng hết hơi.

 

[quoc nhat]

Không phải lưu ở máy mình mà làm giúp cho một phòng khám cách đây 15 năm rồi, Nhưng mình thấy chổ bạn TYT xã mà khám đến 100 BN/ ngày thật khủng khiếp, ngay bệnh viện 100 GB mà một ngày khám ngoại trú chỉ đến 100 BN cũng hết hơi.

Vậy à! cũng khó tìm đấy nhỉ. Vì xã mình đông dân nhất huyện mà. có khi bệnh nhân đến mà các bác sỹ không có thời gian để uông nước nữa cơ. Mình cần cái flie này để làm cho nhanh chóng chứ cứ làm thủ công mải nhức đầu lắm bạn ạ. Bạn giúp đỡ mình với nhé

 

[quoc nhat]

Vậy à! cũng khó tìm đấy nhỉ. Vì xã mình đông dân nhất huyện mà. có khi bệnh nhân đến mà các bác sỹ không có thời gian để uông nước nữa cơ. Mình cần cái flie này để làm cho nhanh chóng chứ cứ làm thủ công mải nhức đầu lắm bạn ạ. Bạn giúp đỡ mình với nhé

mà bạn nói bạn làm cách đây 15 năm rồi chắc giờ kiến thức về EC của bạn mình phải gọi là thầy nhỉ