Chương trình quản lý kho vật tư (Ngày 06/11/2007) (1 người xem)

  • Thread starter Thread starter vungoc
  • Ngày gửi Ngày gửi
Liên hệ QC

Người dùng đang xem chủ đề này

vungoc

Find Sexy Womans from your town for night
Tham gia
2/8/06
Bài viết
633
Được thích
2,604
Giới tính
Nam
Nghề nghiệp
Search
Hôm nay mình up lên file QUẢN LÝ PHỤ TÙNG mới nhất để chia sẻ với mọi người.

Trong file này đã cải tiến nhiều tính năng và so với các file đã up trong các lần trước

(Cải thiện giao diện của các Form Báo cáo, Danh mục, Các list form, Menu trong sheet, v.v…).

Còn một vấn đề nữa mà mình tìm hòai không ra, mô tả như sau:
Từ giao diện trên Form Nhập Hàng bạn nhập chứng từ xong nhấn nút Ghi Tạm, nếu muốn In Phiếu nhập kho hoặc In nhãn dán lên phụ tùng thì bạn Click chọn vào các nút tương ứng sau đó bấm nút Lưu CT thì dữ liệu sẽ được ghi chính thức vào Data và sẽ in ra các phiếu tương ứng như Phiếu nhập kho hoặc Nhãn dán lên phụ tùng (như bạn đã click chọn).

Ghi chú: Khi ta Click chọn In nhãn dán lên phụ tùng hoặc In phiếu nhập kho và nhấn tiếp nút Lưu CT thì sẽ đồng thời thi hành các lệnh Call PhieuNXCall Label (các lệnh này gọi từ nút Lưu CT)

Tuy nhiên, nút lệnh trên chỉ thực hiện được đối với 1 lần nhập liệu đầu tiên, các lần nhập liệu tiếp theo thì nó chỉ ghi được dữ liệu và Data mà không thực hiện được các lệnh Call PhieuNX và Call Label để in các chứng từ Phiếu nhập kho và Nhãn dán lên phụ tùng.

Tương tự như vậy ở Form Xuất Hàng cũng bị tình trạng nêu trên.

Các bạn có thể tìm hiểu và ngâm cứu giúp tôi để khắc phục tình trạng nêu rên.

(Nếu được các bạn sửa thẳng vào file và ghi chú luôn, sau đó up lại lên hộ tôi)

Trân trọng cảm ơn !

P/S: Từ giao diện Form muốn đăng nhập vào Excel:
Username: chaongaymoi
Password: vungoimora
Hoặc:Tại
Username: a (chỉ cần gõ chữ a là vào được excel)
 

File đính kèm

Lần chỉnh sửa cuối:
Hay lắm, để mình thử xem.
Tham gia thêm: Các form kích thước lớn không tiện SD
Thanhks
 
Bạn phải chọn chế độ màn hình ở chế độ 1024 x 768 trước khi mở file này thì các Form mới sử dụng được ở chế độ chuẩn.
 
Mình chưa nhập thử dữ liệu nhưng phải công nhận phần mềm này của bạn là rất rõ ràng! Giao diện không bóng bẩy nhưng rất đẹp!
 
Cảm ơn bạn! Mình thấy rất ứng dụng, nhất là với các bạn đang làm về kho.
 
Chao Vu Ngoc!
Minh da load phan men quan ly kho phu tung ngay 6/11/2007. Nhung su dung ko duoc. Vi ap dung de thay doi ma vattu, ten vat tu.... noi chungtoan bo phan phu tung ma vu ngoc dua len. Nhung khi cho so lieu thuc te vao thi no ko lam duoc. Dzay vu ngoc co the huong dan cho minh ky hon de su dung no hay hon ko? CAm on vu ngoc rat nhieu.
 
VUONGQUOCEXCEL đã viết:
f... Nhung khi cho so lieu thuc te vao thi no ko lam duoc. Dzay vu ngoc co the huong dan cho minh ky hon de su dung no hay hon ko? CAm on vu ngoc rat nhieu.

bạn có thể cho biế rõ hơn không? khi nào thì bạn không làm được,?
 
Lần chỉnh sửa cuối:
VUONGQUOCEXCEL đã viết:
Chao Vu Ngoc!
Minh da load phan men quan ly kho phu tung ngay 6/11/2007. Nhung su dung ko duoc. Vi ap dung de thay doi ma vattu, ten vat tu.... noi chungtoan bo phan phu tung ma vu ngoc dua len. Nhung khi cho so lieu thuc te vao thi no ko lam duoc. Dzay vu ngoc co the huong dan cho minh ky hon de su dung no hay hon ko? CAm on vu ngoc rat nhieu.

