Quản lý đơn đặt hàng

[workman]

Cứ nhè bác Adam mà thụ giáo, cần quái gì phải đi học. Chưa chắc đi học đã bằng được các bác cao thủ nhà mình chỉ bảo. Tôi là thành viên mới toanh, nhưng phải công nhận là room này cao thủ nhiều như mây, tha hồ mà học hỏi.

 

[ntb_802]

Để các bạn đỡ nhàm chán, mình copy đoạn thư nhà hài hước từ Ép Pê Tê gửi tặng các bạn nhé./.
Thư nhà
Con trai yêu quý! Mẹ viết thư này thật chậm vì biết rằng con đọc không được nhanh lắm. Gia đình ta đã chuyển nhà rồi vì ba con đọc báo thấy nói rằng hầu hết các tai nạn xảy ra trong bán kính 20 dặm gần nhà.

Mẹ không thể cho con biết địa chỉ mới được vì gia đình chủ trước đã mang số nhà của họ đi để đỡ phải thay đổi địa chỉ. Nơi ở mới có một cái máy giặt lạ kiểu. Ngày đầu tiên, mẹ thả vào đó 4 cái áo sơ mi, giật sợi dây và chúng bị nước cuốn mất tích.

Ở đây mưa hai lần mỗi tuần. Cơn mưa đầu tiên kéo dài 3 ngày và cơn mưa thứ hai 4 ngày.

Chiếc áo con dặn mẹ gửi, dì Sue nói rằng cúc của nó sẽ làm thư quá nặng nên mẹ đã cắt hết cúc ra và bỏ vào trong túi áo.

Chị gái của con mới sinh sáng nay. Mẹ không biết đứa bé là trai hay gái nên không biết con đã trở thành cậu hay dì của nó.

Cậu John của con rơi xuống hầm ủ rượu whisky. Có mấy người định kéo cậu lên nhưng cậu đánh trả dữ dội làm họ phải bỏ ý định, còn cậu thì chết đuối. Gia đình ta đem cậu đi hoả táng và cái xác cháy 3 ngày liền.

Chiếc xe tải trong đó có 3 người bạn của con bị rơi xuống sông khi đang qua cầu. Người lái xe ngồi đằng trước thì chui được qua cửa sổ và bơi vào bờ. Hai người ngồi sau chết đuối vì không đóng được cửa hậu.

Lần này chỉ có chừng ấy tin thôi. Không có gì nghiêm trọng xảy ra cả. Nếu con không nhận được thư này, nhớ báo cho mẹ biết và mẹ sẽ gửi thư khác cho con.

Thương yêu.

Mẹ của con.

Nguồn: http://vnexpress.net/Vietnam/Cuoi/2005/07/3B9DFD9A/

File của mình bị nhiễm Virus như bạn Trần bảo đấy, nhưng diệt hoài mà nó cứ chết thì lại sống lại, bạn nào có cách diệt triệt để không?

 

[SA_DQ]

Di chuyển tới dòng cuối:
sheets("T.Hop-HD").select
Range("H60000").select
selection.end(xlUp).select
selection.offset(1, -8).select 'xuống 1 dòng và lùi sang trái 8 cột.
activesheet paste
Nó sẽ dán dữ liệu copy vào bắt đầu từ cột A, dòng cuối cùng có chứa dữ liệu căn cứ vào cột H.[/QUOTE]

Nếu nhập dòng hay cột vào CSDL thì bạn làm như vậy là rất OK nữa là khác;
Nhưng trong thực tế không phải lúc nào cũng vậy; có ví dụ như sau: nhập hoá đơn bán hàng vào 2 Sheets (1- Phần chính gồm TênKH,MaSoThue,Ngay,GiaoNhan & 2- phần chi tiết gồm SoLuong,DonGia,DVT) thì không thực thi được câu lệnh của BÁc đâu nha! :two: Thân!

 

[adam_tran]

Bạn Nô bi ta quá khen, trong này có rất nhiều cao thủ, học mò như tớ mà làm được gì, quanh đi quảnh lại cũng chỉ là sửa chữa mấy cái lệnh record được, đang muốn bái sư đây. Bác Duyệt béo đâu rồi, em bái bác làm sư phụ, để học VBA, mong bác thu nhận. Về Excel thì kính chị Handung107 làm đại sư tỷ. Rồi Workman nữa, mới tò te nhưng nội công cũng thâm hậu lắm.

