Đăng ký học Excel và VBA cùng GPE tháng 10 - TPHCM

Đăng ký học Excel và VBA cùng GPE tháng 11 - TPHCM

In phiếu thu chi bằng VBA

Thảo luận trong 'Lập Trình với Excel' bắt đầu bởi thomong, 12 Tháng sáu 2008.

  1. thomong

    thomong Thành viên chính thức

    Chào các anh chị thành viên, em mới học VBA nên k biết viết chương trình phiếu thu chi này chi như thế nào? mấy anh chị xem file đính kèm và hướng dẫn giúp em với nha. xếp em hối thúc em mấy ngày nay. em rất cảm ơn.
     

    Các file đính kèm:

  2. XuanThanh

    XuanThanh Thành viên hoạt động

    Dùng VLOOKUP mà làm, Truy xét các thành phần dựa và số phiếu bên Data
     
  3. Ng_Duy_Long

    Ng_Duy_Long Thành viên mới

    Bạn thử tải file này xem
     

    Các file đính kèm:

  4. right_poplar

    right_poplar Thành viên mới

    Cẩn thận nha các bạn, file nay bi virus rồi.
     
  5. thomong

    thomong Thành viên chính thức

    em tải file về bị virus nhiều quá, ko chạy macro được, với lại không xem đươc code trong VBA nen em không biết cách viết theo yêu cầu của mình, mong anh Ng_Duy_Long và các anh chị trên diễn đàn giúp đỡ.
     
  6. danhthuy_nguyen

    danhthuy_nguyen Thành viên mới

    file này bị nhiễm virut
     
  7. thomong

    thomong Thành viên chính thức

    mấy anh chị có file nào khác không? cho em với, em cảm ơn
     
  8. hongha_computer

    hongha_computer Thành viên mới

    Mình nghĩ bạn nên dùng hàm Vlookup hoặc dùng cách tạo phiều thu, chi bằng Merger Mail
     
  9. cadafi

    cadafi New Style! New Life! Staff Member Super Moderator

    Chào bạn,
    Theo cách thông thường trước đây các kế toán thường làm phần hạch toán trước, sau đó mới tạo form để in ra.

    Còn mình thì làm theo cách ngược lại, Kế toán thanh toán phải lập chứng từ thu chi trước, hạch toán và in ra phiếu thu chi trước, sau đó mới lưu dữ liệu vào hê thống.

    Bạn xem file đính kèm. Đây là phân hệ kế toán thanh toán bao gồm, phiếu thu, phiếu chi, ủy nhiệm chi và phiếu kế toán.

    Mình xin nói sơ về file VASCashModule như sau:
    1.User name và pass admin:
    User Name: Admin
    Password: admin
    2. Setup thông tin công ty tại sheet(SystemName)
    3.Setup User tai sheet(User)
    4. Setup Tài khoản ngân hàng tại sheet(BankID)
    5. Setup mã lưu chuyển tiền tệ tại sheet(CFLOWID)
    6. Setup tài khoản tại sheet(COA)
    7. Setup danh mục khách hàng tại sheet(CUST)
    8. Setup danh mục Nhà cung cấp tại sheet(VEND)
    9. Setup danh mục hàng tồn kho tại sheet(INVTID)
    10. Setup mã chi phí tại sheet(COSTCENTER)
    11. Setup danh mục phòng ban tại sheet(DIVISION)
    12. Dữ liệu được lưu tại sheet(GLDATA)
    13. Dữ liệu về hóa đơn, kê khai hóa đơn được lưu tại sheet(GLINVC)

    Nếu dữ liệu công ty nhiều và lớn, mình cũng có giải pháp để lưu trữ vào access (file System đính kèm), lúc này chúng ta cần một đăng ký ODBC và kết nối Dynamic DNS (thông qua VPN) nếu dữ liệu trung tâm ở xa cho file access kèm theo (lấy tên là DNS là AMGACCT).
    14. Sheet(VAT) dùng để xem lại bảng kê thuế GTGT đầu ra, đầu vào theo tháng (lấy query từ file access, không cần thiết nếu dữ liệu công ty không nhiều và lưu trữ trực tiếp trên excel ở sheet(GLDATA))
    15. Sheet(DATA) dùng để xem lại nhật ký chung theo tháng/kỳ (lấy query từ file access, không cần thiết nếu dữ liệu công ty không nhiều và lưu trữ trực tiếp trên excel ở sheet(GLDATA)).

    Hiện tại bạn sử dụng chức năng hạch toán và in phiếu thu, chi ủy nhiệm chi và phiếu kế toán thôi, những phần hành khác mình đang hoàn thiện, chưa xong.

    Trong màn hình nhập liệu phiếu thu chi, phiếu kế toán, Bạn có thể double click và tìm danh mục theo ý mình (ví dụ danh mục tài khoản, danh mục hàng tồn kho, danh mục khách hàng, danh mục nhà cung cấp...).

    Có vần đề gì, mong các bạn cho ý kiến để mình hoàn thiện file này nhé!.

    Trân trọng,
     

    Các file đính kèm:

  10. thomong

    thomong Thành viên chính thức

    em đã tải file về rồi, em mở file lên nhập username là Admin thì bị báo lỗi, chương trình tự động chuyển đến VBA, em đóng cửa sổ VBA lại, mở phiếu thu hoặc chi lên nhập thử vào thì bị báo lỗi ở dòng "số tiền bằng chữ" là #value và trong VBA báo lỗi là: can't fine proẹct or library tại dòng Trim của function VN (baonhieu). mong anh chỉ giúp em phải làm sao nhé. em cảm ơn.
     
  11. cadafi

    cadafi New Style! New Life! Staff Member Super Moderator

    Có lẽ khi cài office bạn không cài dạng Run all from My computer nên bị thiếu một số thư viện hàm. Bạn thử cài lại office thử xem.
     
  12. pupuchacha

    pupuchacha Thành viên mới

Chia sẻ trang này