Viết code cho hóa đơn bán hàng

[hacao2010]

Chào anh chị diễn đàn giải pháp Excel! Em làm 1 file tính hóa đoen nhưng do em không rành về VBA cho lắm, em lên mạng học vài chỗ nhưng file của em chưa được hoàn chỉnh lăm. Nút chỉnh next invoice thì hoạt động tốt, nhưng mà nút Save thì có vấn đề. khi nhấn vào save thì toàn bộ công thức ở phía dưới đều bị xóa mất. Em muốn làm thêm nút cập nhật thông tin khách hàng nửa nhưng ko biết làm sao. Mong anh chị giúp đỡ. Em cám ơn nhiều

 

[Lê Duy Thương]

Chào anh chị diễn đàn giải pháp Excel! Em làm 1 file tính hóa đoen nhưng do em không rành về VBA cho lắm, em lên mạng học vài chỗ nhưng file của em chưa được hoàn chỉnh lăm. Nút chỉnh next invoice thì hoạt động tốt, nhưng mà nút Save thì có vấn đề. khi nhấn vào save thì toàn bộ công thức ở phía dưới đều bị xóa mất. Em muốn làm thêm nút cập nhật thông tin khách hàng nửa nhưng ko biết làm sao. Mong anh chị giúp đỡ. Em cám ơn nhiều

trong code có đoan Nextinvoice bỏ nó đi là xong

Sub SaveInvoiceWithNewName()  
  Dim NewFN As Variant    'copy Invoice to new workbook    
ActiveSheet.Copy    NewFN = "C:\Users\quang\Desktop\" & Range("F4").Value & ".xlsx" 'duong dan den file moi    ActiveWorkbook.SaveAs NewFN, FileFormat:=xlOpenXMLWorkbook   
 Nextinvoice
End Sub

 

[hacao2010]

Cám ơn anh Lê Duy Thương đã giúp đỡ, nhưng ý em là khi mình nhấn Save Invoice hay Next Invoice nó sẽ ko bị mất những function mình đã viết để tính toán giá tiền đó anh.