Nếu nhập dòng hay cột vào CSDL thì bạn làm như vậy là rất OK nữa là khác;
Nhưng trong thực tế không phải lúc nào cũng vậy; có ví dụ như sau: nhập hoá đơn bán hàng vào 2 Sheets (1- Phần chính gồm TênKH,MaSoThue,Ngay,GiaoNhan & 2- phần chi tiết gồm SoLuong,DonGia,DVT) thì không thực thi được câu lệnh của BÁc đâu nha!

Bác SA_DQ nói đúng, nhưng tớ đã nói là "dùng cùng đệm hay 1 sheet khác" mà, cách giải quyết rất "con nhà nghèo", tạo 1 sheet thứ 3 link đến 2 sheet kia, rồi copy data cái sheet này để lưu trữ! Tớ nói rõ hơn, thí dụ tớ nhập liệu vào 1 sheet có cấu trúc như hóa đơn, để in ra. Nhưng lưu trữ thì toàn bộ dữ liệu trên hóa đơn được ghi trên 1 dòng. Tớ tạo 1 sheet thứ 3 và "link" dữ liệu đến cái hóa đơn, rồi copy - paste, thế là xong. :lol:

 

[ntb_802]

Các bạn nói đúng, lúc đầu mình cũng vướng ở chỗ đấy là khi in hoá đơn nó sẽ gồm hai phần là phần đầu (số hoá đơn, khách hàng (MST, địa chỉ..) và ngày tháng),và phần dưới (chi tiến về hàng hoá, số lượng, đơn giá, thuế...) Vùng in hoá đơn mình để cố định (vì HĐGTGT chỉ có 10 dòng thôi mà, các tiêu chí khác cũng nằm ở vùng cố định) Ba cột đầu mình link tới ngày tháng, số hoá đơn, và mã khách hàng (chỉ lưu mã khách hàng thôi, vì mã khách hàng sẽ nằm ở một sheet khác - Quản lý khách hàng ở đây sẽ chi tiến các vấn đề khác như địa chỉ, mã số thuế, đt...) và mình cho ba tiêu chí này nằm cùng dòng với phần dưới (tên hàng, số lượng, đơn giá...) Khi copy và paste thì sẽ copy từ cột đầu tiên đến hết, nhưng khi in hoá đơn sẽ in từ cột thứ 3 đến hết, đấy là cách làm của mình. Như vậy kết quả cho được ở sheet tổng hợp là toàn bộ thông tin về đơn hàng đó (nằm trên cùng dòng) và theo dõi quản lý rất tiện như vậy không cần sheet trung gian, Cuối tháng Sheet tổng hợp được cất riêng ra một workbook khác và lưu ở một chỗ khác (ví dụ trên mạng hoặc ghi ra CD... và cuối năm sẽ có 12 workbook đó) tuy nhiên thiết kế sheet đánh đơn hàng cầu kỳ một chút.
:atom: :atom: :atom:

 

[NgânGiang]

File của bạn ntb 802, các bạn chuyên gia VBA giúp bạn ấy nhé

Lâu quá mới quay lại đề tài này
Chị handung107 ơi, file qldh có password, sao không cho để em mở vậy

 

[handung107]

Password của file upload là bbb112 mà.

Xin lỗi các bạn, vì đây là File của ntb_802, không phải của tôi, nên tôi không rõ có Password hay không ? Còn đây là Pass mà bạn ấy đã cung cấp

 

[NgânGiang]

Xin lỗi các bạn, vì đây là File của ntb_802, không phải của tôi, nên tôi không rõ có Password hay không ? Còn đây là Pass mà bạn ấy đã cung cấp
Nguyên văn bởi ntb_802
Password của file upload là bbb112 mà.

Các bạn mở file này cần phòng ngừa trường hợp có Virus.
Xin hỏi bạn ntb_802: Máy của bạn có file: 'C:\Documents and Settings\xiaoguoping\My Documents\hang\order20041.xls' không? và một số file khác nữa như C:\Imp-Expt\On_tap.xls, C:\Imp-Expt\Dongia AC Base duyet.xls, ... và một số file khác nữa trong mạng nội bộ?
Trong file qldh.xls của bạn có Macro do bạn thiết kế hay từ chương trình nào tạo ra? có macro hay không? Tại sao lại có Author là sss578?
Xem properties bên custom có :
Name Value Type
pass2 cxq112 Text
pass3 xsq112 Text
Nhưng mở bằng các Password trên không được, đến khi dùng Password chi handung mới cho thì mở được.