Đề nghị bạn gõ chữ có dấu nhé !
 
vungoc đã viết:
Hôm nay mình up lên file QUẢN LÝ PHỤ TÙNG mới nhất để chia sẻ với mọi người.

Trong file này đã cải tiến nhiều tính năng và so với các file đã up trong các lần trước

(Cải thiện giao diện của các Form Báo cáo, Danh mục, Các list form, Menu trong sheet, v.v…).

Còn một vấn đề nữa mà mình tìm hòai không ra, mô tả như sau:
Từ giao diện trên Form Nhập Hàng bạn nhập chứng từ xong nhấn nút Ghi Tạm, nếu muốn In Phiếu nhập kho hoặc In nhãn dán lên phụ tùng thì bạn Click chọn vào các nút tương ứng sau đó bấm nút Lưu CT thì dữ liệu sẽ được ghi chính thức vào Data và sẽ in ra các phiếu tương ứng như Phiếu nhập kho hoặc Nhãn dán lên phụ tùng (như bạn đã click chọn).

Ghi chú: Khi ta Click chọn In nhãn dán lên phụ tùng hoặc In phiếu nhập kho và nhấn tiếp nút Lưu CT thì sẽ đồng thời thi hành các lệnh Call PhieuNXCall Label (các lệnh này gọi từ nút Lưu CT)

Tuy nhiên, nút lệnh trên chỉ thực hiện được đối với 1 lần nhập liệu đầu tiên, các lần nhập liệu tiếp theo thì nó chỉ ghi được dữ liệu và Data mà không thực hiện được các lệnh Call PhieuNX và Call Label để in các chứng từ Phiếu nhập kho và Nhãn dán lên phụ tùng.

Tương tự như vậy ở Form Xuất Hàng cũng bị tình trạng nêu trên.

Các bạn có thể tìm hiểu và ngâm cứu giúp tôi để khắc phục tình trạng nêu rên.

(Nếu được các bạn sửa thẳng vào file và ghi chú luôn, sau đó up lại lên hộ tôi)

Trân trọng cảm ơn !

P/S: Từ giao diện Form muốn đăng nhập vào Excel:
Username: chaongaymoi
Password: vungoimora
Hoặc:Tại
Username: a (chỉ cần gõ chữ a là vào được excel)

Mình đã tìm ra nguyên nhân của vấn đề nêu trên.
Để khắc phục, bạn hãy mở file này, vào Form Nhap, chỉnh sửa một chút như sau:

-
Mã:
If Me.NInPhieu = True Then
      [COLOR="Blue"]  S106.Select ' Thêm đoạn này[/COLOR]
        [COLOR="Blue"]Range("C3").Value = Me.NSoCT.Value ' Thêm đoạn này[/COLOR]
       [COLOR="Red"] 'S106.Range("C3") = Me.NSoCT.Value ' Bỏ đoạn này[/COLOR]
        Call PhieuNX
        Application.Calculate
        S106.PrintOut
    End If

    If Me.NInNhan.Value = True Then
        [COLOR="#0000ff"]S106.Select ' Thêm đoạn này
        Range("C3").Value = Me.NSoCT.Value ' Thêm đoạn này[/COLOR]
       [COLOR="Red"] 'S106.Range("C3") = Me.NSoCT.Value ' Bỏ đoạn này[/COLOR]
        Call PhieuNX
        Call Label
        Application.Calculate
        S114.PrintOut
    End If

Tương tự như vậy, chỉnh sửa cho Form Xuat là OK.
 
vungoc đã viết:
Bạn phải chọn chế độ màn hình ở chế độ 1024 x 768 trước khi mở file này thì các Form mới sử dụng được ở chế độ chuẩn.

chào bạn vungoc!
do mình ko đọc kỹ hướng dẫn của bạn, mình đã vội mở file của bạn lên xem trước khi chọn chế độ màn hình 1024x768 trước, và màn hình desktop của mình bây giờ chắc bị ảnh hưởng nên nó ko còn ở trạng thái ban đầu nữa, bạn có thể chỉ mình làm cách nào cho màn hình desktop của mình trở lại vị trí cũ ko?
Ah còn vấn đề này nữa bạn, khi mình vào bảng tính excel, thì yêu cầu gõ pass và usename, bạn có thể cho mình biết pass và usename là gì ko?
Thanks bạn!-=.,,
 
Lần chỉnh sửa cuối:
Trích!
Bạn có thể cho biế rõ hơn không? khi nào thì bạn không làm được,?
Đề nghị bạn gõ chữ có dấu nhé !

Chào Vu ngoc!
Trước tiên mình cám ơn bạn đã quan tâm đến câu hỏi không rõ ràng của mình. Thật ngớ ngẩn quá phải ko? Khi mình chỉ hỏi chung chung...
Mình xin nói vài nét về nghề nghiệp của mình tí ha: Mình làm ở BQL - Công Trình Cộng Cộng Huyện Tuy Phong - Tỉnh Bình Thuận. Mình làm bên quản lý kho của bộ phận cấp nước sinh hoạt. Tổng kho mình quản lý là 4 Kho hàng, có tất khoản 250 loại vật tư về ngành nước. Trước đây, mình chỉ sử dụng các công thức hàm lọc, hàm tổng hợp trên file của excel là chủ yếu. Vo tình mình tìm thấy file của bạn đưa lên vào ngày 22/10/2007. Mình vô cùng vui sướng lắm lắm, nhưng Bác Hồ tìm ra "luân cương LêNin" dzậy.
Từ đó mình tải xuống, vào mục excel để thay đổi tên vật tư, nhà cung cấp, bộ phận....Mình nhập số liệu vào sheet danh muc: mã vt, tên vt, số lượng, giá trị và các sheet còn lại mình xóa dữ liệu của bạn nhưng vẫn giữ nguyên mẫu. Bắt đầ có sự cố từ đây:
1/ Khi thực hiện ở phiếu Xuất: mình chọn đầy đủ các thủ tục trên, xuống phần chọn vt, ví dụ: số lượng tồn là 100, chọn xuất lấy số lượng là 5 thì nó báo là giá trị ko còn và mục sl vt hiên lên hết 100. ?????????? kho hiểu lắm.
2/ Sao bạn ko tạo ra from hiển thị xem trang in , trước khi nhấn nút để in?
3/ Tổng hợp hoặc Báo cáo theo từng tháng, từng quý, năm dễ theo dõi số lượng XNT?
4/ Và cuối cho mình hỏi là Muốn có số lượng, giá trị vật tư Tồn đầu kỳ, có phải mình vào mục excel data số lượng ko?
Có phải mình tham lam quá ko? mà hỏi nhiều giử dzậy? Vì mình ko nắm rõ về VisuaBasic lắm. Mong bạn giúp mình hoàn thành công việc tốt nha. Xin cám ơn bạn rất nhiều.
Trân trọng kính chào!
 
VUONGQUOCEXCEL đã viết:
Trích!
Bạn có thể cho biế rõ hơn không? khi nào thì bạn không làm được,?
Đề nghị bạn gõ chữ có dấu nhé !

Chào Vu ngoc!
Trước tiên mình cám ơn bạn đã quan tâm đến câu hỏi không rõ ràng của mình. Thật ngớ ngẩn quá phải ko? Khi mình chỉ hỏi chung chung...
Mình xin nói vài nét về nghề nghiệp của mình tí ha: Mình làm ở BQL - Công Trình Cộng Cộng Huyện Tuy Phong - Tỉnh Bình Thuận. Mình làm bên quản lý kho của bộ phận cấp nước sinh hoạt. Tổng kho mình quản lý là 4 Kho hàng, có tất khoản 250 loại vật tư về ngành nước. Trước đây, mình chỉ sử dụng các công thức hàm lọc, hàm tổng hợp trên file của excel là chủ yếu. Vo tình mình tìm thấy file của bạn đưa lên vào ngày 22/10/2007. Mình vô cùng vui sướng lắm lắm, nhưng Bác Hồ tìm ra "luân cương LêNin" dzậy.
Từ đó mình tải xuống, vào mục excel để thay đổi tên vật tư, nhà cung cấp, bộ phận....Mình nhập số liệu vào sheet danh muc: mã vt, tên vt, số lượng, giá trị và các sheet còn lại mình xóa dữ liệu của bạn nhưng vẫn giữ nguyên mẫu. Bắt đầ có sự cố từ đây:
1/ Khi thực hiện ở phiếu Xuất: mình chọn đầy đủ các thủ tục trên, xuống phần chọn vt, ví dụ: số lượng tồn là 100, chọn xuất lấy số lượng là 5 thì nó báo là giá trị ko còn và mục sl vt hiên lên hết 100. ?????????? kho hiểu lắm.
2/ Sao bạn ko tạo ra from hiển thị xem trang in , trước khi nhấn nút để in?
3/ Tổng hợp hoặc Báo cáo theo từng tháng, từng quý, năm dễ theo dõi số lượng XNT?
4/ Và cuối cho mình hỏi là Muốn có số lượng, giá trị vật tư Tồn đầu kỳ, có phải mình vào mục excel data số lượng ko?
Có phải mình tham lam quá ko? mà hỏi nhiều giử dzậy? Vì mình ko nắm rõ về VisuaBasic lắm. Mong bạn giúp mình hoàn thành công việc tốt nha. Xin cám ơn bạn rất nhiều.
Trân trọng kính chào!

Với các nội dung như bạn đã nêu trên - vui lòng thực hiện lại các bước sau:

1- Bạn hãy tải lại file QUAN LY PHU TUNG (VAT TU) mà mình up lên ngày 06/11/2007 (vì phiên bản này đã sửa đổi cải tiến rất nhiều so với bản bạn tải 22/10/2007).

2- Trong quá trình xóa các dữ liệu cũ để đưa dữ liệu mới của bạn vào, bạn chỉ nên chọn xóa đúng những vùng dữ liệu cũ thôi, không nên chọn ra ngoài hoặc bấm Ctrl+A (chọn tất cả) vì trong những sheet đó có những cột hoặc dòng ẩn không được xóa (nếu xóa sẽ mất tác dụng). Các tiêu đề bảng biểu giữ nguyên.

3- Vấn đề xem trước khi in đã được bổ sung trong file 06/11/2007.

4- Chức năng báo cáo tổng hợp, báo cáo chi tiết, ... đã có sẵn bạn cứ thử xem sao.

5- Trước khi nhập dữ liệu, số lượng tồn đầu kỳ bạn để lên những dòng trên cùng của sheet Data, như vậy mỗi lần báo cáo đã có công thức trích xuất số lượng tồn đầu kỳ vào trong báo cáo cho bạn xem rồi!

6- Xem lại các bài trong chủ đề file QUAN LY PHU TUNG mà tôi đã up ngày 06/11/2007, trong đó có bài của ngày hôm qua (12/11/2007) tôi đã post cách sửa lỗi để in được phiếu nhập xuất, label sau mỗi lần nhập chứng từ.

* Nếu bạn vẫn chưa thực hiện được, bạn hãy gọi cho tôi để tôi hướng dẫn bạn thực hiện nhé!

Chúc bạn thành công!
 
Vũ Ngọc xem lại Báo cáo NXT, 2 cách không cho cùng đáp án.
Sub PasteIDs(ByVal FromRange As Range, ByVal CellToPaste As Range)
'..........
ShowAll FromRange.Parent
FromRange.Offset(-1).AdvancedFilter Action:=xlFilterInPlace, Unique:=True
FromRange.Resize(1).Parent.Range(FromRange, FromRange.End(xlDown)).Copy CellToPaste
ShowAll FromRange.Parent
End Sub
Vũ Ngọc nhờ anh Tuân giúp lại phần này, hình như TH sẽ dư 1 mã hàng mà trong data, có ở dòng đầu và cuối.
Còn theo code này nếu chọn từ 01/10 - 04/11 (ngày cuối) sẽ có NA.
Trong file này nên xem lại khi thoát file... thế nào chưa hiểu. Và nên có 1 lại menu thôi.
Vài lời góp ý, không phải xin bỏ qua.
 
Cảm ơn anh ThuNghi!

Đúng là phần báo cáo TH của bác TuanVNUNI dư một mã hàng. Nhân đây nhờ bác Tuan xem điều chỉnh lại phần Báo cáo TH của bác luôn (nếu được).

Thân ái!
 
Chà, đẹp quá! Mình là loại hơi bị chuộng về hình thức nên thấy chương trình của bạn là phải khen ngay một cái đã. Còn nội dung của nó thì từ từ, để mình ngâm cứu đã rồi sẽ góp ý sau.
Chúc các bạn thành công.
---------------
À, có cái này thấy ngay đây.
Sau khi mình vào bảng tính Excel từ chương trình của các bạn, thì làm sao để quay ra lại cái màn hình chính đó? Nó biến đâu mất tiêu luôn, hình như lọt ra khỏi desktop luôn... Thoát Excel luôn rồi nó vẫn chạy nền trong máy nhưng không thấy (mình gọi TaskManager ra thì thấy nó đang chạy nền), và cuối cùng phải dùng TaskManager để.. xin mời anh nghỉ.
Tại máy mình cà chớn hay tại chương trình không thích máy mình vậy ?
 
Lần chỉnh sửa cuối:
BNTT đã viết:
À, có cái này thấy ngay đây.
Sau khi mình vào bảng tính Excel từ chương trình của các bạn, thì làm sao để quay ra lại cái màn hình chính đó? Nó biến đâu mất tiêu luôn, hình như lọt ra khỏi desktop luôn... Thoát Excel luôn rồi nó vẫn chạy nền trong máy nhưng không thấy (mình gọi TaskManager ra thì thấy nó đang chạy nền), và cuối cùng phải dùng TaskManager để.. xin mời anh nghỉ.
Tại máy mình cà chớn hay tại chương trình không thích máy mình vậy ?

Đó là nhờ câu lệnh : Application.Visible=False bác ạ

Hình như ở trên Sheet còn có menu mà ??

Thân!
 
Sub PasteIDs(ByVal FromRange As Range, ByVal CellToPaste As Range)
'..........
ShowAll FromRange.Parent
FromRange.Offset(-1).AdvancedFilter Action:=xlFilterInPlace, Unique:=True
FromRange.Resize(1).Parent.Range(FromRange, FromRange.End(xlDown)).Copy CellToPaste
ShowAll FromRange.Parent
End Sub
Sau khi mò, tôi thấy sửa như sau thì "có vẻ" OK
Thay
FromRange.Offset(-1).AdvancedFilter Action:=xlFilterInPlace, Unique:=True
Bằng
FromRange.AdvancedFilter Action:=xlFilterInPlace, Unique:=True
Và thêm câu sau trong THXNT_ext()
sau câu
Range("P9:P" & HC).FormulaR1C1 = "=IF(SUM(RC[-9]:RC[-2])>0,1,"""")"
thêm.
With S109.Range("B9")
.EntireRow.ClearContents
End With
Có gì chưa đúng thì cùng xem lại nhé.
 
Vấn đề bác Thunghi nói em cũng đã phát hiện và sửa rồi mà sao vẫn còn lỗi nhỉ? Có lẽ bác Thunghi đã fix được lỗi đó rồi.

P/S: Bác Vungoc không cần để module "TuanV*" trong chương trình đâu! Ngại quá!!
 
Chào VuNgoc!
Mình nhờ bạn chỉnh sửa giúp mình về phần đơn giá Phiếu Xuất không? Chả là như thế này, các vật tư của mình có định theo giá bán của Cty lập ra. Còn phần Đơn giá PX của bạn là bình quân gia nguyên ( NDG = format("NSL", "#,##.00"), nó ko đúng theo nhu cầu dùng của mình. Mình muốn chỉnh lại nhưng ko biết làm sao. Mong bạn giúp mình nha. Cám ơn nhiều. Bạn có thể thêm một cột đơn giá bán ko?
 
Vài lời nhận xét 1.0

To: Vungoc,

Chương trình này của em cần phải cải tiến rất nhiều.
_Điều đầu tiên làm cho người dùng “nổi giận” là, khi người dùng đang mở file excel khác thì khi mở file ứng dụng này file kia cũng bị “ẩn mình” luôn.
_Nên cho hiện ở Task Panel, để khi cần dùng sẽ dễ dàng hơn
_Nếu sử dụng tiếng việt thì các nút chắc phải việt hóa hết, chứ đừng để Next >>, Previous, Save, Main, User Name, 3 of 13
_Form danh mục vật tư (FrDanhmuc), lần đầu tiên khi mở form ra click vào Phụ tùng, danh sách phụ tùng không hiện ra! phải click danh mục khác rồi Click lại mới hiện ra.
_Các thủ tục sắp xếp tìm kiếm, chắc nên dùng mảng hy vọng chương trình sẽ thực thi nhanh hơn.
_Các thao tác như thêm, sửa của các bảng dữ liệu nên chăng đưa vào một thủ tục như vậy chương trình sẽ rỏ ràng hơn.

Vài lời nhận xét.

Lê Văn Duyệt
 
levanduyet đã viết:
To: Vungoc,

Chương trình này của em cần phải cải tiến rất nhiều.

_Điều đầu tiên làm cho người dùng “nổi giận” là, khi người dùng đang mở file excel khác thì khi mở file ứng dụng này file kia cũng bị “ẩn mình” luôn.
_Nên cho hiện ở Task Panel, để khi cần dùng sẽ dễ dàng hơn
...
Lê Văn Duyệt

Ý của bác (như đã nêu trên là rất phù hợp), hiện tại em cũng muốn như vậy nhưng chưa biết làm thế nào để: Khi mở file QUẢN LÝ PHỤ TÙNG (VẬT TƯ) này lên thì file excel này sẽ Visible = False và tất cả các cửa sổ ứng dụng khác nếu đang mở sẽ trở về dạng Minimize (chỉ cho hiện ở thanh tác vụ), để khi cần dùng sẽ dễ dàng hơn.

Nếu muốn thực hiện được nhữ đã nêu trên thì câu lệnh sau đây sẽ phải sửa hoặc bổ sung như thế nào, mong được các bác chỉ giúp:

Mã:
Private Sub Workbook_Open()
    Application.Visible = False
End Sub

Chân thành cảm ơn!
 
vungoc đã viết:
Ý của bác (như đã nêu trên là rất phù hợp), hiện tại em cũng muốn như vậy nhưng chưa biết làm thế nào để: Khi mở file QUẢN LÝ PHỤ TÙNG (VẬT TƯ) này lên thì file excel này sẽ Visible = False và tất cả các cửa sổ ứng dụng khác nếu đang mở sẽ trở về dạng Minimize (chỉ cho hiện ở thanh tác vụ), để khi cần dùng sẽ dễ dàng hơn.

Nếu muốn thực hiện được nhữ đã nêu trên thì câu lệnh sau đây sẽ phải sửa hoặc bổ sung như thế nào, mong được các bác chỉ giúp:

Mã:
Private Sub Workbook_Open()
    Application.Visible = False
End Sub
Chân thành cảm ơn!

Bác thử nhé : Chèn ở ThisWorkbook
PHP:
Private Sub Workbook_Activate()
    Application.Visible = False
    FormABC.Show
.................
End Sub

Private Sub Workbook_Deactivate()
    Application.Visible = True
End Sub

Thân!
 
Mr Okebab đã viết:
Bác thử nhé : Chèn ở ThisWorkbook
PHP:
Private Sub Workbook_Activate()
    Application.Visible = False
    FormABC.Show
.................
End Sub

Private Sub Workbook_Deactivate()
    Application.Visible = True
End Sub

Thân!

Mình đã làm thử nhưng vẫn chưa thấy đáp ứng được yêu cầu đã nêu trên.

Sao thế nhỉ !?
 
Em thử dùng cái này xem sao:

Mã:
Option Explicit

Private Sub Workbook_Open()
    MsgBox Application.ThisWorkbook.Windows(1).Caption
    Application.ThisWorkbook.Windows(1).Visible = False
End Sub

Lê Văn Duyệt
 
lethanhnhan đã viết:
Em thử dùng cái này xem sao:

Mã:
Option Explicit

Private Sub Workbook_Open()
    MsgBox Application.ThisWorkbook.Windows(1).Caption
    Application.ThisWorkbook.Windows(1).Visible = False
End Sub

Lê Văn Duyệt


Vẫn chưa ổn anh ạ!

Khi thay câu lệnh trên vào, thì thấy các file excel khác (nếu đang mở trước file QUẢN LÝ PHỤ TÙNG) vẫn phơi ra, không chịu thu lại (minimize) nằm xuống thanh tác vụ.

Em muốn là: Khi mở file QUẢN LÝ PHỤ TÙNG này lên sẽ:

1- File QUẢN LÝ PHỤ TÙNG chỉ hiện giao diện là UserForm & ẩn giao diện sheet (Vấn đề này đã thực hiện được).

2- Nếu có 1 hoặc nhiều file Excel hay các cửa sổ ứng dụng khác đang mở (chế độ làm việc đầy màn hình) thì sẽ bị thu nhỏ lại nằm ở dạng Minimize dưới thanh tác vụ, để trong khi làm việc với file QUẢN LÝ PHỤ TÙNG này, nếu cần vẫn có thể mở các file đang nằm ở thanh tác vụ lên để làm việc được (Vấn đề này chưa giải quyết được).

Nhờ các bác nghiên cứu & cho giải pháp!
 
Lần chỉnh sửa cuối:
Em thử cái này xem.
Mã:
Dim wb As Workbook
       
    'Minimine cac workbook khac
    For Each wb In Application.Workbooks
        wb.Windows(1).WindowState = xlMinimized
    Next

LTN
 
lethanhnhan đã viết:
Em thử cái này xem.
Mã:
Dim wb As Workbook
       
    'Minimine cac workbook khac
    For Each wb In Application.Workbooks
        wb.Windows(1).WindowState = xlMinimized
    Next

LTN

Em đã thử, kết quả:

1- Khi mở và giao diện Form của file QUAN LY PHU TUNG (QLPT) show ra thì vẫn không thấy được các file excel khác (đã mở ở chế độ đầy màn hình trước đó) nằm minimize ở thanh tác vụ;

Chỉ khi từ giao diện Form của file QLPT bấm nút vào bảng tính (giao diện sheet) trong file QLPT thì mới thấy được các file excel khác đang minimize.

2- Chạy câu lệnh này, thỉnh thoảng vẫn báo lỗi!

(Hay là em đặt code này chưa đúng chỗ!?)
 
Lần chỉnh sửa cuối:
vungoc đã viết:
2- Chạy câu lệnh này, thỉnh thoảng vẫn báo lỗi!

(Hay là em đặt code này chưa đúng chỗ!?)

Vững Ngọc nên đưa ra các tình huống, thông báo lỗi cụ thể hơn.

Ví dụ:

Sau khi chèn đoạn code ở chỗ.... thì tôi thấy xuất hiện lỗi (sự kiện - hành động gây lỗi, mã lỗi, thông báo lỗi, ảnh của lỗi kèm theo) như sau: blab, blab...

Khách hàng mà cứ báo lỗi: "Ôi, phần mềm lỗi rồi" hoặc "thỉng thoảng tự nhiên lỗi" thì...cỡ chuyên gia như anh Duyệt cũng phải bótay.net (để anh Duyệt phải đưa những câu như ... chat chít ở trên)
 
Lần chỉnh sửa cuối:
Chương trình quản lý kho vật tư

Chào bác Vũ Ngọc,

Em xin tự giới thiệu với bác em là Newbie cũng mới tham gia diễn đàn này. Em cũng làm quản lý kho cho rất nhiều khách hàng vì bên em làm 3PL (Third Party Logistics).
Em có vài lời xin mạo muội góp ý:
- Em thấy file của bác viết rất hay, giao diện rất công phu tuy nhiên em thấy file của bác chỉ thuần túy quản lý kho theo kiểu nghiệp vụ của kế toán (accounting), chứ chưa phải theo kiểu quản lý tình trạng vật tư xuất nhập có nghĩa là nó không liên quan đến: FIFO (First In First Out)/FMFO(First Manufacture Date First Out)/FEFO (First to Expire First Out) điều này rất quan trọng trong việc quản lý hàng hóa có các yêu cầu chặt chẽ phải theo dõi hạn sử dụng.
- Nếu có một đơn hàng nhập/xuất bị nhập sai hoặc hủy do yêu cầu khác nhau thì nó không cho phép mình hủy trên giao diện mà phải vào trực tiếp Database điều này không tốt lắm tương tự như vậy nếu mình xuất một đơn hàng mà bị sai hoặc hủy đơn hàng. Em nghĩ nếu bác có thời gian bác nên phát triển nó theo hướng này thì hay quá.
- Nếu Form nhập hàng & xuất hàng mà bác thiết kế ngay trên sheet của Excel tức là sử dụng luôn các cell của nó làm các ô nhập dữ liệu thì dễ dàng lập trình hơn cũng như cho phép mình sử dụng các công thức của Excel linh hoạt đồng thời mình có thể copy dữ liệu từ một nguồn khác có cùng định dạng mà không phải nhập tay (Điều này rất quan trọng khi nhập hàng từ các kho In Transit hoặc kho từ nhà cung cấp. Họ chỉ cần gửi file là mình copy được liền mà).
Mấy lời góp ý như vậy bác xem xét nhé. Dù sao bác làm được file như vậy em nể bác quá...! cám ơn bác nhiều nhá.
Tks
 
hay quá, rat cam ơn Tác giả.
Tôi đang học mà, nên nghiên cứu chương trình này vô cùng bổ ích.
chân thành cảm ơn
 
Chào các bạn!
Mình đang gặp một số khó khăn khi làm quản lý kho hàng về cách định vị của các hàng hóa trong kho. Trong kho hàng của tôi có rất nhiều mã hàng và các mã hàng đó được đặt trên các Pales có đánh số thứ tự dãy, cột, số Pales rồi. Vậy thì làm cách nào để khi gõ mặt hàng nào đó ra thì mình biết chắc chắn là mặt hàng đó đang nằm ở vị trí nào và khi xuất hàng đi thì biết được là vị trí đó đang để trống. Chẳng hạn mình có mã hàng là: X có số lượng là: 1.000 được đặt trên 2 pales là I-1-AB, I-2-AB (nghĩa là đặt tại dãy I,pales 1, pales 2, cột AB) và khi mình xuất đi 500 thì tức là sẽ bị trống 1 pales. Vậy có cách nào để biết được các vị trí trống, và vị trí còn hàng để khi hàng về thêm thì mình lại để vào những vị trí trống đó. Bạn nào biết thì giúp mình với nhé. Cảm ơn rất nhiều.
 
Bạn làm định mức cho các dãy kệ chứa hàng, ví dụ mỗi kệ là 1000, sau khi xuất đi một số lượng bất kỳ thì bên cạnh sẽ có một cột báo hàng xuất đi bao nhiêu (ví dụ kệ A chứa 1000, xuất 500 thì cột bên cạnh của bảng tính tương ứng dùng công thức báo "lượng hàng tại kệ A đã xuất 500, còn trống 500".
 
Mình thật là ngốc ! Mình chưa bao giờ sử dụng phần mềm cả, không biết có phải vậy không nhưng sao mình không biết sử dụng nó. Làm thế nào bây giờ? anh chị hãy giúp mình với nhé ! Còn một điều mình xin mạo muội muốn hỏi: Khi mình lọc dữ liệu thì mình vào Data - fỉlte - autofilte thì sẽ lọc được vùng đã chọn. Nhưng mình ko biết làm cách nào để làm một dòng đứng một dòng động như các anh chị đã làm?
 
Phần mềm đó ở đâu vậy bạn? mình chỉ thấy file đính kèm, down ve chi thay bảng excel thoi, ko co cho nhan lieu ji ca, các bạn trong room có thể giúp mình được ko ?
truonganhduongdn@gmail.com
Thanks and best regard
 
Cảm ơn bạn rất nhiều. Cho mình hỏi cách sử dụng Advanced Filter trên Excel với.
 
Cảm ơn bạn Vungoc đã chia sẻ phần QL kho vật tư. Mình có câu hỏi nhờ các bạn chỉ giúp
Mình còn 1 vướng mắc nhỏ cần các bạn giúp đỡ là vì ở phần nhập nếu ta còn tồn cũ với đơn giá vd là 2000 thì khi ta nhập lần sau vào vd là 10000 thì khi xuất phần mềm sẽ lấy giá trị trung bình của đơn giá là 6000 chứ không phải là 10000. ( Có nghĩa là ta nhập đơn giá lần đầu trong tháng 1 thì sang tháng 2 đơn giá nhập của đơn vị khi nhập hàng về tăng cao hơn tháng 1 thì khi xuất nó sẽ lấy giá trị trung bình của đơn giá chứ không lấy giá trị nhập lần 2). Cám ơn các bạn đã quan tâm mong được các bạn giúp đỡ.
 
Lần chỉnh sửa cuối:
Mình thấy nhập số lượng 0,... Không cập nhật được
 
Cảm ơn anh rất nhiều ! em hiện tại đang làm thủ kho cho 1 khách sạn 3 sao ! thấy những bài viết của anh up lên khá hay . mong rằng sẽ có lúc còn nhờ anh chỉ giáo nhiều điều nữa.
Ngadt- Phudonghotel.com.vn
 
Làm lịch năm giống như chương trình quản lý kho vật tư

Em có một vấn đề lớn là làm thế nào để lấy code Lịch năm giống như file của anh Ngọc. Em copy sang và import file nhưng không được. Các Thầy có thể hướng dẫn em cách làm được không ạ?
Trân trọng cảm ơn,
 
chào bạn vungoc!
do mình ko đọc kỹ hướng dẫn của bạn, mình đã vội mở file của bạn lên xem trước khi chọn chế độ màn hình 1024x768 trước, và màn hình desktop của mình bây giờ chắc bị ảnh hưởng nên nó ko còn ở trạng thái ban đầu nữa, bạn có thể chỉ mình làm cách nào cho màn hình desktop của mình trở lại vị trí cũ ko?
Ah còn vấn đề này nữa bạn, khi mình vào bảng tính excel, thì yêu cầu gõ pass và usename, bạn có thể cho mình biết pass và usename là gì ko?
Thanks bạn!-=.,,

Mình cũng bị hiện tượng như của bạn.hic
 
rất cảm ơn chủ thớt đã chia sẻ thông tin rất hữu ích này tới tất cả mọi người, mình phải ngâm cứu mới được
 
Thanks chủ thớt,
Bài viết rất hay.
 

Bài viết mới nhất

Back
Top Bottom