Xin mô tả quá trình làm việc dưới đây:
Tôi chép file về thu mục C:\Temp để làm
Ban đầu tôi quét virus thì không có cảnh báo mở file và chấp nhận Enable Macro với cảnh báo Virus và màn hình Excel chớp nháy liên tục và tạo ra đến sheet 94 thì bị tôi cắt ngang
Mở lại Excel thấy đòi password cho file ÿÿÿÿÿ. Kiểm tra lại thì thấy file này đã tự động tạo ra trong C:\Program File\Microsoft Office\Office\XLStart. Tôi đã xóa file ÿÿÿÿÿ, mở lại Excel thì không còn cảnh báo nữa.
Lần sau mở lại và chọn Disable Macro rồi lưu lại để bỏ macro thì bị cảnh báo virus XF.Sic.gen như file word đính kèm.

 

[Tuanktcdcn]

Virus "macro Poppy" đấy Các Bận ạ, Hãy Dùng Nav để Diệt.

 

[ntb_802]

Chào bạn Ngân Giang, file đó của mình bị nhiễm con viruss YYYYY có bạn đã nhắc từ đầu rồi mà, mình đã diệt nhiều lần rồi mà nó cứ chết đi rồi lại sống lại tuy nhiên nó chẳng gây hậu quả gì mấy. Đúng như bạn bảo, trong mạng nội bộ của mình có một vài file như bạn miêu tả, các pass1, pass2 là các pass do mình tạo ra từ trước để tránh quên mật khẩu thôi mà.
Bạn nào biết về con virus yyyyy không diệt nó giúp mình với.
:atom: :atom: :atom:

 

[NgânGiang]

Virus "macro Poppy" đấy Các Bận ạ, Hãy Dùng Nav để Diệt.

Khi tải file qldh.rar về máy mình đã scan bằng NAV nhưng không báo có Virus. Đến bước cuối như mô tả hôm qua NAV mới phát hiện ra nó

Chào bạn Ngân Giang, file đó của mình bị nhiễm con viruss YYYYY có bạn đã nhắc từ đầu rồi mà, mình đã diệt nhiều lần rồi mà nó cứ chết đi rồi lại sống lại tuy nhiên nó chẳng gây hậu quả gì mấy. Đúng như bạn bảo, trong mạng nội bộ của mình có một vài file như bạn miêu tả, các pass1, pass2 là các pass do mình tạo ra từ trước để tránh quên mật khẩu thôi mà.
Bạn nào biết về con virus yyyyy không diệt nó giúp mình với.
:atom: :atom: :atom:

Bạn thử làm như mình mô tả xem sao. (Xóa trong thư mục XLStart để nó không được mở cùng Excel nữa, sẽ hạn chế nó lây vào các file mới.
Mình đã làm cái tổng hợp đơn hàng cho bạn rồi, xem file đính kèm nhé. Trong file đó có 1 macro, macro này không tự động chạy khi mở file đâu, nó chỉ được chạy khi bạn nhấn vào toolbar của mình hoặc bạn vào Tool..\Macro để chạy. Hy vọng mình làm đúng với mô tả nhu cầu của bạn.
Nhân đây xin hỏi các bạn: Làm sao để gỡ bỏ hết các Links trong file của bạn ntb_802 (File đính kèm là file của ntb_802 mình đưa macro của mình vào mà chưa gỡ hết các links)

 

[Tuanktcdcn]

Khi tải file qldh.rar về máy mình đã scan bằng NAV nhưng không báo có Virus. Đến bước cuối như mô tả hôm qua NAV mới phát hiện ra nó

Bạn thử làm như mình mô tả xem sao. (Xóa trong thư mục XLStart để nó không được mở cùng Excel nữa, sẽ hạn chế nó lây vào các file mới.

Cái này mình đã dùng NAV diệt nó chết và đã hóa thạch rồi, bạn xem lại máy của bạn hỏng rồi, hì hì.

Bạn vào Menu Edit->Link... Bạn chọn Break Link là OK.
Chúc bạn thành công!

 

[NgânGiang]

Bạn vào Menu Edit->Link... Bạn chọn Break Link là OK.
Chúc bạn thành công!

Break Link của Ofice phiên bản nào thế? Mình đang dùng Office 2000, chưa tìm thấy nó đâu cả?

 

[ntb_802]

Mình đang dùng office2003 có Link.. nhưng bị mờ chẳng xử dụng được, làm cách nào để nó sáng lên???

PS to Ngân Giang, File bạn upload lên minh down về chạy ngon lành cám ơn bạn đã mày mò giúp, Hôm nọ bạn Adam_Trần đã giúp mình với cách tương tự của bạn tuy có hơi khác một chút nhưng cho cùng một kết quả, mình sẽ linh động vận dụng cả hai, hôm nào bạn ra Hà Nội mình sẽ mời bạn đi ăn kem nhé hi hi

 

[Tuanktcdcn]

Bạn phải mở file có bị link các file khác thi no mói sang chứ.

 

[adam_tran]

Hôm nọ bạn Adam_Trần đã giúp mình với cách tương tự của bạn tuy có hơi khác một chút nhưng cho cùng một kết quả.

Không khác đâu, về cơ bản giống nhau và cũng là những cách "nhà nghèo" cả. Khác cái là trong code sử dụng các method khác nhau thôi. VBA nhiều cái quá, càng mò càng rối, không biết bác Duyệt béo và mấy cao thủ khác có sẳn sàng chưa, để tớ post chừng 10 câu hỏi về VBA mà là lý thuyết cả.

Hôm nào bạn ra Hà Nội mình sẽ mời bạn đi ăn kem nhé hi hi

Híc híc, sao không mời tớ đi ăn kem nhỉ! Nô bi ta này thiên vị Xuka quá.

 

[leanhkhoa]

nếu chưa có cách giải quyết nào hay thi ban hay liên hệ với tôi theo địa chỉ leanhkhoa@walla.com để cung nhau giải quyết.
Tôi cho rằng minh có thể giải quyết được vấn đề này 1 cách triệt để - đơn thuần chỉ bằng các công thức và hàm cuả excel.
Tuy nhiên, ban nên tham khảo kỹ ý kiến của WhoamI là nghiên cứu kỹ tài liệu ở thư viện WKT

 

[Tuanktcdcn]

nếu chưa có cách giải quyết nào hay thi ban hay liên hệ với tôi theo địa chỉ leanhkhoa@walla.com để cung nhau giải quyết.
Tôi cho rằng minh có thể giải quyết được vấn đề này 1 cách triệt để - đơn thuần chỉ bằng các công thức và hàm cuả excel.
Tuy nhiên, ban nên tham khảo kỹ ý kiến của WhoamI là nghiên cứu kỹ tài liệu ở thư viện WKT

Toi hoi to mo la sao ban khong tra loi giup moi nguoi ngay tai day? Neu duoc ban tra loi de tat ca cung nhau hoc hoi.

 

[workman]

Đúng thế, có gì post ở đây cho bà con cô bác tham khảo luôn với. Bác trao đổi riêng làm tôi mất cơ hội học hỏi.

 

[ntb_802]

Chào bạn Khoa, bài toán này của mình bạn chỉ sử dụng các hàm của Excel thôi ư, bạn Post lên cho mọi người thưởng lãm chút đi, tiện đây hỏi thêm các bạn về VBA một chút:
File đơn hàng của mình nhờ các bạn giúp đỡ cơ bản đã hoàn thiện xong và đã chính thức đưa vào áp dụng thực tế. Tuy nhiên trong tương lai sẽ vướng một vấn đề là mình dùng các chương trình scan virus thì các đoạn mã code của các macro sẽ bị mất hết và lại phải record lại từ đầu, Vậy có cách nào chuyển các mã đó thành một cái gì đó (VD add-ins.. chẳng hạn) để không bị các phần mềm diệt virus hiểu nhầm mà quét făng nó đi?? Mình nghĩ vấn đề này sẽ nan giải với nhiều người chứ không riêng một mình đâu, phải không? Mong các cao thủ giúp đi...........
:atom: :atom: